File |
Line number |
Procedure |
Code |
./model/src/calc_wsurf_tr.F |
100 |
CALC_WSURF_TR |
TsurfCor = wT_Mean / globalArea |
./model/src/calc_wsurf_tr.F |
51 |
CALC_WSURF_TR |
_RL wT_Mean, wS_Mean |
./model/src/calc_wsurf_tr.F |
61 |
CALC_WSURF_TR |
wT_Mean = 0. |
./model/src/calc_wsurf_tr.F |
94 |
CALC_WSURF_TR |
CALL GLOBAL_SUM_TILE_RL( wT_Tile, wT_Mean, myThid ) |
./pkg/monitor/mon_surfcor.F |
178 |
MON_SURFCOR |
CALL GLOBAL_SUM_TILE_RL( tile_wT , wT_Mean, myThid ) |
./pkg/monitor/mon_surfcor.F |
185 |
MON_SURFCOR |
wT_Mean = wT_Mean / theArea |
./pkg/monitor/mon_surfcor.F |
196 |
MON_SURFCOR |
CALL MON_OUT_RL( '_theta', wT_Mean, mon_foot_mean ,myThid) |
./pkg/monitor/mon_surfcor.F |
55 |
MON_SURFCOR |
_RL theArea, wT_Mean, wS_Mean |
./pkg/monitor/mon_surfcor.F |
71 |
MON_SURFCOR |
wT_Mean = 0. |
./pkg/ptracers/ptracers_calc_wsurf_tr.F |
49 |
PTRACERS_CALC_WSURF_TR |
_RL wT_Mean(PTRACERS_num) |
./pkg/ptracers/ptracers_calc_wsurf_tr.F |
80 |
PTRACERS_CALC_WSURF_TR |
CALL GLOBAL_SUM_TILE_RL( wT_Tile(1,1,itr), wT_Mean(iTr), |
./pkg/ptracers/ptracers_calc_wsurf_tr.F |
82 |
PTRACERS_CALC_WSURF_TR |
totSurfCorPTr(iTr) = wT_Mean(iTr) |
./pkg/ptracers/ptracers_calc_wsurf_tr.F |
88 |
PTRACERS_CALC_WSURF_TR |
meanSurfCorPTr(iTr) = wT_Mean(iTr) / globalArea |