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

Comparing trunk/OOPSE-2.0/src/UseTheForce/DarkSide/sticky_interface.F90 (file contents):
Revision 1948 by gezelter, Fri Jan 14 20:31:16 2005 UTC vs.
Revision 2189 by chuckv, Wed Apr 13 20:36:45 2005 UTC

# Line 10 | Line 10 | end subroutine newStickyType
10         isError)
11    
12   end subroutine newStickyType
13 +
14 + subroutine destroyStickyTypes()
15 +  use sticky, ONLY : module_destroyStickyTypes => destroyStickyTypes
16 +  call module_destroyStickyTypes()
17 +
18 + end subroutine destroyStickyTypes

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines