[ViewVC] Diff of: group/trunk/OOPSE-3.0/src/UseTheForce/doForces

Comparing trunk/OOPSE-3.0/src/UseTheForce/doForces_interface.F90 (file contents):
Revision 2360 by chuckv, Wed Oct 12 20:22:34 2005 UTC vs.
Revision 2361 by gezelter, Wed Oct 12 21:00:50 2005 UTC

#	Line 39 \| Line 39 \| subroutine doForceloop(q, q_group, A, eFrame, f, t, ta
39
40		!! Stress Tensor
41		real( kind = dp), dimension(9) :: tau
42	<	real ( kind = dp ),dimension(POT_ARRAY_SIZE) :: pot
42	>	real ( kind = dp ),dimension(LR_POT_TYPES) :: pot
43		logical ( kind = 2) :: do_pot_c, do_stress_c
44		integer :: error
45

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