anchor.diff:  c
         integer nmatel,nstate,ind,iel,indien,ietype,indstate,inddmat
         integer ngauss,nen,nee,l,indstateg,inddmatg,imatvar,ngtest
  -      integer ngaussdim
  +      integer ngaussdim,incstate
         double precision dl(60),xl(60),scur(162),ee(162),p(60),det(27)
   c
   c...  included variable definitions
  
positive.code:         ngauss=infetype(1,ietype)
          nen=infetype(2,ietype)
          nee=infetype(4,ietype)
  c
  c...  localize coordinates and displacements
  c
  
negative.code:       end
  c
  c version
  c $Id: td_strs_mat_cmp_ss.f,v 1.2 2004/07/02 18:40:39 willic3 Exp $
  c
  c Generated automatically by Fortran77Mill on Wed May 21 14:15:03 2003
  c
  