anchor.diff:        end
   c
   c version
  -c $Id: sort_elements.f,v 1.1 2005/04/13 00:23:53 willic3 Exp $
  +c $Id: sort_elements.f,v 1.2 2005/04/14 00:55:02 willic3 Exp $
   c
   c Generated automatically by Fortran77Mill on Wed May 21 14:15:03 2003
   c
  
positive.code: c
        subroutine sort_elements(ien,mat,infmatmod,ivflist,ivfamily,iens,
       & ivftmp,indxiel,nen,ngauss,maxvfamilies,nvfamilies,nprestrflag,
       & numelv,numnp,nstatesz,nstatesz0,npropsz,kr,ifile,ierr,errstrng)
  c
  c      This routine sorts elements into element families and determines
  c      several sizes.
  
negative.code: c                          prestresses are being used.
  c        numelv:           Total number of volume elements.
  c        numnp:            Total number of nodes.
  c        ien(nen,numelv):  Initial (unsorted) element node array.
  c                          This array may be deleted after use.
  c        mat(numelv):      Material type of each element.
  