ViewVC Help
View File | Revision Log | Show Annotations | View Changeset | Root Listing
root/group/trunk/OOPSE/libmdtools/wrappers.F90
(Generate patch)

Comparing trunk/OOPSE/libmdtools/wrappers.F90 (file contents):
Revision 460 by chuckv, Fri Apr 4 22:22:30 2003 UTC vs.
Revision 462 by gezelter, Sat Apr 5 02:56:27 2003 UTC

# Line 4 | Line 4 | subroutine wrapForceField(infoWrapper)
4    use atype_module, ONLY: new_atype
5    use do_Forces, ONLY: init_FF, do_force_loop
6    use lj, ONLY: LJ_new_rcut
7 <  use sticky, ONLY: set_sticky_params
8 <  use gb, ONLY: set_gb_pair_params
7 >  use sticky_pair, ONLY: set_sticky_params
8 >  use gb_pair, ONLY: set_gb_pair_params
9    external infoWrapper
10  
11    call infoWrapper(new_atype,init_FF,do_force_loop, &

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines