| 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 |
58 |
MON_SURFCOR |
_RL tileArea(nSx,nSy) |
|
./pkg/monitor/mon_surfcor.F |
77 |
MON_SURFCOR |
tileArea(bi,bj) = 0. |
|
./pkg/monitor/mon_surfcor.F |
87 |
MON_SURFCOR |
tileArea(bi,bj) = tileArea(bi,bj) |
|
./pkg/monitor/mon_vort3.F |
293 |
MON_VORT3 |
tileArea(bi,bj) = tileArea(bi,bj) + tmpAre |
|
./pkg/monitor/mon_vort3.F |
330 |
MON_VORT3 |
CALL GLOBAL_SUM_TILE_RL( tileArea, theArea, myThid ) |
|
./pkg/monitor/mon_vort3.F |
40 |
MON_VORT3 |
_RL tileArea(nSx,nSy) |
|
./pkg/monitor/mon_vort3.F |
73 |
MON_VORT3 |
tileArea(bi,bj)= 0. _d 0 |
|
./pkg/obcs/obcs_balance_flow.F |
103 |
OBCS_BALANCE_FLOW |
tileArea(bi,bj) = tileArea(bi,bj) + tmpA |
|
./pkg/obcs/obcs_balance_flow.F |
111 |
OBCS_BALANCE_FLOW |
& + tileArea(bi,bj)*OBCS_balanceFacE |
|
./pkg/obcs/obcs_balance_flow.F |
113 |
OBCS_BALANCE_FLOW |
areaE = areaE + tileArea(bi,bj) |
|
./pkg/obcs/obcs_balance_flow.F |
121 |
OBCS_BALANCE_FLOW |
CALL GLOBAL_SUM_TILE_RL( tileArea, areaE, myThid ) |
|
./pkg/obcs/obcs_balance_flow.F |
141 |
OBCS_BALANCE_FLOW |
tileArea(bi,bj) = 0. |
|
./pkg/obcs/obcs_balance_flow.F |
152 |
OBCS_BALANCE_FLOW |
tileArea(bi,bj) = tileArea(bi,bj) + tmpA |
|
./pkg/obcs/obcs_balance_flow.F |
160 |
OBCS_BALANCE_FLOW |
& + tileArea(bi,bj)*OBCS_balanceFacW |
|
./pkg/obcs/obcs_balance_flow.F |
162 |
OBCS_BALANCE_FLOW |
areaW = areaW + tileArea(bi,bj) |
|
./pkg/obcs/obcs_balance_flow.F |
170 |
OBCS_BALANCE_FLOW |
CALL GLOBAL_SUM_TILE_RL( tileArea, areaW, myThid ) |
|
./pkg/obcs/obcs_balance_flow.F |
190 |
OBCS_BALANCE_FLOW |
tileArea(bi,bj) = 0. |
|
./pkg/obcs/obcs_balance_flow.F |
201 |
OBCS_BALANCE_FLOW |
tileArea(bi,bj) = tileArea(bi,bj) + tmpA |
|
./pkg/obcs/obcs_balance_flow.F |
209 |
OBCS_BALANCE_FLOW |
& + tileArea(bi,bj)*OBCS_balanceFacN |
|
./pkg/obcs/obcs_balance_flow.F |
211 |
OBCS_BALANCE_FLOW |
areaN = areaN + tileArea(bi,bj) |
|
./pkg/obcs/obcs_balance_flow.F |
219 |
OBCS_BALANCE_FLOW |
CALL GLOBAL_SUM_TILE_RL( tileArea, areaN, myThid ) |
|
./pkg/obcs/obcs_balance_flow.F |
239 |
OBCS_BALANCE_FLOW |
tileArea(bi,bj) = 0. |
|
./pkg/obcs/obcs_balance_flow.F |
250 |
OBCS_BALANCE_FLOW |
tileArea(bi,bj) = tileArea(bi,bj) + tmpA |
|
./pkg/obcs/obcs_balance_flow.F |
258 |
OBCS_BALANCE_FLOW |
& + tileArea(bi,bj)*OBCS_balanceFacS |
|
./pkg/obcs/obcs_balance_flow.F |
260 |
OBCS_BALANCE_FLOW |
areaS = areaS + tileArea(bi,bj) |
|
./pkg/obcs/obcs_balance_flow.F |
268 |
OBCS_BALANCE_FLOW |
CALL GLOBAL_SUM_TILE_RL( tileArea, areaS, myThid ) |
|
./pkg/obcs/obcs_balance_flow.F |
52 |
OBCS_BALANCE_FLOW |
_RL tileArea(nSx,nSy) |
|
./pkg/obcs/obcs_balance_flow.F |
92 |
OBCS_BALANCE_FLOW |
tileArea(bi,bj) = 0. |
|
./pkg/obcs/obcs_mon_stats.F |
105 |
OBCS_MON_STATS_EW_RL |
tileArea(bi,bj) = 0. |
|
./pkg/obcs/obcs_mon_stats.F |
131 |
OBCS_MON_STATS_EW_RL |
tileArea(bi,bj) = tileArea(bi,bj) + tmpA |
|
./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 |
177 |
OBCS_MON_STATS_EW_RL |
tileArea(bi,bj) = 0. |
|
./pkg/obcs/obcs_mon_stats.F |
204 |
OBCS_MON_STATS_EW_RL |
tileArea(bi,bj) = tileArea(bi,bj) + tmpA |
|
./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 |
318 |
OBCS_MON_STATS_NS_RL |
_RL tileArea(nSx,nSy) |
|
./pkg/obcs/obcs_mon_stats.F |
337 |
OBCS_MON_STATS_NS_RL |
tileArea(bi,bj) = 0. |
|
./pkg/obcs/obcs_mon_stats.F |
363 |
OBCS_MON_STATS_NS_RL |
tileArea(bi,bj) = tileArea(bi,bj) + tmpA |
|
./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 |
409 |
OBCS_MON_STATS_NS_RL |
tileArea(bi,bj) = 0. |
|
./pkg/obcs/obcs_mon_stats.F |
436 |
OBCS_MON_STATS_NS_RL |
tileArea(bi,bj) = tileArea(bi,bj) + tmpA |
|
./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 |
86 |
OBCS_MON_STATS_EW_RL |
_RL tileArea(nSx,nSy) |
|
./model/src/ini_global_domain.F |
102 |
INI_GLOBAL_DOMAIN |
IF ( tileArea(bi,bj).EQ.0. _d 0 ) THEN |
|
./model/src/ini_global_domain.F |
42 |
INI_GLOBAL_DOMAIN |
_RL tileArea(nSx,nSy), threadArea |
|
./model/src/ini_global_domain.F |
44 |
INI_GLOBAL_DOMAIN |
COMMON / LOCAL_INI_GLOB_DOMAIN / tileArea |
|
./model/src/ini_global_domain.F |
80 |
INI_GLOBAL_DOMAIN |
tileArea(bi,bj) = 0. _d 0 |
|
./model/src/ini_global_domain.F |
83 |
INI_GLOBAL_DOMAIN |
tileArea(bi,bj) = tileArea(bi,bj) |
|
./model/src/ini_global_domain.F |
94 |
INI_GLOBAL_DOMAIN |
CALL GLOBAL_SUM_TILE_RL( tileArea, threadArea, myThid ) |