File |
Line number |
Procedure |
Code |
./pkg/monitor/mon_surfcor.F |
177 |
MON_SURFCOR |
CALL GLOBAL_SUM_TILE_RL( tileArea, theArea, myThid ) |
./pkg/monitor/mon_surfcor.F |
184 |
MON_SURFCOR |
IF (theArea.GT.0.) THEN |
./pkg/monitor/mon_surfcor.F |
185 |
MON_SURFCOR |
wT_Mean = wT_Mean / theArea |
./pkg/monitor/mon_surfcor.F |
186 |
MON_SURFCOR |
wS_Mean = wS_Mean / theArea |
./pkg/monitor/mon_surfcor.F |
187 |
MON_SURFCOR |
wT_Heat = wT_Heat / theArea |
./pkg/monitor/mon_surfcor.F |
188 |
MON_SURFCOR |
theta2PE = theta2PE / theArea |
./pkg/monitor/mon_surfcor.F |
55 |
MON_SURFCOR |
_RL theArea, wT_Mean, wS_Mean |
./pkg/monitor/mon_surfcor.F |
70 |
MON_SURFCOR |
theArea = 0. |
./pkg/monitor/mon_vort3.F |
330 |
MON_VORT3 |
CALL GLOBAL_SUM_TILE_RL( tileArea, theArea, myThid ) |
./pkg/monitor/mon_vort3.F |
336 |
MON_VORT3 |
IF (theArea.GT.0.) THEN |
./pkg/monitor/mon_vort3.F |
337 |
MON_VORT3 |
theMean= theMean/theArea |
./pkg/monitor/mon_vort3.F |
338 |
MON_VORT3 |
theVar = theVar /theArea |
./pkg/monitor/mon_vort3.F |
37 |
MON_VORT3 |
_RL theVol, theArea, tmpVal, tmpAre, tmpVol |
./pkg/monitor/mon_vort3.F |
62 |
MON_VORT3 |
theArea= 0. _d 0 |
./pkg/obcs/obcs_mon_stats.F |
100 |
OBCS_MON_STATS_EW_RL |
theArea= 0. |
./pkg/obcs/obcs_mon_stats.F |
140 |
OBCS_MON_STATS_EW_RL |
CALL GLOBAL_SUM_TILE_RL( tileArea, theArea, myThid ) |
./pkg/obcs/obcs_mon_stats.F |
142 |
OBCS_MON_STATS_EW_RL |
IF ( theArea.GT.0. ) THEN |
./pkg/obcs/obcs_mon_stats.F |
145 |
OBCS_MON_STATS_EW_RL |
arrStats(0,1) = theArea |
./pkg/obcs/obcs_mon_stats.F |
149 |
OBCS_MON_STATS_EW_RL |
theMean = theMean/theArea |
./pkg/obcs/obcs_mon_stats.F |
172 |
OBCS_MON_STATS_EW_RL |
theArea= 0. |
./pkg/obcs/obcs_mon_stats.F |
213 |
OBCS_MON_STATS_EW_RL |
CALL GLOBAL_SUM_TILE_RL( tileArea, theArea, myThid ) |
./pkg/obcs/obcs_mon_stats.F |
215 |
OBCS_MON_STATS_EW_RL |
IF ( theArea.GT.0. ) THEN |
./pkg/obcs/obcs_mon_stats.F |
218 |
OBCS_MON_STATS_EW_RL |
arrStats(0,2) = theArea |
./pkg/obcs/obcs_mon_stats.F |
222 |
OBCS_MON_STATS_EW_RL |
theMean = theMean/theArea |
./pkg/obcs/obcs_mon_stats.F |
317 |
OBCS_MON_STATS_NS_RL |
_RL theMin, theMax, theArea, theMean, theVar |
./pkg/obcs/obcs_mon_stats.F |
332 |
OBCS_MON_STATS_NS_RL |
theArea= 0. |
./pkg/obcs/obcs_mon_stats.F |
372 |
OBCS_MON_STATS_NS_RL |
CALL GLOBAL_SUM_TILE_RL( tileArea, theArea, myThid ) |
./pkg/obcs/obcs_mon_stats.F |
374 |
OBCS_MON_STATS_NS_RL |
IF ( theArea.GT.0. ) THEN |
./pkg/obcs/obcs_mon_stats.F |
377 |
OBCS_MON_STATS_NS_RL |
arrStats(0,1) = theArea |
./pkg/obcs/obcs_mon_stats.F |
381 |
OBCS_MON_STATS_NS_RL |
theMean = theMean/theArea |
./pkg/obcs/obcs_mon_stats.F |
404 |
OBCS_MON_STATS_NS_RL |
theArea= 0. |
./pkg/obcs/obcs_mon_stats.F |
445 |
OBCS_MON_STATS_NS_RL |
CALL GLOBAL_SUM_TILE_RL( tileArea, theArea, myThid ) |
./pkg/obcs/obcs_mon_stats.F |
447 |
OBCS_MON_STATS_NS_RL |
IF ( theArea.GT.0. ) THEN |
./pkg/obcs/obcs_mon_stats.F |
450 |
OBCS_MON_STATS_NS_RL |
arrStats(0,2) = theArea |
./pkg/obcs/obcs_mon_stats.F |
454 |
OBCS_MON_STATS_NS_RL |
theMean = theMean/theArea |
./pkg/obcs/obcs_mon_stats.F |
85 |
OBCS_MON_STATS_EW_RL |
_RL theMin, theMax, theArea, theMean, theVar |