| File |
Line number |
Procedure |
Code |
|
./pkg/diagnostics/diagnostics_fill_state.F |
116 |
DIAGNOSTICS_FILL_STATE |
uBarC = 0.5 _d 0 |
|
./pkg/diagnostics/diagnostics_fill_state.F |
120 |
DIAGNOSTICS_FILL_STATE |
tmpU(i,j) = angleCosC(i,j,bi,bj)*uBarC |
|
./pkg/diagnostics/diagnostics_fill_state.F |
122 |
DIAGNOSTICS_FILL_STATE |
tmpV(i,j) = angleSinC(i,j,bi,bj)*uBarC |
|
./pkg/diagnostics/diagnostics_fill_state.F |
54 |
DIAGNOSTICS_FILL_STATE |
_RL tmpFac, uBarC, vBarC |
|
./pkg/ecco/cost_gencost_customize.F |
101 |
COST_GENCOST_CUSTOMIZE |
mertau(i,j,bi,bj) = angleSinC(i,j,bi,bj)*uBarC |
|
./pkg/ecco/cost_gencost_customize.F |
66 |
COST_GENCOST_CUSTOMIZE |
_RL uBarC, vBarC |
|
./pkg/ecco/cost_gencost_customize.F |
95 |
COST_GENCOST_CUSTOMIZE |
uBarC = 0.5 _d 0 |
|
./pkg/ecco/cost_gencost_customize.F |
99 |
COST_GENCOST_CUSTOMIZE |
zontau(i,j,bi,bj) = angleCosC(i,j,bi,bj)*uBarC |