anchor.diff:  c...  subroutine arguments
   c
         integer nen,numelv,numnp,nvfamilies,kr,ierr
  -      integer ien(nen,numelv),mat(numelv),infin(numelv)
  +      integer ien(nen,numelv),mat(numelv)
         character ifile*(*),errstrng*(*)
   c
   c...  local variables
  
positive.code:       end
  c
  c version
  c $Id: read_connect.f,v 1.10 2005/04/12 23:17:42 willic3 Exp $
  c
  c Generated automatically by Fortran77Mill on Wed May 21 14:15:03 2003
  c
  
negative.code: c
  c...  local variables
  c
        integer i,j,n,ietypev,infin
  cdebug      integer idb,jdb
  c
  cdebug      write(6,*) "Hello from read_connect_f!"
  