climb_wind_up Subroutine

public subroutine climb_wind_up(knon, dtime, u_old, v_old, flx_u1, flx_v1, Acoef_U_in, Acoef_V_in, Bcoef_U_in, Bcoef_V_in, Ccoef_U_in, Ccoef_V_in, Dcoef_U_in, Dcoef_V_in, Kcoef_m_in, flx_u_new, flx_v_new, d_u_new, d_v_new)

Uses

- yomcst_mod_h
- compbl_mod_h
Help
Graph Key

Nodes of different colours represent the following:

Solid arrows point from a submodule to the (sub)module which it is descended from. Dashed arrows point from a module or program unit to modules which it uses.

! nrlmd le 02/05/2011 !

! nrlmd le 02/05/2011 ! !

Calcul flux

== flux_u/v est le flux de moment angulaire (positif vers bas) == dont l'unite est: (kg m/s)/(m**2 s)

Calcul tendances

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(in)			::	knon
real,	intent(in)			::	dtime
real,	intent(in),		DIMENSION(klon,klev)	::	u_old
real,	intent(in),		DIMENSION(klon,klev)	::	v_old
real,	intent(in),		DIMENSION(klon)	::	flx_u1	! nrlmd le 02/05/2011
real,	intent(in),		DIMENSION(klon)	::	flx_v1	! nrlmd le 02/05/2011
real,	intent(in),		DIMENSION(klon)	::	Acoef_U_in
real,	intent(in),		DIMENSION(klon)	::	Acoef_V_in
real,	intent(in),		DIMENSION(klon)	::	Bcoef_U_in
real,	intent(in),		DIMENSION(klon)	::	Bcoef_V_in
real,	intent(in),		DIMENSION(klon,klev)	::	Ccoef_U_in
real,	intent(in),		DIMENSION(klon,klev)	::	Ccoef_V_in
real,	intent(in),		DIMENSION(klon,klev)	::	Dcoef_U_in
real,	intent(in),		DIMENSION(klon,klev)	::	Dcoef_V_in
real,	intent(in),		DIMENSION(klon,klev)	::	Kcoef_m_in	!
real,	intent(out),		DIMENSION(klon,klev)	::	flx_u_new
real,	intent(out),		DIMENSION(klon,klev)	::	flx_v_new
real,	intent(out),		DIMENSION(klon,klev)	::	d_u_new
real,	intent(out),		DIMENSION(klon,klev)	::	d_v_new

Called by

Contents