anchor.diff:       &     tfault,numfn,                                                ! fault
        &     state,dstate,dmat,ien,lm,lmx,lmf,infiel,iddmat,nstatesz,     ! elemnt
        &     ndmatsz,numelt,nconsz,                                       ! elemnt
  -     &     ptmp,infmat(1,imat),nprop,matgpt,elas_strs_2,                ! materl
  +     &     ptmp,nmatel,imatvar,nstate,nprop,matgpt,elas_strs_2,         ! materl
        &     td_strs_mat_2,matchg,                                        ! materl
        &     gauss,sh,shj,infetype,                                       ! eltype
        &     rtimdat,ntimdat,rgiter,                                      ! timdat
  
positive.code:      &     tfault,numfn,                                                ! fault
       &     state,dstate,dmat,ien,lm,lmx,lmf,infiel,iddmat,nstatesz,     ! elemnt
       &     ndmatsz,numelt,nconsz,                                       ! elemnt
       &     ptmp,infmat(1,imat),nprop,matgpt,elas_strs_12,               ! materl
       &     td_strs_mat_12,matchg,                                       ! materl
       &     gauss,sh,shj,infetype,                                       ! eltype
       &     rtimdat,ntimdat,rgiter,                                      ! timdat
  
negative.code:      &     tfault,numfn,                                                ! fault
       &     state,dstate,dmat,ien,lm,lmx,lmf,infiel,iddmat,nstatesz,     ! elemnt
       &     ndmatsz,numelt,nconsz,                                       ! elemnt
       &     ptmp,nmatel,imatvar,nstate,nprop,matgpt,elas_strs_8,         ! materl
       &     td_strs_mat_8,matchg,                                        ! materl
       &     gauss,sh,shj,infetype,                                       ! eltype
       &     rtimdat,ntimdat,rgiter,                                      ! timdat
  