PDAF_en3dvar_costf_cvt Subroutine

subroutine PDAF_en3dvar_costf_cvt(step, iter, dim_p, dim_ens, dim_cvec_p, dim_obs_p, ens_p, obs_p, dy_p, v_p, J_tot, gradJ, U_prodRinvA, U_cvt_ens, U_cvt_adj_ens, U_obs_op_lin, U_obs_op_adj, opt_parallel)

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: step
integer, intent(in) :: iter
integer, intent(in) :: dim_p
integer, intent(in) :: dim_ens
integer, intent(in) :: dim_cvec_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(in) :: v_p(dim_cvec_p)
real, intent(out) :: J_tot
real, intent(out) :: gradJ(dim_cvec_p)
real :: U_prodRinvA
real :: U_cvt_ens
real :: U_cvt_adj_ens
real :: U_obs_op_lin
real :: U_obs_op_adj
integer, intent(in) :: opt_parallel