/[MITgcm]/MITgcm_contrib/darwin2/pkg/darwin/DARWIN_IO.h
ViewVC logotype

Diff of /MITgcm_contrib/darwin2/pkg/darwin/DARWIN_IO.h

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph | View Patch Patch

revision 1.1 by jahn, Wed Apr 13 18:56:23 2011 UTC revision 1.6 by stephd, Tue Oct 23 17:55:30 2012 UTC
# Line 20  C  darwin_phytoabsorbFile    :: file nam Line 20  C  darwin_phytoabsorbFile    :: file nam
20  C  darwin_particleabsorbFile :: file name of particle absorption/scattering spectra  C  darwin_particleabsorbFile :: file name of particle absorption/scattering spectra
21  C  darwin_surfacespecFile    :: file name of spectrum of incident light  C  darwin_surfacespecFile    :: file name of spectrum of incident light
22  C  darwin_acdomFile          :: file name of CDOM absorption spectrum  C  darwin_acdomFile          :: file name of CDOM absorption spectrum
23    C  darwin_PARunits      :: units of data in PAR file; one of Ein/m2/d, uEin/m2/s, W/m2
24    C  darwin_PARFileConv   :: conversion factor from PAR file units to uEin/m2/s
25    C  darwin_W_to_uEins    :: conversion factor from W to uEin/s
26    C  darwin_ironUnits     :: units of data in iron file; one of mol Fe/m2/s, kg dust/m2/s
27    C  darwin_dustFrac      :: fraction of dust by weight that is iron
28  C  darwin_forcingPeriod :: perioDARWIN forcing parameter specific for DARWIN (seconds)  C  darwin_forcingPeriod :: perioDARWIN forcing parameter specific for DARWIN (seconds)
29  C  darwin_forcingCycle  :: perioDARWIN forcing parameter specific for DARWIN (seconds)  C  darwin_forcingCycle  :: perioDARWIN forcing parameter specific for DARWIN (seconds)
30  C  darwin_seed          :: seed for the random number generator  C  darwin_seed          :: seed for the random number generator
# Line 38  C  darwin_seed          :: seed for the Line 43  C  darwin_seed          :: seed for the
43       &        darwin_waterabsorbFile, darwin_phytoabsorbFile,       &        darwin_waterabsorbFile, darwin_phytoabsorbFile,
44       &        darwin_surfacespecFile, darwin_acdomFile,       &        darwin_surfacespecFile, darwin_acdomFile,
45       &        darwin_particleabsorbFile,       &        darwin_particleabsorbFile,
46         &        darwin_PARunits, darwin_ironUnits,
47         &        darwin_PARFileConv, darwin_ironFileConv,
48         &        darwin_dustFrac,
49         &        darwin_W_to_uEins,
50       &        darwin_forcingPeriod, darwin_forcingCycle,       &        darwin_forcingPeriod, darwin_forcingCycle,
51       &        darwin_seed       &        darwin_seed
52    
# Line 60  C  darwin_seed          :: seed for the Line 69  C  darwin_seed          :: seed for the
69        CHARACTER*(MAX_LEN_FNAM) darwin_particleabsorbFile        CHARACTER*(MAX_LEN_FNAM) darwin_particleabsorbFile
70        CHARACTER*(MAX_LEN_FNAM) darwin_surfacespecFile        CHARACTER*(MAX_LEN_FNAM) darwin_surfacespecFile
71        CHARACTER*(MAX_LEN_FNAM) darwin_acdomFile        CHARACTER*(MAX_LEN_FNAM) darwin_acdomFile
72          CHARACTER*(MAX_LEN_FNAM) darwin_PARunits
73          CHARACTER*(MAX_LEN_FNAM) darwin_ironUnits
74    
75        _RL darwin_relaxscale        _RL darwin_relaxscale
76        _RL     darwin_forcingPeriod        _RL     darwin_forcingPeriod
77        _RL     darwin_forcingCycle        _RL     darwin_forcingCycle
78          _RL darwin_PARFileConv
79          _RL darwin_W_to_uEins
80          _RL darwin_ironFileConv
81          _RL darwin_dustFrac
82        INTEGER darwin_seed        INTEGER darwin_seed
83    
84  c INPUT:  c INPUT:
# Line 107  c    Nfixave      - average N fixation Line 122  c    Nfixave      - average N fixation
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,
# Line 119  c ANNA_TAVE Line 138  c ANNA_TAVE
138  #ifdef DAR_DIAG_ACDOM  #ifdef DAR_DIAG_ACDOM
139       &      aCDOMave,       &      aCDOMave,
140  #endif  #endif
141    #ifdef DAR_DIAG_PARW
142         &      chl2cave,
143    #endif
144    #ifdef DAR_DIAG_EK
145         &      Ekave, EkoverEave, acclimave,
146    #endif
147  c ANNA end TAVE  c ANNA end TAVE
148  #ifdef DAR_DIAG_RSTAR  #ifdef DAR_DIAG_RSTAR
149       &      Rstarave, RNstarave,       &      Rstarave, RNstarave,
# Line 142  c Line 167  c
167         _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)
168         _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)
169         _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)
170    #ifdef QUOTA_DIAG_LIMIT
171           _RL  Nlimave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nR,nSx, nSy, npmax)
172           _RL  Flimave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nR,nSx, nSy, npmax)
173           _RL  Ilimave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nR,nSx, nSy, npmax)
174           _RL  Tlimave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nR,nSx, nSy)
175    #endif
176  c ANNA_TAVE  c ANNA_TAVE
177  #ifdef WAVES_DIAG_PCHL  #ifdef WAVES_DIAG_PCHL
178         _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)
# Line 149  c ANNA_TAVE Line 180  c ANNA_TAVE
180  #ifdef DAR_DIAG_ACDOM  #ifdef DAR_DIAG_ACDOM
181         _RL  aCDOMave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nR,nSx,nSy)         _RL  aCDOMave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nR,nSx,nSy)
182  #endif  #endif
183    #ifdef DAR_DIAG_PARW
184           _RL  chl2cave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nR,nSx, nSy,npmax)
185    #endif
186    #ifdef DAR_DIAG_EK
187           _RL  Ekave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nR,nSx, nSy,npmax)
188           _RL  EkoverEave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nR,nSx, nSy,npmax)
189           _RL  acclimave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nR,nSx, nSy,npmax)
190    #endif
191  c ANNA end TAVE  c ANNA end TAVE
192  #ifdef DAR_DIAG_RSTAR  #ifdef DAR_DIAG_RSTAR
193         _RL  Rstarave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nR,nSx, nSy,npmax)         _RL  Rstarave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nR,nSx, nSy,npmax)
# Line 186  c ANNA end TAVE Line 225  c ANNA end TAVE
225         INTEGER DAR_cons_unit7         INTEGER DAR_cons_unit7
226  #endif  #endif
227    
228    #ifdef CALC_RATE_TOTALS
229          COMMON /DARWIN_RATE_TOT/
230         &      DAR_ratetot_unit, DAR_fluxtot_unit
231           INTEGER DAR_ratetot_unit
232           INTEGER DAR_fluxtot_unit
233    #endif
234    
235  #ifdef ALLOW_PAR_DAY  #ifdef ALLOW_PAR_DAY
236  C     PARday    :: array for accumulating/storing daily-averaged PAR  C     PARday    :: array for accumulating/storing daily-averaged PAR
237        COMMON /DARWIN_PAR_DAY/ PARday,        COMMON /DARWIN_PAR_DAY/ PARday,
Legend:
Removed from v.1.1  
changed lines
  Added in v.1.6
  ViewVC Help
Powered by ViewVC 1.1.22