[ViewVC] Diff of: group/trunk/OOPSE/libmdtools/calc_dipole

Comparing trunk/OOPSE/libmdtools/calc_dipole_dipole.F90 (file contents):
Revision 611 by gezelter, Tue Jul 15 17:10:50 2003 UTC vs.
Revision 619 by mmeineke, Tue Jul 15 22:22:41 2003 UTC

#	Line 84 \| Line 84 \| contains
84		call getElementProperty(atypes, me1, "dipole_moment", mu1)
85		call getElementProperty(atypes, me2, "dipole_moment", mu2)
86
87	+
88		if (rij.le.rrf) then
89	+
90
91	+
92		if (rij.lt.rt) then
93		taper = 1.0d0
94		dtdr = 0.0d0

-–
+Removed lines
-+
+Added lines
-<
+Changed lines
->
+Changed lines