c c======================================================================= c Include file "voldat.h" c======================================================================= c #ifndef rmdocinc c Volume data used when Shapiro filter is activated. c c BKEEP storage array for slab alignment. c XT tracer fields at TAU+1 time level. # if defined pressbias & defined shapiro & defined shapmean c XT0 storage array for removing "bias" from tracer fields # endif c XU zonal internal mode velocity at TAU+1 time level. c XV meridional internal mode velocity at TAU+1 time level. c c======================================================================= c #endif common /voldat/ xt,xu,xv,bkeep #if defined pressbias & defined shapiro & defined shapmean * ,xt0 #endif FLOAT * xt(nwds,km,nt),xu(nwds,km),xv(nwds,km),bkeep(nwds,lbc) #if defined pressbias & defined shapiro & defined shapmean * ,xt0(imt,jmt,km,nt) #endif