c c======================================================================= c Include file "hydro.h" #ifndef rmdocinc c c This include file contains the storage for the HOPS data format. #endif c======================================================================= c common /ihydro/ axbt,cm,ctd,eof,lhfield,xbt,xbts,xctd,castid,hflag * ,ictd,ihfile,ihour,inphyd,ixbt,ixbts,ixctd,jday, * jdayoff,nhdr,nhobs,nhptmx,nhpts,nhvar,outhyd,staid,ihdat logical axbt,cm,ctd,eof,xbt,xbts,xctd logical lhfield(mhflds) integer castid,hflag,ictd,ihfile,ihour,inphyd,ixbt,ixbts,ixctd, * jday,jdayoff,nhdr,nhobs,nhptmx,nhpts,nhvar,outhyd,staid integer ihdat(mhpts) c common /fhydro/ hdpth,hendday,hlat,hlat_max,hlat_min,hlng, * hlng_max,hlng_min,hspval,hstrday,htime,hdat,hscle FLOAT * hdpth,hendday,hlat,hlat_max,hlat_min,hlng,hlng_max,hlng_min, * hspval,hstrday,htime FLOAT * hdat(mhpts,mhvar),hscle(mhflds) c common /chydro/ header,hflds,htitle,htool,htype,inphnam,outhnam character*5 hflds(mhvar),htool character*20 htype character*60 inphnam,outhnam character*80 header(mhdr),htitle