ViewVC Help
View File | Revision Log | Show Annotations | View Changeset | Root Listing
root/OpenMD/trunk/src/UseTheForce/notifyCutoffs_interface.F90
Revision: 507
Committed: Fri Apr 15 22:04:00 2005 UTC (20 years, 2 months ago) by gezelter
File size: 271 byte(s)
Log Message:
xemacs has been drafted to perform our indentation services

File Contents

# User Rev Content
1 gezelter 264 subroutine notifyFortranCutoffs(this_rcut, this_rsw, this_rlist )
2     use notifyCutoffs
3     use definitions, ONLY : dp
4 gezelter 507
5 gezelter 264 real(kind=dp), intent(in) :: this_rcut, this_rsw, this_rlist
6 gezelter 507
7 gezelter 264 call cutoffNotify(this_rcut, this_rsw, this_rlist )
8 gezelter 507
9 gezelter 264 end subroutine notifyFortranCutoffs