anchor.diff:        end
   c
   c version
  -c $Id: elas_strs_cmp_ss.f,v 1.5 2004/06/24 16:40:52 willic3 Exp $
  +c $Id: elas_strs_cmp_ss.f,v 1.6 2004/06/24 20:09:47 willic3 Exp $
   c
   c Generated automatically by Fortran77Mill on Wed May 21 14:15:03 2003
   c
  
positive.code:       double precision shj(nsd+1,nenmax,ngaussmax,netypes)
        double precision skew(nskdim,numnp)
  c
  c...  intrinsic functions
  c
        intrinsic mod
  
negative.code:       integer nmatel,nstate,ind,iel,indien,ietype,indstate,inddmat
        integer ngauss,nen,nee,l,indstateg,inddmatg
        double precision dl(60),xl(60),scur(162),ee(162),p(60),det(27)
  c
  c...  included variable definitions
  c
        include "rtimdat_def.inc"
        include "rgiter_def.inc"
        include "ntimdat_def.inc"
  c
  cdebug      write(6,*) "Hello from elas_strs_cmp_ss_f!"
  c
  