[MITgcm-devel] removing SEAICE_GET_FORCING ?

Martin Losch Martin.Losch at awi.de
Wed Dec 5 03:52:45 EST 2007


Dimitris,

do we still need all of this in seaice_model?
> C--   Atmospheric state and runoff are from
> C     pkg/exf, which does not update edges.
>       CALL EXCH_UV_AGRID_3D_RL( uwind, vwind, .TRUE., 1, myThid )
> # ifdef ALLOW_ATM_TEMP
>       _EXCH_XY_R8( atemp,  myThid )
>       _EXCH_XY_R8( aqh,    myThid )
>       _EXCH_XY_R8( precip, myThid )
>       _EXCH_XY_R8( evap,   myThid )
> # else /* ALLOW_ATM_TEMP */
>       STOP 'ABNORMAL END: S/R SEAICE_MODEL: ALLOW_ATM_TEMP undef'
> # endif /* ALLOW_ATM_TEMP */
> # ifdef ALLOW_DOWNWARD_RADIATION
>       _EXCH_XY_R8( lwdown, myThid )
>       _EXCH_XY_R8( swdown, mythid )
> # else /* ALLOW_DOWNWARD_RADIATION */
>       STOP 'ABNORMAL END: S/R SEAICE_MODEL: DOWNWARD_RADIATION undef'
> # endif /* ALLOW_DOWNWARD_RADIATION */
> # ifdef ALLOW_RUNOFF
>       _EXCH_XY_R8( runoff, myThid )
> #  else /* ALLOW_DOWNWARD_RADIATION */
>       STOP 'ABNORMAL END: S/R SEAICE_MODEL: ALLOW_RUNOFF undef'
> # endif /* ALLOW_RUNOFF */

I think all we need is the exchange of the wind fields, the rest is  
not used outside the 1:sNx,1:sNy, right?

Martin




More information about the MITgcm-devel mailing list