122 |
c Zoograzave - average zooplankton consumption |
c Zoograzave - average zooplankton consumption |
123 |
c Parave - average PAR |
c Parave - average PAR |
124 |
c Chlave - average chlorophyll |
c Chlave - average chlorophyll |
125 |
c npzd_timeave - time for averaging |
c npzd_timeave - time for averaging |
126 |
|
c Nlim,Flim,etc- Quota model average limitation factors |
127 |
|
|
128 |
COMMON /DARWIN_OUPUT/ |
COMMON /DARWIN_OUPUT/ |
129 |
& PPave, Nfixave, Zoograzave, |
& PPave, Nfixave, Zoograzave, |
130 |
& PARave, Chlave, Denitave, |
& PARave, Chlave, Denitave, |
131 |
|
#ifdef QUOTA_DIAG_LIMIT |
132 |
|
& Nlimave,Flimave,Ilimave,Tlimave, |
133 |
|
#endif |
134 |
c ANNA_TAVE |
c ANNA_TAVE |
135 |
#ifdef WAVES_DIAG_PCHL |
#ifdef WAVES_DIAG_PCHL |
136 |
& Pchlave, |
& Pchlave, |
161 |
_RL PARave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nR,nSx, nSy) |
_RL PARave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nR,nSx, nSy) |
162 |
_RL Chlave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nR,nSx, nSy) |
_RL Chlave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nR,nSx, nSy) |
163 |
_RL Denitave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nR,nSx, nSy) |
_RL Denitave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nR,nSx, nSy) |
164 |
|
#ifdef QUOTA_DIAG_LIMIT |
165 |
|
_RL Nlimave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nR,nSx, nSy, npmax) |
166 |
|
_RL Flimave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nR,nSx, nSy, npmax) |
167 |
|
_RL Ilimave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nR,nSx, nSy, npmax) |
168 |
|
_RL Tlimave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nR,nSx, nSy) |
169 |
|
#endif |
170 |
c ANNA_TAVE |
c ANNA_TAVE |
171 |
#ifdef WAVES_DIAG_PCHL |
#ifdef WAVES_DIAG_PCHL |
172 |
_RL Pchlave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nR,nSx, nSy,npmax) |
_RL Pchlave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nR,nSx, nSy,npmax) |