PDAF_hyb3dvar_update_estkf Subroutine

subroutine PDAF_hyb3dvar_update_estkf(step, dim_p, dim_obs_p, dim_ens, dim_cvec, dim_cvec_ens, state_p, Uinv, ens_p, state_inc_p, U_init_dim_obs, U_obs_op, U_init_obs, U_prodRinvA, U_prepoststep, U_cvt_ens, U_cvt_adj_ens, U_cvt, U_cvt_adj, U_obs_op_lin, U_obs_op_adj, U_init_obsvar, screen, subtype, incremental, type_forget, type_opt, flag)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(in)			::	step
integer,	intent(in)			::	dim_p
integer,	intent(out)			::	dim_obs_p
integer,	intent(in)			::	dim_ens
integer,	intent(in)			::	dim_cvec
integer,	intent(in)			::	dim_cvec_ens
real,	intent(inout)			::	state_p(dim_p)
real,	intent(inout)			::	Uinv(dim_ens-1,dim_ens-1)
real,	intent(inout)			::	ens_p(dim_p,dim_ens)
real,	intent(inout)			::	state_inc_p(dim_p)
real				::	U_init_dim_obs
real				::	U_obs_op
real				::	U_init_obs
real				::	U_prodRinvA
real				::	U_prepoststep
real				::	U_cvt_ens
real				::	U_cvt_adj_ens
real				::	U_cvt
real				::	U_cvt_adj
real				::	U_obs_op_lin
real				::	U_obs_op_adj
real				::	U_init_obsvar
integer,	intent(in)			::	screen
integer,	intent(in)			::	subtype
integer,	intent(in)			::	incremental
integer,	intent(in)			::	type_forget
integer,	intent(in)			::	type_opt
integer,	intent(inout)			::	flag