pkg/atm_ocn_coupler/OCNIDS.h

C $Header: /u/gcmpack/MITgcm/verification/cpl_aim+ocn/shared_code/OCNIDS.h,v 1.3 2007/05/12 16:53:57 jmc Exp $
C $Name:  $

  These lines are here to deliberately cause a compile-time error.
  If you see these lines in your .F files or the compiler shows them
    as an error then it means you have not placed your coupler 
    configuration files in the appropriate place.
  You need: a) to place you own copy of OCNIDS.h in a directory
    (e.g.: shared_code) which is both in the include path of the
    coupler and in include path of the ocean component ; 
  and b) to comment out these lines.

C     *==========================================================*
C     | OCNIDS.h Declare symbolic constants holding strings that
C     |          are used to identify this component and the
C     |          fields it exchanges with other components.
C     *==========================================================*
      CHARACTER*(8)  ocnCompName 
      PARAMETER( ocnCompName         = 'UV-Ocean'       )

      CHARACTER*(10) ocnMxlDName
      PARAMETER( ocnMxlDName         = 'OCN ocMxlD'     )
      CHARACTER*(7)  ocnSSTName
      PARAMETER( ocnSSTName          = 'OCN SST'        )
      CHARACTER*(7)  ocnSSSName
      PARAMETER( ocnSSSName          = 'OCN SSS'        )
      CHARACTER*(9)  ocnSSVsqName
      PARAMETER( ocnSSVsqName        = 'OCN SSVsq'      )
      CHARACTER*(8)  ocnFCO2Name
      PARAMETER( ocnFCO2Name         = 'OCN FCO2'       )

      CHARACTER*(8)  ocnSLPrName
      PARAMETER( ocnSLPrName         = 'OCN SLPr'       )
      CHARACTER*(12) ocnHeatFluxName
      PARAMETER( ocnHeatFluxName     = 'OCN HeatFlux'   )
      CHARACTER*(14) ocnQshortWaveName
      PARAMETER( ocnQshortWaveName   = 'OCN Qshortwave' )
c     CHARACTER*(13) ocnQlongWaveName
c     PARAMETER( ocnQlongWaveName    = 'OCN Qlongwave'  )
c     CHARACTER*(11) ocnQlatentName
c     PARAMETER( ocnQlatentName      = 'OCN Qlatent'    )
c     CHARACTER*(13) ocnQsensibleName
c     PARAMETER( ocnQsensibleName    = 'OCN Qsensible'  )
c     CHARACTER*(14) ocnUvelgroundName
c     PARAMETER( ocnUvelgroundName   = 'OCN Uvelground' )
c     CHARACTER*(14) ocnVvelgroundName
c     PARAMETER( ocnVvelgroundName   = 'OCN Vvelground' )
      CHARACTER*(8)  ocnTauXName
      PARAMETER( ocnTauXName         = 'OCN tauX'       )
      CHARACTER*(8)  ocnTauYName
      PARAMETER( ocnTauYName         = 'OCN tauY'       )
      CHARACTER*(10) ocnFWFluxName
      PARAMETER( ocnFWFluxName       = 'OCN FWFlux'     )
      CHARACTER*(12) ocnSaltFxName
      PARAMETER( ocnSaltFxName       = 'OCN SaltFlux'   )
      CHARACTER*(10) ocnSeaIceName
      PARAMETER( ocnSeaIceName       = 'OCN SeaIce'     )
      CHARACTER*(10) ocnAirCO2Name
      PARAMETER( ocnAirCO2Name       = 'OCN AirCO2'     )
      CHARACTER*(8) ocnWSpdName
      PARAMETER( ocnWSpdName         = 'OCN WSpd'       )
      CHARACTER*(8) ocnFIceName
      PARAMETER( ocnFIceName         = 'OCN FIce'       )
C
C     Pass carbon/DIC variables only if flag set below
      LOGICAL ocnCpl_exchange_DIC
      PARAMETER( ocnCpl_exchange_DIC = .FALSE.)
1	C $Header: /u/gcmpack/MITgcm/verification/cpl_aim+ocn/shared_code/OCNIDS.h,v 1.3 2007/05/12 16:53:57 jmc Exp $
2	C $Name: $
3
4	These lines are here to deliberately cause a compile-time error.
5	If you see these lines in your .F files or the compiler shows them
6	as an error then it means you have not placed your coupler
7	configuration files in the appropriate place.
8	You need: a) to place you own copy of OCNIDS.h in a directory
9	(e.g.: shared_code) which is both in the include path of the
10	coupler and in include path of the ocean component ;
11	and b) to comment out these lines.
12
13	C ==========================================================
14	C \| OCNIDS.h Declare symbolic constants holding strings that
15	C \| are used to identify this component and the
16	C \| fields it exchanges with other components.
17	C ==========================================================
18	CHARACTER*(8) ocnCompName
19	PARAMETER( ocnCompName = 'UV-Ocean' )
20
21	CHARACTER*(10) ocnMxlDName
22	PARAMETER( ocnMxlDName = 'OCN ocMxlD' )
23	CHARACTER*(7) ocnSSTName
24	PARAMETER( ocnSSTName = 'OCN SST' )
25	CHARACTER*(7) ocnSSSName
26	PARAMETER( ocnSSSName = 'OCN SSS' )
27	CHARACTER*(9) ocnSSVsqName
28	PARAMETER( ocnSSVsqName = 'OCN SSVsq' )
29	CHARACTER*(8) ocnFCO2Name
30	PARAMETER( ocnFCO2Name = 'OCN FCO2' )
31
32	CHARACTER*(8) ocnSLPrName
33	PARAMETER( ocnSLPrName = 'OCN SLPr' )
34	CHARACTER*(12) ocnHeatFluxName
35	PARAMETER( ocnHeatFluxName = 'OCN HeatFlux' )
36	CHARACTER*(14) ocnQshortWaveName
37	PARAMETER( ocnQshortWaveName = 'OCN Qshortwave' )
38	c CHARACTER*(13) ocnQlongWaveName
39	c PARAMETER( ocnQlongWaveName = 'OCN Qlongwave' )
40	c CHARACTER*(11) ocnQlatentName
41	c PARAMETER( ocnQlatentName = 'OCN Qlatent' )
42	c CHARACTER*(13) ocnQsensibleName
43	c PARAMETER( ocnQsensibleName = 'OCN Qsensible' )
44	c CHARACTER*(14) ocnUvelgroundName
45	c PARAMETER( ocnUvelgroundName = 'OCN Uvelground' )
46	c CHARACTER*(14) ocnVvelgroundName
47	c PARAMETER( ocnVvelgroundName = 'OCN Vvelground' )
48	CHARACTER*(8) ocnTauXName
49	PARAMETER( ocnTauXName = 'OCN tauX' )
50	CHARACTER*(8) ocnTauYName
51	PARAMETER( ocnTauYName = 'OCN tauY' )
52	CHARACTER*(10) ocnFWFluxName
53	PARAMETER( ocnFWFluxName = 'OCN FWFlux' )
54	CHARACTER*(12) ocnSaltFxName
55	PARAMETER( ocnSaltFxName = 'OCN SaltFlux' )
56	CHARACTER*(10) ocnSeaIceName
57	PARAMETER( ocnSeaIceName = 'OCN SeaIce' )
58	CHARACTER*(10) ocnAirCO2Name
59	PARAMETER( ocnAirCO2Name = 'OCN AirCO2' )
60	CHARACTER*(8) ocnWSpdName
61	PARAMETER( ocnWSpdName = 'OCN WSpd' )
62	CHARACTER*(8) ocnFIceName
63	PARAMETER( ocnFIceName = 'OCN FIce' )
64	C
65	C Pass carbon/DIC variables only if flag set below
66	LOGICAL ocnCpl_exchange_DIC
67	PARAMETER( ocnCpl_exchange_DIC = .FALSE.)