ViewVC Help
View File | Revision Log | Show Annotations | View Changeset | Root Listing
root/group/trunk/OOPSE-4/src/UseTheForce/notifyCutoffs_interface.F90
(Generate patch)

Comparing trunk/OOPSE-4/src/UseTheForce/notifyCutoffs_interface.F90 (file contents):
Revision 1948 by gezelter, Fri Jan 14 20:31:16 2005 UTC vs.
Revision 2204 by gezelter, Fri Apr 15 22:04:00 2005 UTC

# Line 1 | Line 1
1   subroutine notifyFortranCutoffs(this_rcut, this_rsw, this_rlist )
2    use notifyCutoffs
3    use definitions, ONLY : dp
4 <  
4 >
5    real(kind=dp), intent(in) :: this_rcut, this_rsw, this_rlist
6 <  
6 >
7    call cutoffNotify(this_rcut, this_rsw, this_rlist )
8 <  
8 >
9   end subroutine notifyFortranCutoffs

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines