Symbol Description Uses
beglon 7



File Line number Procedure Code
./pkg/ecco/cost_atlantic.F 155 COST_ATLANTIC
     $                  xc(i,j,bi,bj).ge.beglon.and.
./pkg/ecco/cost_atlantic.F 202 COST_ATLANTIC
     $                  xc(i,j,bi,bj).ge.beglon.and.
./pkg/ecco/cost_atlantic.F 84 COST_ATLANTIC
      _RL ylat,beglon,endlon
./pkg/ecco/cost_atlantic.F 88 COST_ATLANTIC
      parameter(ylat= 29., beglon=282., endlon =352.)
./pkg/ecco/cost_trans_merid.F 202 COST_TRANS_MERID
     $                   xc(i,j,bi,bj) .ge. beglon(isect) .and.
./pkg/ecco/cost_trans_merid.F 80 COST_TRANS_MERID
      _RL ylat(nsect),beglon(nsect),endlon(nsect)
./pkg/ecco/cost_trans_merid.F 96 COST_TRANS_MERID
      DATA beglon / 279.5, 307.5, 317.0, 280.5,  30.0,  32.0,  38.0,