| File |
Line number |
Procedure |
Code |
|
./pkg/ecco/cost_obcs_ageos.F |
162 |
COST_OBCS_AGEOS |
yzdvel2(j,k,bi,bj) = 0. _d 0 |
|
./pkg/ecco/cost_obcs_ageos.F |
378 |
COST_OBCS_AGEOS |
yzdvel2(j,k,bi,bj) =((yzgrdrho(j,k ,bi,bj)*delz(k)/2.)+ |
|
./pkg/ecco/cost_obcs_ageos.F |
385 |
COST_OBCS_AGEOS |
& (yzdvel2(j,k,bi,bj) - yzdvel1(j,k,bi,bj))* |
|
./pkg/ecco/cost_obcs_ageos.F |
386 |
COST_OBCS_AGEOS |
& (yzdvel2(j,k,bi,bj) - yzdvel1(j,k,bi,bj)) |
|
./pkg/ecco/cost_obcs_ageos.F |
437 |
COST_OBCS_AGEOS |
yzdvel2(j,k,bi,bj) =((yzgrdrho(j,k ,bi,bj)*delz(k)/2.)+ |
|
./pkg/ecco/cost_obcs_ageos.F |
444 |
COST_OBCS_AGEOS |
& (yzdvel2(j,k,bi,bj) - yzdvel1(j,k,bi,bj))* |
|
./pkg/ecco/cost_obcs_ageos.F |
445 |
COST_OBCS_AGEOS |
& (yzdvel2(j,k,bi,bj) - yzdvel1(j,k,bi,bj)) |
|
./pkg/ecco/cost_obcs_ageos.F |
79 |
COST_OBCS_AGEOS |
_RL yzdvel2 (1-oly:sny+oly,nr,nsx,nsy) |