3 CHARACTER*7 chpout,chpvex
6 parameter(nxgrd=80,nygrd=80,nzgrd=16)
7 parameter(nsites=260,nwsite=12,ntsite=12,nwndpt=5)
8 parameter(nsndht=250,nhoriz=30,narray=ntsite*nzgrd)
10 LOGICAL dbug,dbug2,domq,dobin,doflat
11 LOGICAL dopres,dobri,dobvpd,doobs,dowvsz,dowcmp,dothet
13 COMMON /buggsy/ ds,dbug,dbug2,domq,dobin,doflat,
14 $ dowvsz,dowcmp,dothet,dopres,dobri,dobvpd,doobs,
15 $ npfyls,nskip,nrytx,nryty,nascx0,nascy0,
16 $ chpath,chpout,chmesh,chpvex