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

Comparing trunk/OOPSE_old/src/mdtools/libmdCode/atype_module.F90 (file contents):
Revision 327 by gezelter, Wed Mar 12 19:59:20 2003 UTC vs.
Revision 332 by gezelter, Thu Mar 13 15:28:43 2003 UTC

# Line 72 | Line 72 | contains
72      if (l_is_Sticky) then
73         call setElementProperty(atypes, me, "sticky_w0", sticky_w0)
74         call setElementProperty(atypes, me, "sticky_v0", sticky_v0)
75 +       call check_sticky_FF(status)
76 +       if (status .ne. 0) call set_sticky_params(sticky_w0, sticky_v0)
77      endif
78      if (l_is_GB) then
79         call setElementProperty(atypes, me, "GB_sigma", GB_sigma)

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines