cpl_aim%2Bocn/shared_code/OCNIDS.h

dd23fce4b7 Jean*0001 C     *==========================================================*
                0002 C     | OCNIDS.h Declare symbolic constants holding strings that
                0003 C     |          are used to identify this component and the
                0004 C     |          fields it exchanges with other components.
                0005 C     *==========================================================*
aa1001764a Jean*0006       CHARACTER*(8)  ocnCompName
844edcc456 Jean*0007       PARAMETER( ocnCompName         = 'UV-Ocean'       )
dd2563fa11 Jean*0008
080e3553b8 Jean*0009       CHARACTER*(13) ocnCplParamsName
                0010       PARAMETER( ocnCplParamsName    = 'OCN CplParams'  )
                0011       INTEGER    ocnParSize
                0012       PARAMETER( ocnParSize = 6 )
                0013
                0014 C--   fields sent from OCN to ATM:
dd2563fa11 Jean*0015       CHARACTER*(10) ocnMxlDName
                0016       PARAMETER( ocnMxlDName         = 'OCN ocMxlD'     )
                0017       CHARACTER*(7)  ocnSSTName
844edcc456 Jean*0018       PARAMETER( ocnSSTName          = 'OCN SST'        )
dd2563fa11 Jean*0019       CHARACTER*(7)  ocnSSSName
                0020       PARAMETER( ocnSSSName          = 'OCN SSS'        )
                0021       CHARACTER*(9)  ocnSSVsqName
                0022       PARAMETER( ocnSSVsqName        = 'OCN SSVsq'      )
080e3553b8 Jean*0023       CHARACTER*(11) ocnCO2FluxName
                0024       PARAMETER( ocnCO2FluxName      = 'OCN CO2Flux'    )
                0025
                0026 C--   fields sent in both direction:
                0027       CHARACTER*(12) ocnSIceFracName
                0028       PARAMETER( ocnSIceFracName     = 'OCN sIceFrac'   )
                0029       CHARACTER*(13) ocnSIceThickName
                0030       PARAMETER( ocnSIceThickName    = 'OCN sIceThick'  )
                0031       CHARACTER*(13) ocnSIceSnowName
                0032       PARAMETER( ocnSIceSnowName     = 'OCN sIceSnowH'  )
                0033       CHARACTER*(10) ocnSIceQ1Name
                0034       PARAMETER( ocnSIceQ1Name       = 'OCN sIceQ1'     )
                0035       CHARACTER*(10) ocnSIceQ2Name
                0036       PARAMETER( ocnSIceQ2Name       = 'OCN sIceQ2'     )
dd2563fa11 Jean*0037
080e3553b8 Jean*0038 C--   fields sent from ATM to OCN:
dd2563fa11 Jean*0039       CHARACTER*(8)  ocnSLPrName
                0040       PARAMETER( ocnSLPrName         = 'OCN SLPr'       )
                0041       CHARACTER*(12) ocnHeatFluxName
                0042       PARAMETER( ocnHeatFluxName     = 'OCN HeatFlux'   )
                0043       CHARACTER*(14) ocnQshortWaveName
                0044       PARAMETER( ocnQshortWaveName   = 'OCN Qshortwave' )
                0045       CHARACTER*(8)  ocnTauXName
844edcc456 Jean*0046       PARAMETER( ocnTauXName         = 'OCN tauX'       )
dd2563fa11 Jean*0047       CHARACTER*(8)  ocnTauYName
844edcc456 Jean*0048       PARAMETER( ocnTauYName         = 'OCN tauY'       )
dd2563fa11 Jean*0049       CHARACTER*(10) ocnFWFluxName
844edcc456 Jean*0050       PARAMETER( ocnFWFluxName       = 'OCN FWFlux'     )
080e3553b8 Jean*0051       CHARACTER*(10) ocnRunOffName
                0052       PARAMETER( ocnRunOffName       = 'OCN RunOff'     )
dd2563fa11 Jean*0053       CHARACTER*(12) ocnSaltFxName
                0054       PARAMETER( ocnSaltFxName       = 'OCN SaltFlux'   )
080e3553b8 Jean*0055       CHARACTER*(12) ocnSIceMassName
                0056       PARAMETER( ocnSIceMassName     = 'OCN sIceMass'   )
                0057       CHARACTER*(14) ocnSaltPlmFlxName
                0058       PARAMETER( ocnSaltPlmFlxName   = 'OCN SaltPlmFlx' )
dd23fce4b7 Jean*0059       CHARACTER*(10) ocnAirCO2Name
                0060       PARAMETER( ocnAirCO2Name       = 'OCN AirCO2'     )
080e3553b8 Jean*0061       CHARACTER*(11) ocnWindSpdName
                0062       PARAMETER( ocnWindSpdName      = 'OCN WindSpd'    )
                0063
                0064 C---+----1----+----2----+----3----+----4----+----5----+----6----+----7-|--+----|