# | Line 75 | Line 75 | contains | |
---|---|---|
75 | end subroutine add_lj_atype | |
76 | ||
77 | ||
78 | + | subroutine do_lj_ff(q,f,potE) |
79 | + | real ( kind = dp ), dimension(ndim,) :: q |
80 | + | real ( kind = dp ), dimension(ndim,nLRparticles) :: f |
81 | + | real ( kind = dp ) :: potE |
82 | ||
83 | ||
84 | + | |
85 | + | |
86 | + | |
87 | + | |
88 | + | |
89 | + | end subroutine do_lj_ff |
90 | + | |
91 | + | |
92 | + | |
93 | end module lj_ff |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |