ViewVC Help
View File | Revision Log | Show Annotations | View Changeset | Root Listing
root/group/trunk/OOPSE/libmdtools/simulation_module.F90
(Generate patch)

Comparing trunk/OOPSE/libmdtools/simulation_module.F90 (file contents):
Revision 570 by gezelter, Tue Jul 1 22:29:40 2003 UTC vs.
Revision 618 by mmeineke, Tue Jul 15 21:34:56 2003 UTC

# Line 245 | Line 245 | contains
245    function getRrf() result(rrf)
246      real( kind = dp ) :: rrf
247      rrf = thisSim%rrf
248 <    write(*,*) 'getRrf = ', rrf, thisSim%rrf
248 >    write(*,*) 'getRrf = ', rrf
249    end function getRrf
250    
251    function getRt() result(rt)
252      real( kind = dp ) :: rt
253      rt = thisSim%rt
254 +    write(*,*) 'getRt = ', rt
255    end function getRt
256  
257    function getDielect() result(dielect)

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines