Back to home page

MITgcm

 
 

    


File indexing completed on 2018-03-02 18:37:31 UTC

view on githubraw file Latest commit add29e06 on 2018-01-31 20:35:05 UTC
0b83645f94 Jeff*0001   These lines are here to deliberately cause a compile-time error.
                0002   If you see these lines in your .F files or the compiler shows them
                0003     as an error then it means you have not placed your coupler 
                0004     configuration files in the appropriate place.
                0005   You need: a) to place you own copy of OCNIDS.h in a directory
                0006     (e.g.: shared_code) which is both in the include path of the
                0007     coupler and in include path of the ocean component ; 
                0008   and b) to comment out these lines.
                0009 
                0010 C     *==========================================================*
                0011 C     | OCNIDS.h Declare symbolic constants holding strings that
                0012 C     |          are used to identify this component and the
                0013 C     |          fields it exchanges with other components.
                0014 C     *==========================================================*
09a6f3668a Jeff*0015       CHARACTER*(8)  ocnCompName 
                0016       PARAMETER( ocnCompName         = 'UV-Ocean'       )
                0017 
                0018       CHARACTER*(10) ocnMxlDName
                0019       PARAMETER( ocnMxlDName         = 'OCN ocMxlD'     )
                0020       CHARACTER*(7)  ocnSSTName
                0021       PARAMETER( ocnSSTName          = 'OCN SST'        )
                0022       CHARACTER*(7)  ocnSSSName
                0023       PARAMETER( ocnSSSName          = 'OCN SSS'        )
                0024       CHARACTER*(9)  ocnSSVsqName
                0025       PARAMETER( ocnSSVsqName        = 'OCN SSVsq'      )
0b83645f94 Jeff*0026       CHARACTER*(8)  ocnFCO2Name
                0027       PARAMETER( ocnFCO2Name         = 'OCN FCO2'       )
09a6f3668a Jeff*0028 
                0029       CHARACTER*(8)  ocnSLPrName
                0030       PARAMETER( ocnSLPrName         = 'OCN SLPr'       )
                0031       CHARACTER*(12) ocnHeatFluxName
                0032       PARAMETER( ocnHeatFluxName     = 'OCN HeatFlux'   )
                0033       CHARACTER*(14) ocnQshortWaveName
                0034       PARAMETER( ocnQshortWaveName   = 'OCN Qshortwave' )
                0035 c     CHARACTER*(13) ocnQlongWaveName
                0036 c     PARAMETER( ocnQlongWaveName    = 'OCN Qlongwave'  )
                0037 c     CHARACTER*(11) ocnQlatentName
                0038 c     PARAMETER( ocnQlatentName      = 'OCN Qlatent'    )
                0039 c     CHARACTER*(13) ocnQsensibleName
                0040 c     PARAMETER( ocnQsensibleName    = 'OCN Qsensible'  )
                0041 c     CHARACTER*(14) ocnUvelgroundName
                0042 c     PARAMETER( ocnUvelgroundName   = 'OCN Uvelground' )
                0043 c     CHARACTER*(14) ocnVvelgroundName
                0044 c     PARAMETER( ocnVvelgroundName   = 'OCN Vvelground' )
                0045       CHARACTER*(8)  ocnTauXName
                0046       PARAMETER( ocnTauXName         = 'OCN tauX'       )
                0047       CHARACTER*(8)  ocnTauYName
                0048       PARAMETER( ocnTauYName         = 'OCN tauY'       )
                0049       CHARACTER*(10) ocnFWFluxName
                0050       PARAMETER( ocnFWFluxName       = 'OCN FWFlux'     )
                0051       CHARACTER*(12) ocnSaltFxName
                0052       PARAMETER( ocnSaltFxName       = 'OCN SaltFlux'   )
                0053       CHARACTER*(10) ocnSeaIceName
                0054       PARAMETER( ocnSeaIceName       = 'OCN SeaIce'     )
0b83645f94 Jeff*0055       CHARACTER*(10) ocnAirCO2Name
                0056       PARAMETER( ocnAirCO2Name       = 'OCN AirCO2'     )
                0057       CHARACTER*(8) ocnWSpdName
                0058       PARAMETER( ocnWSpdName         = 'OCN WSpd'       )
                0059       CHARACTER*(8) ocnFIceName
                0060       PARAMETER( ocnFIceName         = 'OCN FIce'       )
                0061 C
                0062 C     Pass carbon/DIC variables only if flag set below
                0063       LOGICAL ocnCpl_exchange_DIC
                0064       PARAMETER( ocnCpl_exchange_DIC = .FALSE.)