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 941 by gezelter, Tue Jan 13 23:01:43 2004 UTC vs.
Revision 1138 by gezelter, Wed Apr 28 21:39:22 2004 UTC

# Line 45 | Line 45 | module simulation
45    public :: SimRequiresPrepairCalc
46    public :: SimRequiresPostpairCalc
47    public :: SimUsesDirectionalAtoms
48 +  public :: SimUsesMolecularCutoffs
49    
50   contains
51    
# Line 239 | Line 240 | contains
240      doesit = thisSim%SIM_uses_dipoles .or. thisSim%SIM_uses_sticky .or. &
241           thisSim%SIM_uses_GB .or. thisSim%SIM_uses_RF
242    end function SimUsesDirectionalAtoms
243 +
244 +  function SimUsesMolecularCutoffs() result(doesit)
245 +    logical :: doesit
246 +    doesit = thisSim%SIM_uses_molecular_cutoffs
247 +  end function SimUsesMolecularCutoffs
248  
249    function SimRequiresPrepairCalc() result(doesit)
250      logical :: doesit

Diff Legend

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