Symbol Description Uses
endlon3 4


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