5 |
|
|
6 |
SUBROUTINE MON_STATS_RL( |
SUBROUTINE MON_STATS_RL( |
7 |
I myNr, arr, arrMask,arrhFac, arrArea, arrDr, |
I myNr, arr, arrMask,arrhFac, arrArea, arrDr, |
8 |
O theMin,theMax,theMean,theSD,theDel2, |
O theMin,theMax,theMean,theSD,theDel2,theVol, |
9 |
I myThid ) |
I myThid ) |
10 |
C /==========================================================\ |
C /==========================================================\ |
11 |
C | SUBROUTINE MON_STATS_RL | |
C | SUBROUTINE MON_STATS_RL | |
30 |
_RL theMean |
_RL theMean |
31 |
_RL theSD |
_RL theSD |
32 |
_RL theDel2 |
_RL theDel2 |
33 |
|
_RL theVol |
34 |
INTEGER myThid |
INTEGER myThid |
35 |
|
|
36 |
C === Local variables ==== |
C === Local variables ==== |
39 |
LOGICAL noPnts |
LOGICAL noPnts |
40 |
_RL tmpVal,rNumPnts |
_RL tmpVal,rNumPnts |
41 |
_RL theVar |
_RL theVar |
42 |
_RL theVol, tmpVol |
_RL tmpVol |
43 |
|
|
44 |
theMin=0. |
theMin=0. |
45 |
theMax=0. |
theMax=0. |