# | Line 31 | Line 31 | contains | |
---|---|---|
31 | return | |
32 | end subroutine initialize_dipole | |
33 | ||
34 | – | |
34 | subroutine do_dipole_pair(atom1, atom2, d, rij, r2, pot, u_l, f, t, & | |
35 | do_pot, do_stress) | |
36 |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |