anchor.diff:        end
   c
   c version
  -c $Id: pquadwedge.f,v 1.1 2004/04/14 21:18:30 willic3 Exp $
  +c $Id: pquadwedge.f,v 1.2 2004/07/07 19:56:52 willic3 Exp $
   c
   c Generated automatically by Fortran77Mill on Wed May 21 14:15:03 2003
   c
  
positive.code: c
        nen=15
        ngauss=itwo
        do l=1,ngauss
          gauss(1,l)=third
          gauss(2,l)=third
  
negative.code: c
  c...  local variables
  c
        integer nen,ngauss,nec,nee,i,l,nshsize,ngssize
        double precision t(6),h(3),dt(6,2),dh(3)
        double precision rr,ss,tt,uu,g1,w1
        double precision trivol
  