Symbol Description Uses
endlon3 4


File Line number Procedure Code
./pkg/ecco/cost_atlantic.F 153 COST_ATLANTIC 
     $                  xc(i,j,bi,bj).le.endlon3)) then
./pkg/ecco/cost_atlantic.F 196 COST_ATLANTIC 
     $                  xc(i,j,bi,bj).le.endlon3)) then
./pkg/ecco/cost_atlantic.F 79 COST_ATLANTIC 
      _RL ylat3,beglon3,endlon3
./pkg/ecco/cost_atlantic.F 85 COST_ATLANTIC 
      parameter(ylat3= 63.8,beglon3=-98.5,endlon3 =-80.0)