| File |
Line number |
Procedure |
Code |
|
./pkg/monitor/mon_surfcor.F |
178 |
MON_SURFCOR |
CALL GLOBAL_SUM_TILE_RL( tileArea, theArea, myThid ) |
|
./pkg/monitor/mon_surfcor.F |
57 |
MON_SURFCOR |
_RL tileArea(nSx,nSy) |
|
./pkg/monitor/mon_surfcor.F |
75 |
MON_SURFCOR |
tileArea(bi,bj) = 0. |
|
./pkg/monitor/mon_surfcor.F |
85 |
MON_SURFCOR |
tileArea(bi,bj) = tileArea(bi,bj) + rA(i,j,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 |
|
./model/src/ini_linear_phisurf.F |
101 |
INI_LINEAR_PHISURF |
CALL GLOBAL_SUM_TILE_RL( tileArea, threadArea, myThid ) |
|
./model/src/ini_linear_phisurf.F |
109 |
INI_LINEAR_PHISURF |
IF ( tileArea(bi,bj).EQ.0. _d 0 ) THEN |
|
./model/src/ini_linear_phisurf.F |
47 |
INI_LINEAR_PHISURF |
_RL tileArea(nSx,nSy), threadArea |
|
./model/src/ini_linear_phisurf.F |
49 |
INI_LINEAR_PHISURF |
COMMON / LOCAL_INI_PHISURF / tileArea |
|
./model/src/ini_linear_phisurf.F |
86 |
INI_LINEAR_PHISURF |
tileArea(bi,bj) = 0. _d 0 |
|
./model/src/ini_linear_phisurf.F |
89 |
INI_LINEAR_PHISURF |
tileArea(bi,bj) = tileArea(bi,bj) |