Symbol Description Uses
beglon 7



File Line number Procedure Code
./pkg/ecco/cost_atlantic.F 150 COST_ATLANTIC
     $                  xc(i,j,bi,bj).ge.beglon.and.
./pkg/ecco/cost_atlantic.F 193 COST_ATLANTIC
     $                  xc(i,j,bi,bj).ge.beglon.and.
./pkg/ecco/cost_atlantic.F 81 COST_ATLANTIC
      _RL ylat,beglon,endlon
./pkg/ecco/cost_atlantic.F 87 COST_ATLANTIC
      parameter(ylat= 66.75,beglon=-34.5,endlon =-22.5)
./pkg/ecco/cost_trans_merid.F 199 COST_TRANS_MERID
     $                   xc(i,j,bi,bj) .ge. beglon(isect) .and.
./pkg/ecco/cost_trans_merid.F 77 COST_TRANS_MERID
      _RL ylat(nsect),beglon(nsect),endlon(nsect)
./pkg/ecco/cost_trans_merid.F 93 COST_TRANS_MERID
      DATA beglon / 279.5, 307.5, 317.0, 280.5,  30.0,  32.0,  38.0,