| File |
Line number |
Procedure |
Code |
|
./pkg/ptracers/PTRACERS_FIELDS.h |
30 |
NO PROCEDURE |
_RL meanSurfCorPTr(PTRACERS_num) |
|
./pkg/ptracers/PTRACERS_FIELDS.h |
31 |
NO PROCEDURE |
COMMON /PTRACERS_SURFCOR_FIELDS/ totSurfCorPTr, meanSurfCorPTr |
|
./pkg/ptracers/ptracers_apply_forcing.F |
110 |
PTRACERS_APPLY_FORCING |
& +meanSurfCorPTr(iTracer)*recip_drF(k) |
|
./pkg/ptracers/ptracers_calc_wsurf_tr.F |
55 |
PTRACERS_CALC_WSURF_TR |
meanSurfCorPTr(iTr) = 0.0 _d 0 |
|
./pkg/ptracers/ptracers_calc_wsurf_tr.F |
88 |
PTRACERS_CALC_WSURF_TR |
meanSurfCorPTr(iTr) = wT_Mean(iTr) / globalArea |
|
./verification/tutorial_global_oce_latlon/code/ptracers_apply_forcing.F |
102 |
PTRACERS_APPLY_FORCING |
& +meanSurfCorPTr(iTracer)*recip_drF(k) |
|
./model/src/thermodynamics.F |
156 |
THERMODYNAMICS |
meanSurfCorPTr(k) = 0.0 _d 0 |