| # | Line 73 | Line 73 | contains | |
|---|---|---|
| 73 | ||
| 74 | subroutine setSimulation(nLRParticles,box,rlist,rcut) | |
| 75 | integer, intent(in) :: nLRParticles | |
| 76 | < | real(kind = dp ), intent(in) :: box |
| 76 | > | real(kind = dp ), intent(in), dimension(3) :: box |
| 77 | real(kind = dp ), intent(in) :: rlist | |
| 78 | real(kind = dp ), intent(in) :: rcut | |
| 79 | ||
| # | Line 218 | Line 218 | contains | |
| 218 | if(present(rcut2)) rcut2 = rcutsq | |
| 219 | if(present(rcut2)) rcut6 = rcut_6 | |
| 220 | ||
| 221 | – | |
| 221 | end subroutine getRcut | |
| 222 | ||
| 223 | + | |
| 224 | + | |
| 225 | + | |
| 226 | end module simulation | |
| – | Removed lines |
| + | Added lines |
| < | Changed lines |
| > | Changed lines |