FE-Project
Loading...
Searching...
No Matches
mod_cpl_vars::couplervars Type Reference

Derived type to manage variables with coupler component. More...

Public Member Functions

procedure init (this, mesh3d_atm, mesh2d_atm, mesh2d_ocn)
procedure final (this)
procedure putatm (this, atm_ddens, atm_momz, atm_momx, atm_momy, atm_qv, atm_pres, atm_rtot, atm_dens_hyd, sflx_rad_sw_dir_dn, sflx_rad_lw_dif_dn, sflx_engi, countup)
 Put ATM variables to CPL buffer for OCN component.
procedure putocn (this, ocn_vars, countup)
 Put OCN variables to CPL buffer for ATM component.
procedure get_sfc_atm (this, sfc_temp, sfc_albedo, sflx_mw, sflx_mu, sflx_mv, sflx_sh, sflx_lh, sflx_qv)
 Get SFC variables from CPL buffer for ATM component.
procedure get_atm_ocn (this, atm_sfc_dens, atm_sfc_pres, atm_temp, atm_pres, atm_w, atm_u, atm_v, atm_qv, rd_sflx_sw_dir, rd_sflx_lw_dif, dz_a)
 Get ATM variables from CPL buffer for OCN component.

Public Attributes

type(meshfield2d), dimension(:), allocatable ocn_vars
type(meshfield2d), dimension(:), allocatable ocn_atm_vars
real(rp) cnt_putatm_ocn
 Counter for putting ATM variables to OCN component.
real(rp) cnt_putocn_atm
 Counter for putting OCN variables to ATM component.
class(meshbase3d), pointer mesh3d_atm => null()
class(meshbase2d), pointer mesh2d_atm => null()
class(meshbase2d), pointer mesh2d_ocn => null()

Detailed Description

Derived type to manage variables with coupler component.

Definition at line 48 of file mod_cpl_vars.F90.

Member Function/Subroutine Documentation

◆ init()

procedure mod_cpl_vars::couplervars::init ( class(couplervars), intent(inout) this,
class(meshbase3d), intent(in), target mesh3d_atm,
class(meshbase2d), intent(in), target mesh2d_atm,
class(meshbase2d), intent(in), target mesh2d_ocn )

Definition at line 60 of file mod_cpl_vars.F90.

◆ final()

procedure mod_cpl_vars::couplervars::final ( class(couplervars), intent(inout) this)

Definition at line 61 of file mod_cpl_vars.F90.

◆ putatm()

procedure mod_cpl_vars::couplervars::putatm ( class(couplervars), intent(inout) this,
type(meshfield3d), intent(in), target atm_ddens,
type(meshfield3d), intent(in), target atm_momz,
type(meshfield3d), intent(in), target atm_momx,
type(meshfield3d), intent(in), target atm_momy,
type(meshfield3d), intent(in), target atm_qv,
type(meshfield3d), intent(in), target atm_pres,
type(meshfield3d), intent(in), target atm_rtot,
type(meshfield3d), intent(in), target atm_dens_hyd,
type(meshfield2d), intent(in), target sflx_rad_sw_dir_dn,
type(meshfield2d), intent(in), target sflx_rad_lw_dif_dn,
type(meshfield2d), intent(in), target sflx_engi,
logical, intent(in) countup )

Put ATM variables to CPL buffer for OCN component.

Definition at line 62 of file mod_cpl_vars.F90.

◆ putocn()

procedure mod_cpl_vars::couplervars::putocn ( class(couplervars), intent(inout) this,
type(oceanvars), intent(in) ocn_vars,
logical, intent(in) countup )

Put OCN variables to CPL buffer for ATM component.

Definition at line 63 of file mod_cpl_vars.F90.

◆ get_sfc_atm()

procedure mod_cpl_vars::couplervars::get_sfc_atm ( class(couplervars), intent(inout) this,
type(meshfield2d), intent(inout) sfc_temp,
type(meshfield2d), intent(inout) sfc_albedo,
type(meshfield2d), intent(inout) sflx_mw,
type(meshfield2d), intent(inout) sflx_mu,
type(meshfield2d), intent(inout) sflx_mv,
type(meshfield2d), intent(inout) sflx_sh,
type(meshfield2d), intent(inout) sflx_lh,
type(meshfield2d), intent(inout) sflx_qv )

Get SFC variables from CPL buffer for ATM component.

Definition at line 64 of file mod_cpl_vars.F90.

◆ get_atm_ocn()

procedure mod_cpl_vars::couplervars::get_atm_ocn ( class(couplervars), intent(inout) this,
type(meshfield2d), intent(inout) atm_sfc_dens,
type(meshfield2d), intent(inout) atm_sfc_pres,
type(meshfield2d), intent(inout) atm_temp,
type(meshfield2d), intent(inout) atm_pres,
type(meshfield2d), intent(inout) atm_w,
type(meshfield2d), intent(inout) atm_u,
type(meshfield2d), intent(inout) atm_v,
type(meshfield2d), intent(inout) atm_qv,
type(meshfield2d), intent(inout) rd_sflx_sw_dir,
type(meshfield2d), intent(inout) rd_sflx_lw_dif,
type(meshfield2d), intent(inout) dz_a )

Get ATM variables from CPL buffer for OCN component.

Definition at line 65 of file mod_cpl_vars.F90.

Member Data Documentation

◆ ocn_vars

type(meshfield2d), dimension(:), allocatable mod_cpl_vars::couplervars::ocn_vars

Definition at line 49 of file mod_cpl_vars.F90.

49 type(MeshField2D), allocatable :: OCN_vars(:)

◆ ocn_atm_vars

type(meshfield2d), dimension(:), allocatable mod_cpl_vars::couplervars::ocn_atm_vars

Definition at line 51 of file mod_cpl_vars.F90.

51 type(MeshField2D), allocatable :: OCN_atm_vars(:)

◆ cnt_putatm_ocn

real(rp) mod_cpl_vars::couplervars::cnt_putatm_ocn

Counter for putting ATM variables to OCN component.

Definition at line 53 of file mod_cpl_vars.F90.

53 real(RP) :: CNT_putATM_OCN !< Counter for putting ATM variables to OCN component

◆ cnt_putocn_atm

real(rp) mod_cpl_vars::couplervars::cnt_putocn_atm

Counter for putting OCN variables to ATM component.

Definition at line 54 of file mod_cpl_vars.F90.

54 real(RP) :: CNT_putOCN_ATM !< Counter for putting OCN variables to ATM component

◆ mesh3d_atm

class(meshbase3d), pointer mod_cpl_vars::couplervars::mesh3d_atm => null()

Definition at line 56 of file mod_cpl_vars.F90.

56 class(MeshBase3D), pointer :: mesh3D_atm => null()

◆ mesh2d_atm

class(meshbase2d), pointer mod_cpl_vars::couplervars::mesh2d_atm => null()

Definition at line 57 of file mod_cpl_vars.F90.

57 class(MeshBase2D), pointer :: mesh2D_atm => null()

◆ mesh2d_ocn

class(meshbase2d), pointer mod_cpl_vars::couplervars::mesh2d_ocn => null()

Definition at line 58 of file mod_cpl_vars.F90.

58 class(MeshBase2D), pointer :: mesh2D_ocn => null()

The documentation for this type was generated from the following file: