common/waves/nw(nbtank),nelw(nbtank),
     1              wk1(nbcoef,nbtrw,nbtank),
     2              wk3(nbcoef,nbtrw,nbtank),
     3              wa(nbcoef,nbtrw,nbtank),
     4              nmin,nmax,wpoff(nbcoef,nbtrw,nbtank),
     5              iroff,izoff