anchor.diff:  *_______________________________________________________________________
         subroutine volume(cname,qjv)
   *KEEP,HCBOOK.
  -      parameter (nwpaw=1000000)
  +      parameter (nwpaw=2000000)
         common/pawc/paw(nwpaw)
   
         INTEGER   IQ(2), LQ(8000)
  
positive.code: *
  *             Process one node (volume with contents)
  *KEEP,HCBOOK.
        parameter (nwpaw=1000000)
        common/pawc/paw(nwpaw)
  
        INTEGER   IQ(2), LQ(8000)
  
negative.code: *
  **********************************************************************
  
        parameter (nwpaw=2000000)
        common/pawc/paw(nwpaw)
  
        character *80 gname
  