Back to home page

darwin3

 
 

    


File indexing completed on 2025-09-13 12:07:38 UTC

view on githubraw file Latest commit 11d365ac on 2025-06-05 16:41:12 UTC
8fbfd1f382 Oliv*0001 #ifdef ALLOW_DARWIN
                0002 
                0003 CBOP
                0004 C     !ROUTINE: DARWIN_EXF_FIELDS_FIELDS.h
                0005 C     !INTERFACE:
                0006 C #include DARWIN_EXF_FIELDS_FIELDS.h
                0007 
                0008 C     !DESCRIPTION:
                0009 C Contains fields for darwin package read through exf
                0010 C
                0011 C Requires: SIZE.h
                0012 
9f79ba70a9 Oliv*0013 C--   COMMON /DARWIN_FIELDS_C/
                0014 C     ventHe3file   :: file with He3 flux from hydrothermal vents (mmol He/m2/s)
                0015       COMMON /DARWIN_FIELDS_C/
8fbfd1f382 Oliv*0016      &    PARfile,
                0017      &    ironfile,
                0018      &    icefile,
                0019      &    windfile,
e79020cc6e Oliv*0020      &    pCO2file,
6ed0cf4850 Oliv*0021      &    ventHe3file,
e79020cc6e Oliv*0022      &    DOCrunofffile,
                0023      &    DONrunofffile,
                0024      &    DOPrunofffile,
                0025      &    DINrunofffile,
11d365acff Oliv*0026      &    NO3runofffile,
                0027      &    NO2runofffile,
                0028      &    NH4runofffile,
e79020cc6e Oliv*0029      &    IPrunofffile,
                0030      &    DSirunofffile,
                0031      &    POCrunofffile,
                0032      &    POPrunofffile,
                0033      &    PONrunofffile,
                0034      &    DICrunofffile
8fbfd1f382 Oliv*0035 
                0036       CHARACTER*128 PARfile
                0037       CHARACTER*128 ironfile
                0038       CHARACTER*128 icefile
                0039       CHARACTER*128 windfile
                0040       CHARACTER*128 pCO2file
6ed0cf4850 Oliv*0041       CHARACTER*128 ventHe3file
e79020cc6e Oliv*0042       CHARACTER*128 DOCrunofffile
                0043       CHARACTER*128 DONrunofffile
                0044       CHARACTER*128 DOPrunofffile
                0045       CHARACTER*128 DINrunofffile
11d365acff Oliv*0046       CHARACTER*128 NO3runofffile
                0047       CHARACTER*128 NO2runofffile
                0048       CHARACTER*128 NH4runofffile
e79020cc6e Oliv*0049       CHARACTER*128 IPrunofffile
                0050       CHARACTER*128 DSirunofffile
                0051       CHARACTER*128 POCrunofffile
                0052       CHARACTER*128 POPrunofffile
                0053       CHARACTER*128 PONrunofffile
                0054       CHARACTER*128 DICrunofffile
8fbfd1f382 Oliv*0055 
9f79ba70a9 Oliv*0056 C--   COMMON /DARWIN_FIELDS_R/
                0057 C     ventHe3   :: He3 flux from hydrothermal vents (mmol He/m2/s)
                0058       COMMON /DARWIN_FIELDS_R/
8fbfd1f382 Oliv*0059      &    PAR0, PAR1, surfPAR,
                0060      &    iron0, iron1, inputFe,
                0061      &    ice0, ice1, iceFrac,
                0062      &    wind0, wind1, windSpeed,
e79020cc6e Oliv*0063      &    pCO20, pCO21, atmospCO2,
6ed0cf4850 Oliv*0064      &    ventHe30, ventHe31, ventHe3,
                0065      &    DOCrunoff0, DOCrunoff1, DOCrunoff,
                0066      &    DONrunoff0, DONrunoff1, DONrunoff,
                0067      &    DOPrunoff0, DOPrunoff1, DOPrunoff,
                0068      &    DINrunoff0, DINrunoff1, DINrunoff,
11d365acff Oliv*0069      &    NO3runoff0, NO3runoff1, NO3runoff,
                0070      &    NO2runoff0, NO2runoff1, NO2runoff,
                0071      &    NH4runoff0, NH4runoff1, NH4runoff,
6ed0cf4850 Oliv*0072      &    IPrunoff0, IPrunoff1, IPrunoff,
                0073      &    DSirunoff0, DSirunoff1, DSirunoff,
                0074      &    POCrunoff0, POCrunoff1, POCrunoff,
                0075      &    POPrunoff0, POPrunoff1, POPrunoff,
                0076      &    PONrunoff0, PONrunoff1, PONrunoff,
                0077      &    DICrunoff0, DICrunoff1, DICrunoff
8fbfd1f382 Oliv*0078 
                0079       _RL PAR0(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
                0080       _RL PAR1(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
                0081       _RL surfPAR(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
                0082 
                0083       _RL iron0(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
                0084       _RL iron1(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
                0085       _RL inputFe(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
                0086 
                0087       _RL ice0(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
                0088       _RL ice1(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
                0089       _RL iceFrac(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
                0090 
                0091       _RL wind0(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
                0092       _RL wind1(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
                0093       _RL windSpeed(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
                0094 
                0095       _RL pCO20(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
                0096       _RL pCO21(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
                0097       _RL atmospCO2(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
e79020cc6e Oliv*0098 
6ed0cf4850 Oliv*0099       _RL ventHe30(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
                0100       _RL ventHe31(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
                0101       _RL ventHe3(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
                0102 
e79020cc6e Oliv*0103       _RL DOCrunoff0(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
                0104       _RL DOCrunoff1(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
                0105       _RL DOCrunoff(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
                0106 
                0107       _RL DONrunoff0(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
                0108       _RL DONrunoff1(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
                0109       _RL DONrunoff(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
                0110 
                0111       _RL DOPrunoff0(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
                0112       _RL DOPrunoff1(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
                0113       _RL DOPrunoff(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
                0114 
                0115       _RL DINrunoff0(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
                0116       _RL DINrunoff1(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
                0117       _RL DINrunoff(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
                0118 
11d365acff Oliv*0119       _RL NO3runoff0(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
                0120       _RL NO3runoff1(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
                0121       _RL NO3runoff(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
                0122 
                0123       _RL NO2runoff0(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
                0124       _RL NO2runoff1(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
                0125       _RL NO2runoff(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
                0126 
                0127       _RL NH4runoff0(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
                0128       _RL NH4runoff1(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
                0129       _RL NH4runoff(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
                0130 
e79020cc6e Oliv*0131       _RL IPrunoff0(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
                0132       _RL IPrunoff1(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
                0133       _RL IPrunoff(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
                0134 
                0135       _RL DSirunoff0(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
                0136       _RL DSirunoff1(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
                0137       _RL DSirunoff(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
                0138 
                0139       _RL POCrunoff0(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
                0140       _RL POCrunoff1(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
                0141       _RL POCrunoff(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
                0142 
                0143       _RL POPrunoff0(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
                0144       _RL POPrunoff1(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
                0145       _RL POPrunoff(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
                0146 
                0147       _RL PONrunoff0(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
                0148       _RL PONrunoff1(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
                0149       _RL PONrunoff(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
                0150 
                0151       _RL DICrunoff0(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
                0152       _RL DICrunoff1(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
                0153       _RL DICrunoff(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
                0154 
8fbfd1f382 Oliv*0155 CEOP
                0156 
                0157 #endif /* ALLOW_DARWIN */
                0158