[ViewVC] Diff of: group/trunk/OOPSE-4/src/UseTheForce/DarkSide/electrostatic

Comparing trunk/OOPSE-4/src/UseTheForce/DarkSide/electrostatic_interface.F90 (file contents):
Revision 2229 by chrisfen, Tue May 17 22:35:01 2005 UTC vs.
Revision 2301 by gezelter, Thu Sep 15 22:05:21 2005 UTC

-+
+subroutine setElectrostaticSummationMethod(the_ESM)
-+
+  use electrostatic_module, ONLY : module_setESM => setElectrostaticSummationMethod
-+
+  integer,intent(inout) :: the_ESM
-+
+  call module_setESM(the_ESM)
-+
+end subroutine setElectrostaticSummationMethod
-+
-+
+subroutine setElectrostaticCutoffRadius(the_rcut)
-+
+  use electrostatic_module, ONLY : module_setECR => setElectrostaticCutoffRadius
-+
+  real(kind=dp), intent(inout) :: the_rcut
-+
+  call module_setECR(the_rcut)
-+
+end subroutine setElectrostaticCutoffRadius
-+
-+
+subroutine setDampedWolfAlpha(the_alpha)
-+
+  use electrostatic_module, ONLY : module_setDWA => setDampedWolfAlpha
-+
+  integer,intent(inout) :: the_alpha
-+
+  call module_setDWA(the_alpha)
-+
+end subroutine setDampedWolfAlpha
-+
-+
+subroutine setReactionFieldDielectric(the_dielectric)
-+
+  use electrostatic_module, ONLY : module_setRFD => setReactionFieldDielectric
-+
+  integer,intent(inout) :: the_dielectric
-+
+  call module_setRFD(the_dielectric)
-+
+end subroutine setReactionFieldDielectric
-+
+subroutine newElectrostaticType(atp, status)
+  use electrostatic_module, ONLY : module_newElectrostaticType => newElectrostaticType

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