ViewVC Help
View File
|
Revision Log
|
Show Annotations
|
View Changeset
|
Root Listing
root
/
group
/
trunk
/
OOPSE-4
/
src
/
UseTheForce
/
notifyCutoffs_interface.F90
Revision:
1948
Committed:
Fri Jan 14 20:31:16 2005 UTC
(19 years, 8 months ago) by
gezelter
File size:
277 byte(s)
Log Message:
separating modules and C/Fortran interface subroutines
File Contents
#
Content
1
subroutine notifyFortranCutoffs(this_rcut, this_rsw, this_rlist )
2
use notifyCutoffs
3
use definitions, ONLY : dp
4
5
real(kind=dp), intent(in) :: this_rcut, this_rsw, this_rlist
6
7
call cutoffNotify(this_rcut, this_rsw, this_rlist )
8
9
end subroutine notifyFortranCutoffs