ViewVC Help
View File | Revision Log | Show Annotations | View Changeset | Root Listing
root/group/trunk/OOPSE-4/src/UseTheForce/notifyCutoffs_interface.F90
Revision: 2204
Committed: Fri Apr 15 22:04:00 2005 UTC (19 years, 3 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 1948 subroutine notifyFortranCutoffs(this_rcut, this_rsw, this_rlist )
2     use notifyCutoffs
3     use definitions, ONLY : dp
4 gezelter 2204
5 gezelter 1948 real(kind=dp), intent(in) :: this_rcut, this_rsw, this_rlist
6 gezelter 2204
7 gezelter 1948 call cutoffNotify(this_rcut, this_rsw, this_rlist )
8 gezelter 2204
9 gezelter 1948 end subroutine notifyFortranCutoffs