# | Line 75 | Line 75 | contains | |
---|---|---|
75 | end subroutine cutoffNotify | |
76 | ||
77 | end module notifyCutoffs | |
78 | + | |
79 | + | subroutine notifyFortranCutoffs(this_rcut, this_rsw, this_rlist ) |
80 | + | use notifyCutoffs |
81 | + | use definitions, ONLY : dp |
82 | + | |
83 | + | real(kind=dp), intent(in) :: this_rcut, this_rsw, this_rlist |
84 | + | |
85 | + | call cutoffNotify(this_rcut, this_rsw, this_rlist ) |
86 | + | |
87 | + | end subroutine |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |