| File |
Line number |
Procedure |
Code |
|
./pkg/ecco/cost_atlantic.F |
161 |
COST_ATLANTIC |
$ (yc(i,j,bi,bj) .ge.ylat3 .and. |
|
./pkg/ecco/cost_atlantic.F |
162 |
COST_ATLANTIC |
$ yc(i,j,bi,bj).lt.ylat3+del_y.and. |
|
./pkg/ecco/cost_atlantic.F |
208 |
COST_ATLANTIC |
$ (yc(i,j,bi,bj) .ge.ylat3 .and. |
|
./pkg/ecco/cost_atlantic.F |
209 |
COST_ATLANTIC |
$ yc(i,j,bi,bj).lt.ylat3+del_y.and. |
|
./pkg/ecco/cost_atlantic.F |
86 |
COST_ATLANTIC |
_RL ylat3,beglon3,endlon3 |
|
./pkg/ecco/cost_atlantic.F |
92 |
COST_ATLANTIC |
parameter(ylat3= 63.8,beglon3=-98.5,endlon3 =-80.0) |