44 |
|
|
45 |
|
end subroutine doForceloop |
46 |
|
|
47 |
< |
subroutine notifyFortranElectrostaticMethod(electrostaticMethod) |
47 |
> |
subroutine setFortranElectrostaticMethod(electrostaticMethod) |
48 |
|
use doForces, ONLY : setElectrostaticMethod |
49 |
|
|
50 |
|
integer, intent(in) :: electrostaticMethod |
51 |
|
|
52 |
|
call setElectrostaticMethod(electrostaticMethod) |
53 |
|
|
54 |
< |
end subroutine notifyFortranElectrostaticMethod |
54 |
> |
end subroutine setFortranElectrostaticMethod |
55 |
|
|
56 |
|
subroutine notifyFortranCutoffPolicy(cutPolicy) |
57 |
|
use doForces, ONLY : setCutoffPolicy |