4.29 Fortran: Module Interface ice_transport - horizontal advection (via mpdata) (Source File: ice_transport.F)

Calculates horizontal advection using mpdata (Multidimensional Positive Definite Advection Transport Algorithm).

REVISION HISTORY:

   author Elizabeth C. Hunke

INTERFACE:

 
       module ice_transport

USES:

       use ice_model_size
       use ice_domain
       use ice_constants
       use ice_grid

4.29.1 transport - computes transport equations for one timestep

INTERFACE:

       subroutine transport

DESCRIPTION:

Computes the transport equations for one timestep using mpdata. Sets several fields into a work array and passes it to mpdata routine.

REVISION HISTORY:

   author Elizabeth C. Hunke

USES:

        
       use ice_flux
       use ice_timers
       use ice_state

INPUT/OUTPUT PARAMETERS:

4.29.2 mpdata(narrays,phi) - advection according to mpdata

INTERFACE:

       subroutine mpdata(narrays,phi)

DESCRIPTION:

Smolarkiewicz, P. K., 1984: A fully multidimensional positive definite advection transport algorithm with small implicit diffusion, J. Comput. Phys., 54, 325-362.

REVISION HISTORY:

   author Elizabeth C. Hunke

USES:

       use ice_calendar
       use ice_dyn_evp
       use shr_sys_mod, only : shr_sys_abort

INPUT/OUTPUT PARAMETERS:

       integer (kind=int_kind), intent(in) :: narrays
 
       real (kind=dbl_kind), intent(inout) ::
      &   phi(imt_local,jmt_local,narrays)