--- trunk/OOPSE/libmdtools/wrappers.F90 2003/04/04 22:22:30 460 +++ trunk/OOPSE/libmdtools/wrappers.F90 2003/04/05 02:56:27 462 @@ -4,8 +4,8 @@ subroutine wrapForceField(infoWrapper) use atype_module, ONLY: new_atype use do_Forces, ONLY: init_FF, do_force_loop use lj, ONLY: LJ_new_rcut - use sticky, ONLY: set_sticky_params - use gb, ONLY: set_gb_pair_params + use sticky_pair, ONLY: set_sticky_params + use gb_pair, ONLY: set_gb_pair_params external infoWrapper call infoWrapper(new_atype,init_FF,do_force_loop, &