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

Comparing trunk/OOPSE/libmdtools/calc_dipole_dipole.F90 (file contents):
Revision 443 by mmeineke, Wed Apr 2 22:19:03 2003 UTC vs.
Revision 460 by chuckv, Fri Apr 4 22:22:30 2003 UTC

#	Line 4 \| Line 4 \| module dipole_dipole
4		use definitions
5		use atype_module
6		use vector_class
7	+	use simulation
8		#ifdef IS_MPI
9		use mpiSimulation
10		#endif
#	Line 45 \| Line 46 \| contains
46
47		real( kind = dp ) :: pot
48		real( kind = dp ), dimension(3) :: d
49	<	real( kind = dp ), dimension(:,:) :: u_l
50	<	real( kind = dp ), dimension(:,:) :: f
51	<	real( kind = dp ), dimension(:,:) :: t
49	>	real( kind = dp ), dimension(3,getNlocal()) :: u_l
50	>	real( kind = dp ), dimension(3,getNlocal()) :: f
51	>	real( kind = dp ), dimension(3,getNlocal()) :: t
52
53		real (kind = dp), dimension(3) :: ul1
54		real (kind = dp), dimension(3) :: ul2

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