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

Comparing:
trunk/OOPSE/libmdtools/wrappers.F90 (file contents), Revision 626 by mmeineke, Wed Jul 16 21:30:56 2003 UTC vs.
branches/no-template-branch/OOPSE/libmdtools/wrappers.F90 (file contents), Revision 831, Tue Oct 28 16:20:29 2003 UTC

# Line 5 | Line 5 | subroutine wrapForceField(infoWrapper)
5    use do_Forces, ONLY: init_FF, do_force_loop
6    use sticky_pair, ONLY: set_sticky_params
7    use gb_pair, ONLY: set_gb_pair_params
8 +  use eam, ONLY: newEAMtype
9    external infoWrapper
10  
11    call infoWrapper(new_atype,init_FF,do_force_loop, &
12 <       set_sticky_params,set_gb_pair_params)
12 >       set_sticky_params,set_gb_pair_params,newEAMtype)
13    
14   end subroutine wrapForceField
15  

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines