anchor.diff:  c
   c...  local variables
   c
  -      integer matgpt,imat,matmodel,nmatel,nprop,indprop
  +      integer matgpt,imat,matmodel,nmatel,nstate,nprop,indprop
         logical matchg
         double precision ptmp(100)
   c
  
positive.code:      &     tfault,numfn,                                                ! fault
       &     state,dstate,dmat,ien,lm,lmx,lmf,infiel,nstatesz,ndmatsz,    ! elemnt
       &     numelt,nconsz,                                               ! elemnt
       &     ptmp,infmat(1,imat),nprop,matgpt,elas_strs_9,td_strs_9,      ! materl
       &     gauss,sh,shj,infetype,                                       ! eltype
       &     rtimdat,ntimdat,rgiter,                                      ! timdat
       &     skew,numrot,                                                 ! skew
  
negative.code:      &     tfault,numfn,                                                ! fault
       &     state,dstate,dmat,ien,lm,lmx,lmf,infiel,nstatesz,ndmatsz,    ! elemnt
       &     numelt,nconsz,                                               ! elemnt
       &     ptmp,nmatel,nstate,nprop,matgpt,elas_strs_17,td_strs_17,     ! materl
       &     gauss,sh,shj,infetype,                                       ! eltype
       &     rtimdat,ntimdat,rgiter,                                      ! timdat
       &     skew,numrot,                                                 ! skew
  