anchor.diff:        end
   c
   c version
  -c $Id: formdf_ss.f,v 1.8 2005/03/21 19:12:43 willic3 Exp $
  +c $Id: formdf_ss.f,v 1.9 2005/03/21 19:30:32 willic3 Exp $
   c
   c Generated automatically by Fortran77Mill on Wed May 21 14:15:03 2003
   c
  
positive.code: c
        do ifam=1,nvfamilies
          nelfamily=ivfamily(1,ifam)
          matmodel=ivfamily(2,ifam)
          do ielf=1,nelfamily
            ielg=ielg+ione
  c
  
negative.code: c
  c...  local variables
  c
        integer ifam,nelfamily,ielf,ielg,i
        double precision p(60),dld(60)
  cdebug      integer idb
  c
  