PDAF_hyb3dvar_optim_cgplus Subroutine

subroutine PDAF_hyb3dvar_optim_cgplus(step, dim_p, dim_ens, dim_cv_par_p, dim_cv_ens_p, dim_obs_p, ens_p, obs_p, dy_p, v_par_p, v_ens_p, U_prodRinvA, U_cvt, U_cvt_adj, U_cvt_ens, U_cvt_adj_ens, U_obs_op_lin, U_obs_op_adj, opt_parallel, beta_3dvar, screen)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(in)			::	step
integer,	intent(in)			::	dim_p
integer,	intent(in)			::	dim_ens
integer,	intent(in)			::	dim_cv_par_p
integer,	intent(in)			::	dim_cv_ens_p
integer,	intent(in)			::	dim_obs_p
real,	intent(in)			::	ens_p(dim_p,dim_ens)
real,	intent(in)			::	obs_p(dim_obs_p)
real,	intent(in)			::	dy_p(dim_obs_p)
real,	intent(inout)			::	v_par_p(dim_cv_par_p)
real,	intent(inout)			::	v_ens_p(dim_cv_ens_p)
real				::	U_prodRinvA
real				::	U_cvt
real				::	U_cvt_adj
real				::	U_cvt_ens
real				::	U_cvt_adj_ens
real				::	U_obs_op_lin
real				::	U_obs_op_adj
integer,	intent(in)			::	opt_parallel
real,	intent(in)			::	beta_3dvar
integer,	intent(in)			::	screen

Common Blocks

PDAF_en3dvar_optim_cgplus (subroutine)
PDAF_3dvar_optim_cgplus (subroutine)
"> common /cgdd/

Type	Attributes		Name		Initial
integer		::	mp
integer		::	lp

PDAF_en3dvar_optim_cgplus (subroutine)
PDAF_3dvar_optim_cgplus (subroutine)
"> common /runinf/

Type	Attributes		Name		Initial
integer		::	iter
integer		::	nfun