| File |
Line number |
Procedure |
Code |
|
./model/src/calc_grid_angles.F |
101 |
CALC_GRID_ANGLES |
IF ( tmpVal.GT.0. ) THEN |
|
./model/src/calc_grid_angles.F |
105 |
CALC_GRID_ANGLES |
& )* _dxC(i,j,bi,bj)/tmpVal |
|
./model/src/calc_grid_angles.F |
117 |
CALC_GRID_ANGLES |
tmpVal = _rAs(i,j,bi,bj) * COS( deg2rad* |
|
./model/src/calc_grid_angles.F |
119 |
CALC_GRID_ANGLES |
IF ( tmpVal.GT.0. ) THEN |
|
./model/src/calc_grid_angles.F |
123 |
CALC_GRID_ANGLES |
& )* _dyC(i,j,bi,bj)/tmpVal |
|
./model/src/calc_grid_angles.F |
45 |
CALC_GRID_ANGLES |
_RL uC, vC, uNorm, tmpVal |
|
./model/src/calc_grid_angles.F |
99 |
CALC_GRID_ANGLES |
tmpVal = _rAw(i,j,bi,bj) * COS( deg2rad* |
|
./pkg/monitor/mon_advcfl.F |
34 |
MON_ADVCFL |
_RL tmpVal,theMax |
|
./pkg/monitor/mon_advcfl.F |
43 |
MON_ADVCFL |
tmpVal=abs(U(I,J,K,bi,bj))*rDx(I,J,BI,BJ)*dT |
|
./pkg/monitor/mon_advcfl.F |
44 |
MON_ADVCFL |
theMax=max(theMax,tmpVal) |
|
./pkg/monitor/mon_advcflw.F |
34 |
MON_ADVCFLW |
_RL tmpVal,theMax |
|
./pkg/monitor/mon_advcflw.F |
43 |
MON_ADVCFLW |
tmpVal=abs(W(I,J,K,bi,bj))*rDz(K)*dT |
|
./pkg/monitor/mon_advcflw.F |
44 |
MON_ADVCFLW |
theMax=max(theMax,tmpVal) |
|
./pkg/monitor/mon_advcflw2.F |
36 |
MON_ADVCFLW2 |
_RL tmpVal,theMax |
|
./pkg/monitor/mon_advcflw2.F |
45 |
MON_ADVCFLW2 |
tmpVal=abs(W(I,J,K,bi,bj))*dT |
|
./pkg/monitor/mon_advcflw2.F |
48 |
MON_ADVCFLW2 |
theMax=max(theMax,tmpVal) |
|
./pkg/monitor/mon_calc_advcfl.F |
112 |
MON_CALC_ADVCFL_TILE |
tmpVal = ( |
|
./pkg/monitor/mon_calc_advcfl.F |
116 |
MON_CALC_ADVCFL_TILE |
maxCFL(3) = MAX( maxCFL(3), tmpVal ) |
|
./pkg/monitor/mon_calc_advcfl.F |
58 |
MON_CALC_ADVCFL_TILE |
_RL rTransKp1, tmpVal, recVol_dT |
|
./pkg/monitor/mon_calc_advcfl.F |
89 |
MON_CALC_ADVCFL_TILE |
tmpVal = ( |
|
./pkg/monitor/mon_calc_advcfl.F |
93 |
MON_CALC_ADVCFL_TILE |
maxCFL(1) = MAX( maxCFL(1), tmpVal ) |
|
./pkg/monitor/mon_calc_advcfl.F |
94 |
MON_CALC_ADVCFL_TILE |
tmpVal = ( |
|
./pkg/monitor/mon_calc_advcfl.F |
98 |
MON_CALC_ADVCFL_TILE |
maxCFL(2) = MAX( maxCFL(2), tmpVal ) |
|
./pkg/monitor/mon_calc_stats_rl.F |
105 |
MON_CALC_STATS_RL |
tileMean(bi,bj) = tileMean(bi,bj) + tmpVol*tmpVal |
|
./pkg/monitor/mon_calc_stats_rl.F |
106 |
MON_CALC_STATS_RL |
tileVar (bi,bj) = tileVar (bi,bj) + tmpVol*tmpVal*tmpVal |
|
./pkg/monitor/mon_calc_stats_rl.F |
141 |
MON_CALC_STATS_RL |
tmpVal=arr(i,j,k,bi,bj) |
|
./pkg/monitor/mon_calc_stats_rl.F |
146 |
MON_CALC_STATS_RL |
& + tmpVol*(tmpVal-theMean)*(tmpVal-theMean) |
|
./pkg/monitor/mon_calc_stats_rl.F |
38 |
MON_CALC_STATS_RL |
_RL tmpVal |
|
./pkg/monitor/mon_calc_stats_rl.F |
71 |
MON_CALC_STATS_RL |
tmpVal = arr(i,j,k,bi,bj) |
|
./pkg/monitor/mon_calc_stats_rl.F |
74 |
MON_CALC_STATS_RL |
theMin=tmpVal |
|
./pkg/monitor/mon_calc_stats_rl.F |
75 |
MON_CALC_STATS_RL |
theMax=tmpVal |
|
./pkg/monitor/mon_calc_stats_rl.F |
79 |
MON_CALC_STATS_RL |
theMin = MIN(theMin,tmpVal) |
|
./pkg/monitor/mon_calc_stats_rl.F |
80 |
MON_CALC_STATS_RL |
theMax = MAX(theMax,tmpVal) |
|
./pkg/monitor/mon_calc_stats_rl.F |
92 |
MON_CALC_STATS_RL |
ddx = (arr(i+1,j,k,bi,bj)-tmpVal) |
|
./pkg/monitor/mon_calc_stats_rl.F |
93 |
MON_CALC_STATS_RL |
& + (arr(i-1,j,k,bi,bj)-tmpVal) |
|
./pkg/monitor/mon_calc_stats_rl.F |
97 |
MON_CALC_STATS_RL |
ddy = (arr(i,j+1,k,bi,bj)-tmpVal) |
|
./pkg/monitor/mon_calc_stats_rl.F |
98 |
MON_CALC_STATS_RL |
& + (arr(i,j-1,k,bi,bj)-tmpVal) |
|
./pkg/monitor/mon_calc_stats_rs.F |
105 |
MON_CALC_STATS_RS |
tileMean(bi,bj) = tileMean(bi,bj) + tmpVol*tmpVal |
|
./pkg/monitor/mon_calc_stats_rs.F |
106 |
MON_CALC_STATS_RS |
tileVar (bi,bj) = tileVar (bi,bj) + tmpVol*tmpVal*tmpVal |
|
./pkg/monitor/mon_calc_stats_rs.F |
141 |
MON_CALC_STATS_RS |
tmpVal=arr(i,j,k,bi,bj) |
|
./pkg/monitor/mon_calc_stats_rs.F |
146 |
MON_CALC_STATS_RS |
& + tmpVol*(tmpVal-theMean)*(tmpVal-theMean) |
|
./pkg/monitor/mon_calc_stats_rs.F |
38 |
MON_CALC_STATS_RS |
_RL tmpVal |
|
./pkg/monitor/mon_calc_stats_rs.F |
71 |
MON_CALC_STATS_RS |
tmpVal = arr(i,j,k,bi,bj) |
|
./pkg/monitor/mon_calc_stats_rs.F |
74 |
MON_CALC_STATS_RS |
theMin=tmpVal |
|
./pkg/monitor/mon_calc_stats_rs.F |
75 |
MON_CALC_STATS_RS |
theMax=tmpVal |
|
./pkg/monitor/mon_calc_stats_rs.F |
79 |
MON_CALC_STATS_RS |
theMin = MIN(theMin,tmpVal) |
|
./pkg/monitor/mon_calc_stats_rs.F |
80 |
MON_CALC_STATS_RS |
theMax = MAX(theMax,tmpVal) |
|
./pkg/monitor/mon_calc_stats_rs.F |
92 |
MON_CALC_STATS_RS |
ddx = (arr(i+1,j,k,bi,bj)-tmpVal) |
|
./pkg/monitor/mon_calc_stats_rs.F |
93 |
MON_CALC_STATS_RS |
& + (arr(i-1,j,k,bi,bj)-tmpVal) |
|
./pkg/monitor/mon_calc_stats_rs.F |
97 |
MON_CALC_STATS_RS |
ddy = (arr(i,j+1,k,bi,bj)-tmpVal) |
|
./pkg/monitor/mon_calc_stats_rs.F |
98 |
MON_CALC_STATS_RS |
& + (arr(i,j-1,k,bi,bj)-tmpVal) |
|
./pkg/monitor/mon_ke.F |
107 |
MON_KE |
& + tmpVal*deepFac2C(k)*rhoFacC(k)*drF(k) |
|
./pkg/monitor/mon_ke.F |
108 |
MON_KE |
tmpVal= tmpVal*_recip_hFacC(i,j,k,bi,bj)*recip_rA(i,j,bi,bj) |
|
./pkg/monitor/mon_ke.F |
120 |
MON_KE |
tmpVal = tmpVal |
|
./pkg/monitor/mon_ke.F |
125 |
MON_KE |
theMax=MAX(theMax,tmpVal) |
|
./pkg/monitor/mon_ke.F |
126 |
MON_KE |
IF (tmpVal.NE.0.) THEN |
|
./pkg/monitor/mon_ke.F |
127 |
MON_KE |
tileMean(bi,bj)=tileMean(bi,bj)+tmpVal |
|
./pkg/monitor/mon_ke.F |
137 |
MON_KE |
tmpVal = 0.5 _d 0*Bo_surf(i,j,bi,bj) |
|
./pkg/monitor/mon_ke.F |
141 |
MON_KE |
tmpVal = tmpVal |
|
./pkg/monitor/mon_ke.F |
144 |
MON_KE |
& + tmpVal*rA(i,j,bi,bj)*deepFac2F(1) |
|
./pkg/monitor/mon_ke.F |
195 |
MON_KE |
tmpVal = abFac1*guNm(i,j,k,bi,bj,m1) |
|
./pkg/monitor/mon_ke.F |
198 |
MON_KE |
tmpVal = abFac1*guNm1(i,j,k,bi,bj) |
|
./pkg/monitor/mon_ke.F |
200 |
MON_KE |
tmpVal = tmpVal*deltaTMom + uVel(i,j,k,bi,bj) |
|
./pkg/monitor/mon_ke.F |
202 |
MON_KE |
& + R_drK*tmpVal*_hFacW(i,j,k,bi,bj) |
|
./pkg/monitor/mon_ke.F |
234 |
MON_KE |
tmpVal = abFac1*gvNm(i,j,k,bi,bj,m1) |
|
./pkg/monitor/mon_ke.F |
237 |
MON_KE |
tmpVal = abFac1*gvNm1(i,j,k,bi,bj) |
|
./pkg/monitor/mon_ke.F |
239 |
MON_KE |
tmpVal = tmpVal*deltaTMom + vVel(i,j,k,bi,bj) |
|
./pkg/monitor/mon_ke.F |
241 |
MON_KE |
& + R_drK*tmpVal*_hFacS(i,j,k,bi,bj) |
|
./pkg/monitor/mon_ke.F |
36 |
MON_KE |
_RL numPnts,theVol,tmpVal, mskp1, msk_1 |
|
./pkg/monitor/mon_ke.F |
96 |
MON_KE |
tmpVal=0.25*( |
|
./pkg/monitor/mon_stats_latbnd_rl.F |
103 |
MON_STATS_LATBND_RL |
tmpVal=arr(i,j,k,bi,bj) |
|
./pkg/monitor/mon_stats_latbnd_rl.F |
105 |
MON_STATS_LATBND_RL |
theMin(n)=tmpVal |
|
./pkg/monitor/mon_stats_latbnd_rl.F |
106 |
MON_STATS_LATBND_RL |
theMax(n)=tmpVal |
|
./pkg/monitor/mon_stats_latbnd_rl.F |
110 |
MON_STATS_LATBND_RL |
theMin(n)=MIN(theMin(n),tmpVal) |
|
./pkg/monitor/mon_stats_latbnd_rl.F |
111 |
MON_STATS_LATBND_RL |
theMax(n)=MAX(theMax(n),tmpVal) |
|
./pkg/monitor/mon_stats_latbnd_rl.F |
115 |
MON_STATS_LATBND_RL |
tileMean(bi,bj,n) = tileMean(bi,bj,n) + tmpVol*tmpVal |
|
./pkg/monitor/mon_stats_latbnd_rl.F |
116 |
MON_STATS_LATBND_RL |
tileVar (bi,bj,n) = tileVar (bi,bj,n) + tmpVol*tmpVal*tmpVal |
|
./pkg/monitor/mon_stats_latbnd_rl.F |
54 |
MON_STATS_LATBND_RL |
_RL tmpVal |
|
./pkg/monitor/mon_stats_rl.F |
111 |
MON_STATS_RL |
tmpVal=FLOAT(numPnts) |
|
./pkg/monitor/mon_stats_rl.F |
112 |
MON_STATS_RL |
_GLOBAL_SUM_RL(tmpVal,myThid) |
|
./pkg/monitor/mon_stats_rl.F |
113 |
MON_STATS_RL |
numPnts=NINT(tmpVal) |
|
./pkg/monitor/mon_stats_rl.F |
115 |
MON_STATS_RL |
IF (tmpVal.GT.0.) THEN |
|
./pkg/monitor/mon_stats_rl.F |
116 |
MON_STATS_RL |
rNumPnts=1. _d 0/tmpVal |
|
./pkg/monitor/mon_stats_rl.F |
136 |
MON_STATS_RL |
tmpVal=arr(I,J,K,bi,bj) |
|
./pkg/monitor/mon_stats_rl.F |
141 |
MON_STATS_RL |
& + tmpVol*(tmpVal-theMean)*(tmpVal-theMean) |
|
./pkg/monitor/mon_stats_rl.F |
38 |
MON_STATS_RL |
_RL tmpVal,rNumPnts |
|
./pkg/monitor/mon_stats_rl.F |
70 |
MON_STATS_RL |
tmpVal=arr(I,J,K,bi,bj) |
|
./pkg/monitor/mon_stats_rl.F |
72 |
MON_STATS_RL |
theMin=tmpVal |
|
./pkg/monitor/mon_stats_rl.F |
73 |
MON_STATS_RL |
theMax=tmpVal |
|
./pkg/monitor/mon_stats_rl.F |
77 |
MON_STATS_RL |
theMin=min(theMin,tmpVal) |
|
./pkg/monitor/mon_stats_rl.F |
78 |
MON_STATS_RL |
theMax=max(theMax,tmpVal) |
|
./pkg/monitor/mon_stats_rl.F |
81 |
MON_STATS_RL |
& (arr(I+1,J,K,bi,bj)-tmpVal)*arrMask(I+1,J,K,bi,bj) |
|
./pkg/monitor/mon_stats_rl.F |
82 |
MON_STATS_RL |
& +(arr(I-1,J,K,bi,bj)-tmpVal)*arrMask(I-1,J,K,bi,bj) |
|
./pkg/monitor/mon_stats_rl.F |
83 |
MON_STATS_RL |
& +(arr(I,J+1,K,bi,bj)-tmpVal)*arrMask(I,J+1,K,bi,bj) |
|
./pkg/monitor/mon_stats_rl.F |
84 |
MON_STATS_RL |
& +(arr(I,J-1,K,bi,bj)-tmpVal)*arrMask(I,J-1,K,bi,bj) |
|
./pkg/monitor/mon_stats_rl.F |
90 |
MON_STATS_RL |
tileMean(bi,bj) = tileMean(bi,bj) + tmpVol*tmpVal |
|
./pkg/monitor/mon_stats_rl.F |
91 |
MON_STATS_RL |
tileVar (bi,bj) = tileVar (bi,bj) + tmpVol*tmpVal*tmpVal |
|
./pkg/monitor/mon_stats_rs.F |
103 |
MON_STATS_RS |
tmpVal=arr(I,J,K,bi,bj) |
|
./pkg/monitor/mon_stats_rs.F |
106 |
MON_STATS_RS |
& + (tmpVal-theMean)*(tmpVal-theMean) |
|
./pkg/monitor/mon_stats_rs.F |
35 |
MON_STATS_RS |
_RL tmpVal,rNumPnts |
|
./pkg/monitor/mon_stats_rs.F |
56 |
MON_STATS_RS |
tmpVal=arr(I,J,K,bi,bj) |
|
./pkg/monitor/mon_stats_rs.F |
59 |
MON_STATS_RS |
theMin = tmpVal |
|
./pkg/monitor/mon_stats_rs.F |
60 |
MON_STATS_RS |
theMax = tmpVal |
|
./pkg/monitor/mon_stats_rs.F |
64 |
MON_STATS_RS |
theMin = MIN(theMin,tmpVal) |
|
./pkg/monitor/mon_stats_rs.F |
65 |
MON_STATS_RS |
theMax = MAX(theMax,tmpVal) |
|
./pkg/monitor/mon_stats_rs.F |
66 |
MON_STATS_RS |
tileMean(bi,bj)=tileMean(bi,bj)+tmpVal |
|
./pkg/monitor/mon_stats_rs.F |
67 |
MON_STATS_RS |
tileVar (bi,bj)=tileVar (bi,bj)+tmpVal*tmpVal |
|
./pkg/monitor/mon_stats_rs.F |
82 |
MON_STATS_RS |
tmpVal=FLOAT(numPnts) |
|
./pkg/monitor/mon_stats_rs.F |
83 |
MON_STATS_RS |
_GLOBAL_SUM_RL(tmpVal,myThid) |
|
./pkg/monitor/mon_stats_rs.F |
84 |
MON_STATS_RS |
numPnts=NINT(tmpVal) |
|
./pkg/monitor/mon_stats_rs.F |
86 |
MON_STATS_RS |
IF (tmpVal.GT.0.) THEN |
|
./pkg/monitor/mon_stats_rs.F |
87 |
MON_STATS_RS |
rNumPnts=1. _d 0/tmpVal |
|
./pkg/monitor/mon_surfcor.F |
110 |
MON_SURFCOR |
tmpVal = salt(i,j,ks,bi,bj) |
|
./pkg/monitor/mon_surfcor.F |
115 |
MON_SURFCOR |
& *wVel(i,j,ks,bi,bj)*tmpVal |
|
./pkg/monitor/mon_surfcor.F |
156 |
MON_SURFCOR |
tmpVal = rStarDhCDt(i,j,bi,bj)*theta(i,j,k,bi,bj) |
|
./pkg/monitor/mon_surfcor.F |
157 |
MON_SURFCOR |
vT_Mean = vT_Mean + tmpVol*tmpVal |
|
./pkg/monitor/mon_surfcor.F |
162 |
MON_SURFCOR |
& + tmpVol*tmpVal*conv_th2Heat |
|
./pkg/monitor/mon_surfcor.F |
57 |
MON_SURFCOR |
_RL tmpVal, ddPI |
|
./pkg/monitor/mon_surfcor.F |
89 |
MON_SURFCOR |
tmpVal = rA(i,j,bi,bj)*maskInC(i,j,bi,bj) |
|
./pkg/monitor/mon_surfcor.F |
91 |
MON_SURFCOR |
tile_wT(bi,bj) = tile_wT(bi,bj) + tmpVal |
|
./pkg/monitor/mon_surfcor.F |
98 |
MON_SURFCOR |
& + tmpVal*atm_cp*((rC(ks)/atm_po)**atm_kappa) |
|
./pkg/monitor/mon_vort3.F |
290 |
MON_VORT3 |
tmpVal = vort3(i,j) |
|
./pkg/monitor/mon_vort3.F |
295 |
MON_VORT3 |
theMin = MIN(theMin,tmpVal) |
|
./pkg/monitor/mon_vort3.F |
296 |
MON_VORT3 |
theMax = MAX(theMax,tmpVal) |
|
./pkg/monitor/mon_vort3.F |
298 |
MON_VORT3 |
tmpVal = tmpVal + fCoriG(i,j,bi,bj) |
|
./pkg/monitor/mon_vort3.F |
299 |
MON_VORT3 |
tileSum(bi,bj) = tileSum(bi,bj) + tmpAre*tmpVal |
|
./pkg/monitor/mon_vort3.F |
300 |
MON_VORT3 |
tileVar(bi,bj) = tileVar(bi,bj) + tmpAre*tmpVal*tmpVal |
|
./pkg/monitor/mon_vort3.F |
302 |
MON_VORT3 |
tmpVal = tmpVal / hFacZ(i,j) |
|
./pkg/monitor/mon_vort3.F |
304 |
MON_VORT3 |
tileVSum(bi,bj)= tileVSum(bi,bj)+ tmpVol*tmpVal |
|
./pkg/monitor/mon_vort3.F |
305 |
MON_VORT3 |
tileVSq(bi,bj) = tileVSq(bi,bj) + tmpVol*tmpVal*tmpVal |
|
./pkg/monitor/mon_vort3.F |
37 |
MON_VORT3 |
_RL theVol, theArea, tmpVal, tmpAre, tmpVol |
|
./model/src/remove_mean.F |
151 |
REMOVE_MEAN_RS |
_RS tmpVal |
|
./model/src/remove_mean.F |
166 |
REMOVE_MEAN_RS |
tmpVal=arr(I,J,K,bi,bj) |
|
./model/src/remove_mean.F |
170 |
REMOVE_MEAN_RS |
theMean = theMean + tmpVol*tmpVal |
|
./model/src/remove_mean.F |
46 |
REMOVE_MEAN_RL |
_RL tmpVal |
|
./model/src/remove_mean.F |
61 |
REMOVE_MEAN_RL |
tmpVal=arr(I,J,K,bi,bj) |
|
./model/src/remove_mean.F |
65 |
REMOVE_MEAN_RL |
theMean = theMean + tmpVol*tmpVal |
|
./pkg/debug/debug_fld_stats_rl.F |
115 |
DEBUG_FLD_STATS_RL |
tmpVal = arr(i,j,k,bi,bj) |
|
./pkg/debug/debug_fld_stats_rl.F |
116 |
DEBUG_FLD_STATS_RL |
IF ( tmpVal.NE.exclValue ) THEN |
|
./pkg/debug/debug_fld_stats_rl.F |
118 |
DEBUG_FLD_STATS_RL |
& + (tmpVal-theMean)*(tmpVal-theMean) |
|
./pkg/debug/debug_fld_stats_rl.F |
49 |
DEBUG_FLD_STATS_RL |
_RL tmpVal |
|
./pkg/debug/debug_fld_stats_rl.F |
74 |
DEBUG_FLD_STATS_RL |
tmpVal = arr(i,j,k,bi,bj) |
|
./pkg/debug/debug_fld_stats_rl.F |
75 |
DEBUG_FLD_STATS_RL |
IF ( tmpVal.NE.exclValue .AND. noPnts ) THEN |
|
./pkg/debug/debug_fld_stats_rl.F |
76 |
DEBUG_FLD_STATS_RL |
theMin = tmpVal |
|
./pkg/debug/debug_fld_stats_rl.F |
77 |
DEBUG_FLD_STATS_RL |
theMax = tmpVal |
|
./pkg/debug/debug_fld_stats_rl.F |
80 |
DEBUG_FLD_STATS_RL |
IF ( tmpVal.NE.exclValue ) THEN |
|
./pkg/debug/debug_fld_stats_rl.F |
81 |
DEBUG_FLD_STATS_RL |
theMin = MIN( theMin, tmpVal ) |
|
./pkg/debug/debug_fld_stats_rl.F |
82 |
DEBUG_FLD_STATS_RL |
theMax = MAX( theMax, tmpVal ) |
|
./pkg/debug/debug_fld_stats_rl.F |
84 |
DEBUG_FLD_STATS_RL |
tileMean(bi,bj) = tileMean(bi,bj) + tmpVal |
|
./pkg/debug/debug_fld_stats_rl.F |
85 |
DEBUG_FLD_STATS_RL |
tileVar (bi,bj) = tileVar (bi,bj) + tmpVal*tmpVal |
|
./pkg/debug/debug_fld_stats_rs.F |
115 |
DEBUG_FLD_STATS_RS |
tmpVal = arr(i,j,k,bi,bj) |
|
./pkg/debug/debug_fld_stats_rs.F |
116 |
DEBUG_FLD_STATS_RS |
IF ( tmpVal.NE.exclValue ) THEN |
|
./pkg/debug/debug_fld_stats_rs.F |
118 |
DEBUG_FLD_STATS_RS |
& + (tmpVal-theMean)*(tmpVal-theMean) |
|
./pkg/debug/debug_fld_stats_rs.F |
49 |
DEBUG_FLD_STATS_RS |
_RL tmpVal |
|
./pkg/debug/debug_fld_stats_rs.F |
74 |
DEBUG_FLD_STATS_RS |
tmpVal = arr(i,j,k,bi,bj) |
|
./pkg/debug/debug_fld_stats_rs.F |
75 |
DEBUG_FLD_STATS_RS |
IF ( tmpVal.NE.exclValue .AND. noPnts ) THEN |
|
./pkg/debug/debug_fld_stats_rs.F |
76 |
DEBUG_FLD_STATS_RS |
theMin = tmpVal |
|
./pkg/debug/debug_fld_stats_rs.F |
77 |
DEBUG_FLD_STATS_RS |
theMax = tmpVal |
|
./pkg/debug/debug_fld_stats_rs.F |
80 |
DEBUG_FLD_STATS_RS |
IF ( tmpVal.NE.exclValue ) THEN |
|
./pkg/debug/debug_fld_stats_rs.F |
81 |
DEBUG_FLD_STATS_RS |
theMin = MIN( theMin, tmpVal ) |
|
./pkg/debug/debug_fld_stats_rs.F |
82 |
DEBUG_FLD_STATS_RS |
theMax = MAX( theMax, tmpVal ) |
|
./pkg/debug/debug_fld_stats_rs.F |
84 |
DEBUG_FLD_STATS_RS |
tileMean(bi,bj) = tileMean(bi,bj) + tmpVal |
|
./pkg/debug/debug_fld_stats_rs.F |
85 |
DEBUG_FLD_STATS_RS |
tileVar (bi,bj) = tileVar (bi,bj) + tmpVal*tmpVal |