ViewVC Help
View File | Revision Log | Show Annotations | View Changeset | Root Listing
root/group/trunk/OOPSE_old/src/mdtools/libmdCode/wrappers.F90
(Generate patch)

Comparing trunk/OOPSE_old/src/mdtools/libmdCode/wrappers.F90 (file contents):
Revision 270 by mmeineke, Fri Feb 14 17:08:46 2003 UTC vs.
Revision 293 by mmeineke, Thu Mar 6 16:07:57 2003 UTC

# Line 1 | Line 1
1 +
2 + subroutine wrapForceField(infoWrapper)
3 +
4 +  use do_Forces, ONLY: new_atype, init_FF, do_forceLoop
5 +  external infoWrapper
6 +
7 +  call infoWrapper(new_atype,init_FF,do_forceLoop)
8 +  
9 + end subroutine wrapForceField
10 +
11 +
12 +
13   subroutine wrapSimMod(infoWrapper)
14    use simulation
15    

Diff Legend

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