anchor.diff:        end
   c
   c version
  -c $Id: stress_drv.f,v 1.1 2004/06/23 21:05:21 willic3 Exp $
  +c $Id: stress_drv.f,v 1.2 2004/06/24 21:46:43 willic3 Exp $
   c
   c Generated automatically by Fortran77Mill on Wed May 21 14:15:03 2003
   c
  
positive.code:      &     nconsz,                                                      ! elemnt
       &     infmat(1,imat),matgpt,elas_strs_5,                           ! materl
       &     gauss,sh,shj,infetype,                                       ! eltype
       &     skew,numrot,                                                 ! skew
       &     getshape,bmatrix,                                            ! bbar
       &     ierr,errstrng)                                               ! errcode
  
negative.code:      &     nconsz,                                                      ! elemnt
       &     infmat(1,imat),matgpt,elas_strs_11,                          ! materl
       &     gauss,sh,shj,infetype,                                       ! eltype
       &     rtimdat,ntimdat,rgiter,                                      ! timdat
       &     skew,numrot,                                                 ! skew
       &     getshape,bmatrix,                                            ! bbar
       &     ierr,errstrng)                                               ! errcode
  