# | Line 122 | Line 122 | contains | |
---|---|---|
122 | contains | |
123 | ||
124 | subroutine setElectrostaticSummationMethod(the_ESM) | |
125 | – | |
125 | integer, intent(in) :: the_ESM | |
126 | ||
127 | if ((the_ESM .le. 0) .or. (the_ESM .gt. REACTION_FIELD)) then | |
128 | call handleError("setElectrostaticSummationMethod", "Unsupported Summation Method") | |
129 | endif | |
130 | ||
131 | + | summationMethod = the_ESM |
132 | end subroutine setElectrostaticSummationMethod | |
133 | ||
134 | subroutine setElectrostaticCutoffRadius(thisRcut) |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |