ViewVC Help
View File | Revision Log | Show Annotations | View Changeset | Root Listing
root/group/trunk/OOPSE-4/src/UseTheForce/DarkSide/electrostatic_interface.F90
(Generate patch)

Comparing trunk/OOPSE-4/src/UseTheForce/DarkSide/electrostatic_interface.F90 (file contents):
Revision 2095 by gezelter, Wed Mar 9 15:44:59 2005 UTC vs.
Revision 2189 by chuckv, Wed Apr 13 20:36:45 2005 UTC

# Line 77 | Line 77 | end subroutine setQuadrupoleMoments
77    call module_setQuadrupoleMoments(ident, quadrupole_moments, status)
78    
79   end subroutine setQuadrupoleMoments
80 +
81 + subroutine destroyElectrostaticTypes()
82 +  use electrostatic_module, ONLY: module_destroyElectrostaticTypes =>destroyElectrostaticTypes
83 +
84 +  call module_destroyElectrostaticTypes()
85 +
86 + end subroutine destroyElectrostaticTypes

Diff Legend

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