C $Header: /u/gcmpack/MITgcm/pkg/atm_ocn_coupler/CPL_PARAMS.h,v 1.5 2015/11/12 00:49:04 jmc Exp $ C $Name: $ C *==========================================================* C | CPL_PARAMS.h C | - parameter for the Coupler, holds in common block C *==========================================================* C-- COMMON /CPL_PAR_I/ Integer parameters C cpl_sequential :: =0/1 : selects Synchronous/Sequential Coupling C-- cpl_exchange_[xxx] :: controls exchange of [xxx] fields with OCN & ATM comp: C :: =0 : none ; =1,3 : exch [xxx] fields with OCN comp. C :: =2,3 : exch [xxx] fileds with ATM comp. C cpl_exchange_RunOff :: controls exchange of RunOff fields C cpl_exchange1W_sIce :: controls 1-way exchange of seaice (step fwd in ATM) C cpl_exchange2W_sIce :: controls 2-way exchange of ThSIce variables C cpl_exchange_SaltPl :: controls exchange of Salt-Plume fields C cpl_exchange_DIC :: controls exchange of DIC variables C-- C runOffMapSize :: Nunber of connected grid points in RunOff-Map C nCouplingSteps :: Number of coupling steps C nSteps_atm :: Number of coupling steps done by ATM C nSteps_ocn :: Number of coupling steps done by OCN C cplErrorCount :: counter for errors in coupling config COMMON /CPL_PAR_I/ & cpl_sequential, & cpl_exchange_RunOff, & cpl_exchange1W_sIce, cpl_exchange2W_sIce, & cpl_exchange_SaltPl, & cpl_exchange_DIC, & runOffMapSize, & nCouplingSteps, & nSteps_atm, nSteps_ocn, & cplErrorCount INTEGER cpl_sequential INTEGER cpl_exchange_RunOff INTEGER cpl_exchange1W_sIce INTEGER cpl_exchange2W_sIce INTEGER cpl_exchange_SaltPl INTEGER cpl_exchange_DIC INTEGER runOffMapSize INTEGER nCouplingSteps INTEGER nSteps_atm, nSteps_ocn INTEGER cplErrorCount C-- COMMON /CPL_PAR_C/ Character parameters C runOffMapFile :: Input file for setting runoffmap COMMON /CPL_PAR_C/ runOffMapFile CHARACTER*80 runOffMapFile