PDAF_interfaces_module – TSMP-PDAF Source Code Browser

interface

public subroutine PDAF_init(filtertype, subtype, stepnull, param_int, dim_pint, param_real, dim_preal, COMM_model, COMM_filter, COMM_couple, task_id, n_modeltasks, in_filterpe, U_init_ens, in_screen, flag)

Arguments

Type	Intent		Name
integer,	intent(in)	::	filtertype
integer,	intent(in)	::	subtype
integer,	intent(in)	::	stepnull
integer,	intent(inout)	::	param_int(dim_pint)
integer,	intent(in)	::	dim_pint
real,	intent(inout)	::	param_real(dim_preal)
integer,	intent(in)	::	dim_preal
integer,	intent(in)	::	COMM_model
integer,	intent(in)	::	COMM_filter
integer,	intent(in)	::	COMM_couple
integer,	intent(in)	::	task_id
integer,	intent(in)	::	n_modeltasks
logical,	intent(in)	::	in_filterpe
real		::	U_init_ens
integer,	intent(in)	::	in_screen
integer,	intent(out)	::	flag

interface

public subroutine PDAF_print_info(printtype)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(in)			::	printtype

interface

public subroutine PDAF_deallocate()

Arguments
None

interface

public subroutine PDAF_get_state_si(nsteps, time, doexit, flag)

Arguments

Type	Intent		Name
integer,	intent(inout)	::	nsteps
real,	intent(out)	::	time
integer,	intent(inout)	::	doexit
integer,	intent(inout)	::	flag

interface

public subroutine PDAF_get_state(steps, time, doexit, U_next_observation, U_distribute_state, U_prepoststep, flag)

Arguments

Type	Intent		Name
integer,	intent(inout)	::	steps
real,	intent(out)	::	time
integer,	intent(inout)	::	doexit
real		::	U_next_observation
real		::	U_distribute_state
real		::	U_prepoststep
integer,	intent(inout)	::	flag

interface

public subroutine PDAF_put_state_seek(U_collect_state, U_init_dim_obs, U_obs_op, U_init_obs, U_prepoststep, U_prodRinvA, flag)

Arguments

Type	Intent		Name
real		::	U_collect_state
real		::	U_init_dim_obs
real		::	U_obs_op
real		::	U_init_obs
real		::	U_prepoststep
real		::	U_prodRinvA
integer,	intent(out)	::	flag

interface

public subroutine PDAF_put_state_seek_si(flag)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(inout)			::	flag

interface

public subroutine PDAF_assimilate_seek(U_collect_state, U_distribute_state, U_init_dim_obs, U_obs_op, U_init_obs, U_prepoststep, U_prodRinvA, U_next_observation, flag)

Arguments

Type	Intent		Name
real		::	U_collect_state
real		::	U_distribute_state
real		::	U_init_dim_obs
real		::	U_obs_op
real		::	U_init_obs
real		::	U_prepoststep
real		::	U_prodRinvA
real		::	U_next_observation
integer,	intent(out)	::	flag

interface

public subroutine PDAF_assimilate_seek_si(flag)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(inout)			::	flag

interface

public subroutine PDAF_put_state_seik(U_collect_state, U_init_dim_obs, U_obs_op, U_init_obs, U_prepoststep, U_prodRinvA, U_init_obsvar, flag)

Arguments

Type	Intent		Name
real		::	U_collect_state
real		::	U_init_dim_obs
real		::	U_obs_op
real		::	U_init_obs
real		::	U_prepoststep
real		::	U_prodRinvA
real		::	U_init_obsvar
integer,	intent(out)	::	flag

interface

public subroutine PDAF_put_state_seik_si(flag)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(inout)			::	flag

interface

public subroutine PDAF_assimilate_seik(U_collect_state, U_distribute_state, U_init_dim_obs, U_obs_op, U_init_obs, U_prepoststep, U_prodRinvA, U_next_observation, flag)

Arguments

Type	Intent		Name
real		::	U_collect_state
real		::	U_distribute_state
real		::	U_init_dim_obs
real		::	U_obs_op
real		::	U_init_obs
real		::	U_prepoststep
real		::	U_prodRinvA
real		::	U_next_observation
integer,	intent(out)	::	flag

interface

public subroutine PDAF_assimilate_seik_si(flag)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(inout)			::	flag

interface

public subroutine PDAF_put_state_enkf(U_collect_state, U_init_dim_obs, U_obs_op, U_init_obs, U_prepoststep, U_add_obs_err, U_init_obs_covar, flag)

Arguments

Type	Intent		Name
real		::	U_collect_state
real		::	U_init_dim_obs
real		::	U_obs_op
real		::	U_init_obs
real		::	U_prepoststep
real		::	U_add_obs_err
real		::	U_init_obs_covar
integer,	intent(out)	::	flag

interface

public subroutine PDAF_put_state_enkf_si(flag)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(inout)			::	flag

interface

public subroutine PDAF_assimilate_enkf(U_collect_state, U_distribute_state, U_init_dim_obs, U_obs_op, U_init_obs, U_prepoststep, U_add_obs_error, U_init_obs_covar, U_next_observation, flag)

Arguments

Type	Intent		Name
real		::	U_collect_state
real		::	U_distribute_state
real		::	U_init_dim_obs
real		::	U_obs_op
real		::	U_init_obs
real		::	U_prepoststep
real		::	U_add_obs_error
real		::	U_init_obs_covar
real		::	U_next_observation
integer,	intent(out)	::	flag

interface

public subroutine PDAF_assimilate_enkf_si(flag)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(inout)			::	flag

interface

public subroutine PDAF_put_state_lseik(U_collect_state, U_init_dim_obs, U_obs_op, U_init_obs, U_init_obs_l, U_prepoststep, U_prodRinvA_l, U_init_n_domains_p, U_init_dim_l, U_init_dim_obs_l, U_g2l_state, U_l2g_state, U_g2l_obs, U_init_obsvar, U_init_obsvar_l, flag)

Arguments

Type	Intent		Name
real		::	U_collect_state
real		::	U_init_dim_obs
real		::	U_obs_op
real		::	U_init_obs
real		::	U_init_obs_l
real		::	U_prepoststep
real		::	U_prodRinvA_l
real		::	U_init_n_domains_p
real		::	U_init_dim_l
real		::	U_init_dim_obs_l
real		::	U_g2l_state
real		::	U_l2g_state
real		::	U_g2l_obs
real		::	U_init_obsvar
real		::	U_init_obsvar_l
integer,	intent(out)	::	flag

interface

public subroutine PDAF_put_state_lseik_si(flag)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(inout)			::	flag

interface

public subroutine PDAF_assimilate_lseik(U_collect_state, U_distribute_state, U_init_dim_obs, U_obs_op, U_init_obs, U_init_obs_l, U_prepoststep, U_prodRinvA_l, U_init_n_domains_p, U_init_dim_l, U_init_dim_obs_l, U_g2l_state, U_l2g_state, U_g2l_obs, U_init_obsvar, U_init_obsvar_l, U_next_observation, flag)

Arguments

Type	Intent		Name
real		::	U_collect_state
real		::	U_distribute_state
real		::	U_init_dim_obs
real		::	U_obs_op
real		::	U_init_obs
real		::	U_init_obs_l
real		::	U_prepoststep
real		::	U_prodRinvA_l
real		::	U_init_n_domains_p
real		::	U_init_dim_l
real		::	U_init_dim_obs_l
real		::	U_g2l_state
real		::	U_l2g_state
real		::	U_g2l_obs
real		::	U_init_obsvar
real		::	U_init_obsvar_l
real		::	U_next_observation
integer,	intent(out)	::	flag

interface

public subroutine PDAF_assimilate_lseik_si(flag)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(inout)			::	flag

interface

public subroutine PDAF_put_state_etkf(U_collect_state, U_init_dim_obs, U_obs_op, U_init_obs, U_prepoststep, U_prodRinvA, U_init_obsvar, flag)

Arguments

Type	Intent		Name
real		::	U_collect_state
real		::	U_init_dim_obs
real		::	U_obs_op
real		::	U_init_obs
real		::	U_prepoststep
real		::	U_prodRinvA
real		::	U_init_obsvar
integer,	intent(out)	::	flag

interface

public subroutine PDAF_put_state_etkf_si(flag)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(inout)			::	flag

interface

public subroutine PDAF_assimilate_etkf(U_collect_state, U_distribute_state, U_init_dim_obs, U_obs_op, U_init_obs, U_prepoststep, U_prodRinvA, U_init_obsvar, U_next_observation, flag)

Arguments

Type	Intent		Name
real		::	U_collect_state
real		::	U_distribute_state
real		::	U_init_dim_obs
real		::	U_obs_op
real		::	U_init_obs
real		::	U_prepoststep
real		::	U_prodRinvA
real		::	U_init_obsvar
real		::	U_next_observation
integer,	intent(out)	::	flag

interface

public subroutine PDAF_assimilate_etkf_si(flag)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(inout)			::	flag

interface

public subroutine PDAF_put_state_letkf(U_collect_state, U_init_dim_obs, U_obs_op, U_init_obs, U_init_obs_l, U_prepoststep, U_prodRinvA_l, U_init_n_domains_p, U_init_dim_l, U_init_dim_obs_l, U_g2l_state, U_l2g_state, U_g2l_obs, U_init_obsvar, U_init_obsvar_l, flag)

Arguments

Type	Intent		Name
real		::	U_collect_state
real		::	U_init_dim_obs
real		::	U_obs_op
real		::	U_init_obs
real		::	U_init_obs_l
real		::	U_prepoststep
real		::	U_prodRinvA_l
real		::	U_init_n_domains_p
real		::	U_init_dim_l
real		::	U_init_dim_obs_l
real		::	U_g2l_state
real		::	U_l2g_state
real		::	U_g2l_obs
real		::	U_init_obsvar
real		::	U_init_obsvar_l
integer,	intent(out)	::	flag

interface

public subroutine PDAF_put_state_letkf_si(flag)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(inout)			::	flag

interface

public subroutine PDAF_assimilate_letkf(U_collect_state, U_distribute_state, U_init_dim_obs, U_obs_op, U_init_obs, U_init_obs_l, U_prepoststep, U_prodRinvA_l, U_init_n_domains_p, U_init_dim_l, U_init_dim_obs_l, U_g2l_state, U_l2g_state, U_g2l_obs, U_init_obsvar, U_init_obsvar_l, U_next_observation, flag)

Arguments

Type	Intent		Name
real		::	U_collect_state
real		::	U_distribute_state
real		::	U_init_dim_obs
real		::	U_obs_op
real		::	U_init_obs
real		::	U_init_obs_l
real		::	U_prepoststep
real		::	U_prodRinvA_l
real		::	U_init_n_domains_p
real		::	U_init_dim_l
real		::	U_init_dim_obs_l
real		::	U_g2l_state
real		::	U_l2g_state
real		::	U_g2l_obs
real		::	U_init_obsvar
real		::	U_init_obsvar_l
real		::	U_next_observation
integer,	intent(out)	::	flag

interface

public subroutine PDAF_assimilate_letkf_si(flag)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(inout)			::	flag

interface

public subroutine PDAF_put_state_estkf(U_collect_state, U_init_dim_obs, U_obs_op, U_init_obs, U_prepoststep, U_prodRinvA, U_init_obsvar, flag)

Arguments

Type	Intent		Name
real		::	U_collect_state
real		::	U_init_dim_obs
real		::	U_obs_op
real		::	U_init_obs
real		::	U_prepoststep
real		::	U_prodRinvA
real		::	U_init_obsvar
integer,	intent(out)	::	flag

interface

public subroutine PDAF_put_state_estkf_si(flag)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(inout)			::	flag

interface

public subroutine PDAF_assimilate_estkf(U_collect_state, U_distribute_state, U_init_dim_obs, U_obs_op, U_init_obs, U_prepoststep, U_prodRinvA, U_init_obsvar, U_next_observation, flag)

Arguments

Type	Intent		Name
real		::	U_collect_state
real		::	U_distribute_state
real		::	U_init_dim_obs
real		::	U_obs_op
real		::	U_init_obs
real		::	U_prepoststep
real		::	U_prodRinvA
real		::	U_init_obsvar
real		::	U_next_observation
integer,	intent(out)	::	flag

interface

public subroutine PDAF_assimilate_estkf_si(flag)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(inout)			::	flag

interface

public subroutine PDAF_put_state_lestkf(U_collect_state, U_init_dim_obs, U_obs_op, U_init_obs, U_init_obs_l, U_prepoststep, U_prodRinvA_l, U_init_n_domains_p, U_init_dim_l, U_init_dim_obs_l, U_g2l_state, U_l2g_state, U_g2l_obs, U_init_obsvar, U_init_obsvar_l, flag)

Arguments

Type	Intent		Name
real		::	U_collect_state
real		::	U_init_dim_obs
real		::	U_obs_op
real		::	U_init_obs
real		::	U_init_obs_l
real		::	U_prepoststep
real		::	U_prodRinvA_l
real		::	U_init_n_domains_p
real		::	U_init_dim_l
real		::	U_init_dim_obs_l
real		::	U_g2l_state
real		::	U_l2g_state
real		::	U_g2l_obs
real		::	U_init_obsvar
real		::	U_init_obsvar_l
integer,	intent(out)	::	flag

interface

public subroutine PDAF_put_state_lestkf_si(flag)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(inout)			::	flag

interface

public subroutine PDAF_assimilate_lestkf(U_collect_state, U_distribute_state, U_init_dim_obs, U_obs_op, U_init_obs, U_init_obs_l, U_prepoststep, U_prodRinvA_l, U_init_n_domains_p, U_init_dim_l, U_init_dim_obs_l, U_g2l_state, U_l2g_state, U_g2l_obs, U_init_obsvar, U_init_obsvar_l, U_next_observation, flag)

Arguments

Type	Intent		Name
real		::	U_collect_state
real		::	U_distribute_state
real		::	U_init_dim_obs
real		::	U_obs_op
real		::	U_init_obs
real		::	U_init_obs_l
real		::	U_prepoststep
real		::	U_prodRinvA_l
real		::	U_init_n_domains_p
real		::	U_init_dim_l
real		::	U_init_dim_obs_l
real		::	U_g2l_state
real		::	U_l2g_state
real		::	U_g2l_obs
real		::	U_init_obsvar
real		::	U_init_obsvar_l
real		::	U_next_observation
integer,	intent(out)	::	flag

interface

public subroutine PDAF_assimilate_lestkf_si(flag)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(inout)			::	flag

interface

public subroutine PDAF_put_state_lenkf(U_collect_state, U_init_dim_obs, U_obs_op, U_init_obs, U_prepoststep, U_localize, U_add_obs_err, U_init_obs_covar, flag)

Arguments

Type	Intent		Name
real		::	U_collect_state
real		::	U_init_dim_obs
real		::	U_obs_op
real		::	U_init_obs
real		::	U_prepoststep
real		::	U_localize
real		::	U_add_obs_err
real		::	U_init_obs_covar
integer,	intent(out)	::	flag

interface

public subroutine PDAF_put_state_lenkf_si(flag)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(inout)			::	flag

interface

public subroutine PDAF_assimilate_lenkf(U_collect_state, U_distribute_state, U_init_dim_obs, U_obs_op, U_init_obs, U_prepoststep, U_localize, U_add_obs_error, U_init_obs_covar, U_next_observation, flag)

Arguments

Type	Intent		Name
real		::	U_collect_state
real		::	U_distribute_state
real		::	U_init_dim_obs
real		::	U_obs_op
real		::	U_init_obs
real		::	U_prepoststep
real		::	U_localize
real		::	U_add_obs_error
real		::	U_init_obs_covar
real		::	U_next_observation
integer,	intent(out)	::	flag

interface

public subroutine PDAF_assimilate_lenkf_si(flag)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(inout)			::	flag

interface

public subroutine PDAF_put_state_netf(U_collect_state, U_init_dim_obs, U_obs_op, U_init_obs, U_prepoststep, U_likelihood, flag)

Arguments

Type	Intent		Name
real		::	U_collect_state
real		::	U_init_dim_obs
real		::	U_obs_op
real		::	U_init_obs
real		::	U_prepoststep
real		::	U_likelihood
integer,	intent(out)	::	flag

interface

public subroutine PDAF_put_state_netf_si(flag)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(inout)			::	flag

interface

public subroutine PDAF_assimilate_netf(U_collect_state, U_distribute_state, U_init_dim_obs, U_obs_op, U_init_obs, U_prepoststep, U_likelihood, U_next_observation, flag)

Arguments

Type	Intent		Name
real		::	U_collect_state
real		::	U_distribute_state
real		::	U_init_dim_obs
real		::	U_obs_op
real		::	U_init_obs
real		::	U_prepoststep
real		::	U_likelihood
real		::	U_next_observation
integer,	intent(out)	::	flag

interface

public subroutine PDAF_assimilate_netf_si(flag)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(inout)			::	flag

interface

public subroutine PDAF_put_state_lnetf(U_collect_state, U_init_dim_obs, U_obs_op, U_init_obs_l, U_prepoststep, U_likelihood_l, U_init_n_domains_p, U_init_dim_l, U_init_dim_obs_l, U_g2l_state, U_l2g_state, U_g2l_obs, outflag)

Arguments

Type	Intent		Name
real		::	U_collect_state
real		::	U_init_dim_obs
real		::	U_obs_op
real		::	U_init_obs_l
real		::	U_prepoststep
real		::	U_likelihood_l
real		::	U_init_n_domains_p
real		::	U_init_dim_l
real		::	U_init_dim_obs_l
real		::	U_g2l_state
real		::	U_l2g_state
real		::	U_g2l_obs
integer,	intent(out)	::	outflag

interface

public subroutine PDAF_put_state_lnetf_si(flag)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(inout)			::	flag

interface

public subroutine PDAF_assimilate_lnetf(U_collect_state, U_distribute_state, U_init_dim_obs, U_obs_op, U_init_obs_l, U_prepoststep, U_likelihood_l, U_init_n_domains_p, U_init_dim_l, U_init_dim_obs_l, U_g2l_state, U_l2g_state, U_g2l_obs, U_next_observation, flag)

Arguments

Type	Intent		Name
real		::	U_collect_state
real		::	U_distribute_state
real		::	U_init_dim_obs
real		::	U_obs_op
real		::	U_init_obs_l
real		::	U_prepoststep
real		::	U_likelihood_l
real		::	U_init_n_domains_p
real		::	U_init_dim_l
real		::	U_init_dim_obs_l
real		::	U_g2l_state
real		::	U_l2g_state
real		::	U_g2l_obs
real		::	U_next_observation
integer,	intent(out)	::	flag

interface

public subroutine PDAF_assimilate_lnetf_si(flag)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(inout)			::	flag

interface

public subroutine PDAF_put_state_lknetf(U_collect_state, U_init_dim_obs, U_obs_op, U_init_obs, U_init_obs_l, U_prepoststep, U_prodRinvA_l, U_prodRinvA_hyb_l, U_init_n_domains_p, U_init_dim_l, U_init_dim_obs_l, U_g2l_state, U_l2g_state, U_g2l_obs, U_init_obsvar, U_init_obsvar_l, U_likelihood_l, U_likelihood_hyb_l, outflag)

Arguments

Type	Intent		Name
real		::	U_collect_state
real		::	U_init_dim_obs
real		::	U_obs_op
real		::	U_init_obs
real		::	U_init_obs_l
real		::	U_prepoststep
real		::	U_prodRinvA_l
real		::	U_prodRinvA_hyb_l
real		::	U_init_n_domains_p
real		::	U_init_dim_l
real		::	U_init_dim_obs_l
real		::	U_g2l_state
real		::	U_l2g_state
real		::	U_g2l_obs
real		::	U_init_obsvar
real		::	U_init_obsvar_l
real		::	U_likelihood_l
real		::	U_likelihood_hyb_l
integer,	intent(out)	::	outflag

interface

public subroutine PDAF_put_state_lknetf_si(flag)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(inout)			::	flag

interface

public subroutine PDAF_assimilate_lknetf(U_collect_state, U_distribute_state, U_init_dim_obs, U_obs_op, U_init_obs, U_init_obs_l, U_prepoststep, U_prodRinvA_l, U_prodRinvA_hyb_l, U_init_n_domains_p, U_init_dim_l, U_init_dim_obs_l, U_g2l_state, U_l2g_state, U_g2l_obs, U_init_obsvar, U_init_obsvar_l, U_likelihood_l, U_likelihood_hyb_l, U_next_observation, flag)

Arguments

Type	Intent		Name
real		::	U_collect_state
real		::	U_distribute_state
real		::	U_init_dim_obs
real		::	U_obs_op
real		::	U_init_obs
real		::	U_init_obs_l
real		::	U_prepoststep
real		::	U_prodRinvA_l
real		::	U_prodRinvA_hyb_l
real		::	U_init_n_domains_p
real		::	U_init_dim_l
real		::	U_init_dim_obs_l
real		::	U_g2l_state
real		::	U_l2g_state
real		::	U_g2l_obs
real		::	U_init_obsvar
real		::	U_init_obsvar_l
real		::	U_likelihood_l
real		::	U_likelihood_hyb_l
real		::	U_next_observation
integer,	intent(out)	::	flag

interface

public subroutine PDAF_assimilate_lknetf_si(flag)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(inout)			::	flag

interface

public subroutine PDAF_put_state_generate_obs(U_collect_state, U_init_dim_obs_f, U_obs_op_f, U_get_obs_f, U_init_obserr_f, U_prepoststep, flag)

Arguments

Type	Intent		Name
real		::	U_collect_state
real		::	U_init_dim_obs_f
real		::	U_obs_op_f
real		::	U_get_obs_f
real		::	U_init_obserr_f
real		::	U_prepoststep
integer,	intent(out)	::	flag

interface

public subroutine PDAF_put_state_generate_obs_si(flag)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(inout)			::	flag

interface

public subroutine PDAF_generate_obs(U_collect_state, U_distribute_state, U_init_dim_obs_f, U_obs_op_f, U_get_obs_f, U_init_obserr_f, U_prepoststep, U_next_observation, flag)

Arguments

Type	Intent		Name
real		::	U_collect_state
real		::	U_distribute_state
real		::	U_init_dim_obs_f
real		::	U_obs_op_f
real		::	U_get_obs_f
real		::	U_init_obserr_f
real		::	U_prepoststep
real		::	U_next_observation
integer,	intent(out)	::	flag

interface

public subroutine PDAF_generate_obs_si(flag)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(inout)			::	flag

interface

public subroutine PDAF_put_state_pf(U_collect_state, U_init_dim_obs, U_obs_op, U_init_obs, U_prepoststep, U_likelihood, flag)

Arguments

Type	Intent		Name
real		::	U_collect_state
real		::	U_init_dim_obs
real		::	U_obs_op
real		::	U_init_obs
real		::	U_prepoststep
real		::	U_likelihood
integer,	intent(out)	::	flag

interface

public subroutine PDAF_put_state_pf_si(flag)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(inout)			::	flag

interface

public subroutine PDAF_assimilate_pf(U_collect_state, U_distribute_state, U_init_dim_obs, U_obs_op, U_init_obs, U_prepoststep, U_likelihood, U_next_observation, flag)

Arguments

Type	Intent		Name
real		::	U_collect_state
real		::	U_distribute_state
real		::	U_init_dim_obs
real		::	U_obs_op
real		::	U_init_obs
real		::	U_prepoststep
real		::	U_likelihood
real		::	U_next_observation
integer,	intent(out)	::	flag

interface

public subroutine PDAF_assimilate_pf_si(flag)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(inout)			::	flag

interface

public subroutine PDAF_gather_dim_obs_f(dim_obs_p, dim_obs_f)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(in)			::	dim_obs_p
integer,	intent(out)			::	dim_obs_f

interface

public subroutine PDAF_seik_TtimesA(rank, dim_col, A, B)

Arguments

Type	Intent		Name
integer,	intent(in)	::	rank
integer,	intent(in)	::	dim_col
real,	intent(in)	::	A(rank,dim_col)
real,	intent(out)	::	B(rank+1,dim_col)

interface

public subroutine PDAF_etkf_Tleft(dim_ens, dim, A)

Arguments

Type	Intent		Name
integer,	intent(in)	::	dim_ens
integer,	intent(in)	::	dim
real,	intent(inout)	::	A(dim_ens,dim)

interface

public subroutine PDAF_estkf_OmegaA(rank, dim_col, A, B)

Arguments

Type	Intent		Name
integer,	intent(in)	::	rank
integer,	intent(in)	::	dim_col
real,	intent(in)	::	A(rank,dim_col)
real,	intent(out)	::	B(rank+1,dim_col)

interface

public subroutine PDAF_enkf_Omega(seed, r, dim_ens, Omega, norm, otype, screen)

Arguments

Type	Intent		Name
integer,	intent(in)	::	seed(4)
integer,	intent(in)	::	r
integer,	intent(in)	::	dim_ens
real,	intent(inout)	::	Omega(dim_ens,r)
real,	intent(inout)	::	norm
integer,	intent(in)	::	otype
integer,	intent(in)	::	screen

interface

public subroutine PDAF_seik_Omega(rank, Omega, Omegatype, screen)

Arguments

Type	Intent		Name
integer,	intent(in)	::	rank
real,	intent(inout)	::	Omega(rank+1,rank)
integer,	intent(in)	::	Omegatype
integer,	intent(in)	::	screen

interface

public subroutine PDAF_get_memberid(memberid)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(inout)			::	memberid

interface

public subroutine PDAF_get_obsmemberid(memberid)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(inout)			::	memberid

interface

public subroutine PDAF_local_weight(wtype, rtype, cradius, sradius, distance, nrows, ncols, A, var_obs, weight, verbose)

Arguments

Type	Intent		Name
integer,	intent(in)	::	wtype
integer,	intent(in)	::	rtype
real,	intent(in)	::	cradius
real,	intent(in)	::	sradius
real,	intent(in)	::	distance
integer,	intent(in)	::	nrows
integer,	intent(in)	::	ncols
real,	intent(in)	::	A(nrows,ncols)
real,	intent(in)	::	var_obs
real,	intent(out)	::	weight
integer,	intent(in)	::	verbose

interface

public subroutine PDAF_incremental(steps, U_dist_stateinc)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(in)			::	steps
real				::	U_dist_stateinc

interface

public subroutine PDAF_add_increment(dim_p, state_p)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(in)			::	dim_p
real,	intent(inout)			::	state_p(dim_p)

interface

public subroutine PDAF_get_smootherens(sens_point, maxlag, status)

Arguments

Type	Intent	Attributes		Name
real,	intent(out),	POINTER	::	sens_point(:,:,:)
integer,	intent(out)		::	maxlag
integer,	intent(out)		::	status

interface

public subroutine PDAF_set_smootherens(sens_point, maxlag, status)

Arguments

Type	Intent	Attributes		Name
real,	intent(out),	POINTER	::	sens_point(:,:,:)
integer,	intent(in)		::	maxlag
integer,	intent(out)		::	status

interface

public subroutine PDAF_get_ensstats(skew_ptr, kurt_ptr, status)

Arguments

Type	Intent	Attributes		Name
real,	intent(out),	POINTER	::	skew_ptr(:)
real,	intent(out),	POINTER	::	kurt_ptr(:)
integer,	intent(out)		::	status

interface

public subroutine PDAF_reset_forget(forget_in)

Arguments

Type	Intent	Optional	Attributes		Name
real,	intent(in)			::	forget_in

interface

public subroutine PDAF_put_state_prepost_si(flag)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(inout)			::	flag

interface

public subroutine PDAF_put_state_prepost(U_collect_state, U_prepoststep, flag)

Arguments

Type	Intent		Name
real		::	U_collect_state
real		::	U_prepoststep
integer,	intent(out)	::	flag

interface

public subroutine PDAF_assimilate_prepost(U_collect_state, U_distribute_state, U_prepoststep, U_next_observation, flag)

Arguments

Type	Intent		Name
real		::	U_collect_state
real		::	U_distribute_state
real		::	U_prepoststep
real		::	U_next_observation
integer,	intent(out)	::	flag

interface

public subroutine PDAF_assimilate_prepost_si(flag)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(inout)			::	flag

interface

public subroutine PDAF_set_ens_pointer(ens_point, status)

Arguments

Type	Intent	Optional	Attributes		Name
real,	intent(out),		POINTER	::	ens_point(:,:)
integer,	intent(out)			::	status

interface

public subroutine PDAF_SampleEns(dim, dim_ens, modes, svals, state, ens, verbose, flag)

Arguments

Type	Intent		Name
integer,	intent(in)	::	dim
integer,	intent(in)	::	dim_ens
real,	intent(inout)	::	modes(dim,dim_ens-1)
real,	intent(in)	::	svals(dim_ens-1)
real,	intent(inout)	::	state(dim)
real,	intent(out)	::	ens(dim,dim_ens)
integer,	intent(in)	::	verbose
integer,	intent(inout)	::	flag

interface

public subroutine PDAF_eofcovar(dim_state, nstates, nfields, dim_fields, offsets, remove_mstate, do_mv, states, stddev, svals, svec, meanstate, verbose, status)

Arguments

Type	Intent		Name
integer,	intent(in)	::	dim_state
integer,	intent(in)	::	nstates
integer,	intent(in)	::	nfields
integer,	intent(in)	::	dim_fields(nfields)
integer,	intent(in)	::	offsets(nfields)
integer,	intent(in)	::	remove_mstate
integer,	intent(in)	::	do_mv
real,	intent(inout)	::	states(dim_state,nstates)
real,	intent(out)	::	stddev(nfields)
real,	intent(out)	::	svals(nstates)
real,	intent(out)	::	svec(dim_state,nstates)
real,	intent(inout)	::	meanstate(dim_state)
integer,	intent(in)	::	verbose
integer,	intent(out)	::	status

interface

public subroutine PDAF_diag_histogram(ncall, dim, dim_ens, element, state, ens, hist, delta, status)

Arguments

Type	Intent		Name
integer,	intent(in)	::	ncall
integer,	intent(in)	::	dim
integer,	intent(in)	::	dim_ens
integer,	intent(in)	::	element
real,	intent(in)	::	state(dim)
real,	intent(in)	::	ens(dim,dim_ens)
integer,	intent(inout)	::	hist(dim_ens+1)
real,	intent(out)	::	delta
integer,	intent(out)	::	status

interface

public subroutine PDAF_diag_ensstats(dim, dim_ens, element, state, ens, skewness, kurtosis, status)

Arguments

Type	Intent		Name
integer,	intent(in)	::	dim
integer,	intent(in)	::	dim_ens
integer,	intent(in)	::	element
real,	intent(in)	::	state(dim)
real,	intent(in)	::	ens(dim,dim_ens)
real,	intent(out)	::	skewness
real,	intent(out)	::	kurtosis
integer,	intent(out)	::	status

interface

public subroutine PDAF_diag_effsample(dim_sample, weights, effsample)

Arguments

Type	Intent		Name
integer,	intent(in)	::	dim_sample
real,	intent(in)	::	weights(dim_sample)
real,	intent(out)	::	effsample

interface

public subroutine PDAF_gather_obs_f(obs_p, obs_f, status)

Arguments

Type	Intent		Name
real,	intent(in)	::	obs_p(dimobs_p)
real,	intent(out)	::	obs_f(dimobs_f)
integer,	intent(out)	::	status

interface

public subroutine PDAF_gather_obs_f2(coords_p, coords_f, nrows, status)

Arguments

Type	Intent		Name
real,	intent(in)	::	coords_p(nrows,dimobs_p)
real,	intent(out)	::	coords_f(nrows,dimobs_f)
integer,	intent(in)	::	nrows
integer,	intent(out)	::	status

interface

public subroutine PDAF_get_assim_flag(did_assim)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(out)			::	did_assim

interface

public subroutine PDAF_get_localfilter(lfilter)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(out)			::	lfilter

interface

public subroutine PDAFomi_put_state_global(U_collect_state, U_init_dim_obs, U_obs_op, U_prepoststep, flag)

Arguments

Type	Intent		Name
real		::	U_collect_state
real		::	U_init_dim_obs
real		::	U_obs_op
real		::	U_prepoststep
integer,	intent(out)	::	flag

interface

public subroutine PDAFomi_assimilate_global(U_collect_state, U_distribute_state, U_init_dim_obs, U_obs_op, U_prepoststep, U_next_observation, flag)

Arguments

Type	Intent		Name
real		::	U_collect_state
real		::	U_distribute_state
real		::	U_init_dim_obs
real		::	U_obs_op
real		::	U_prepoststep
real		::	U_next_observation
integer,	intent(out)	::	flag

interface

public subroutine PDAFomi_put_state_local(U_collect_state, U_init_dim_obs, U_obs_op, U_prepoststep, U_init_n_domains_p, U_init_dim_l, U_init_dim_obs_l, U_g2l_state, U_l2g_state, flag)

Arguments

Type	Intent		Name
real		::	U_collect_state
real		::	U_init_dim_obs
real		::	U_obs_op
real		::	U_prepoststep
real		::	U_init_n_domains_p
real		::	U_init_dim_l
real		::	U_init_dim_obs_l
real		::	U_g2l_state
real		::	U_l2g_state
integer,	intent(out)	::	flag

interface

public subroutine PDAFomi_assimilate_local(U_collect_state, U_distribute_state, U_init_dim_obs, U_obs_op, U_prepoststep, U_init_n_domains_p, U_init_dim_l, U_init_dim_obs_l, U_g2l_state, U_l2g_state, U_next_observation, flag)

Arguments

Type	Intent		Name
real		::	U_collect_state
real		::	U_distribute_state
real		::	U_init_dim_obs
real		::	U_obs_op
real		::	U_prepoststep
real		::	U_init_n_domains_p
real		::	U_init_dim_l
real		::	U_init_dim_obs_l
real		::	U_g2l_state
real		::	U_l2g_state
real		::	U_next_observation
integer,	intent(out)	::	flag

interface

public subroutine PDAFomi_put_state_local_si(flag)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(out)			::	flag

interface

public subroutine PDAFomi_assimilate_local_si(flag)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(out)			::	flag

interface

public subroutine PDAFomi_put_state_global_si(flag)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(out)			::	flag

interface

public subroutine PDAFomi_assimilate_global_si(flag)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(out)			::	flag

interface

public subroutine PDAFomi_assimilate_lenkf_si(flag)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(out)			::	flag

interface

public subroutine PDAFomi_put_state_lenkf_si(flag)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(out)			::	flag

interface

public subroutine PDAFomi_put_state_lenkf(U_collect_state, U_init_dim_obs, U_obs_op, U_prepoststep, U_localize, flag)

Arguments

Type	Intent		Name
real		::	U_collect_state
real		::	U_init_dim_obs
real		::	U_obs_op
real		::	U_prepoststep
real		::	U_localize
integer,	intent(out)	::	flag

interface

public subroutine PDAFomi_assimilate_lenkf(U_collect_state, U_distribute_state, U_init_dim_obs, U_obs_op, U_prepoststep, U_localize, U_next_observation, flag)

Arguments

Type	Intent		Name
real		::	U_collect_state
real		::	U_distribute_state
real		::	U_init_dim_obs
real		::	U_obs_op
real		::	U_prepoststep
real		::	U_localize
real		::	U_next_observation
integer,	intent(out)	::	flag

interface

public subroutine PDAFomi_put_state_generate_obs(U_collect_state, U_init_dim_obs_f, U_obs_op_f, U_get_obs_f, U_prepoststep, flag)

Arguments

Type	Intent		Name
real		::	U_collect_state
real		::	U_init_dim_obs_f
real		::	U_obs_op_f
real		::	U_get_obs_f
real		::	U_prepoststep
integer,	intent(out)	::	flag

interface

public subroutine PDAFomi_generate_obs(U_collect_state, U_distribute_state, U_init_dim_obs_f, U_obs_op_f, U_get_obs_f, U_prepoststep, U_next_observation, flag)

Arguments

Type	Intent		Name
real		::	U_collect_state
real		::	U_distribute_state
real		::	U_init_dim_obs_f
real		::	U_obs_op_f
real		::	U_get_obs_f
real		::	U_prepoststep
real		::	U_next_observation
integer,	intent(out)	::	flag

interface

public subroutine PDAFomi_assimilate_3dvar(collect_state_pdaf, distribute_state_pdaf, init_dim_obs_pdaf, obs_op_pdaf, cvt_pdaf, cvt_adj_pdaf, obs_op_lin_pdaf, obs_op_adj_pdaf, prepoststep_pdaf, next_observation_pdaf, outflag)

Arguments

Type	Intent		Name
real		::	collect_state_pdaf
real		::	distribute_state_pdaf
integer		::	init_dim_obs_pdaf
real		::	obs_op_pdaf
real		::	cvt_pdaf
real		::	cvt_adj_pdaf
real		::	obs_op_lin_pdaf
real		::	obs_op_adj_pdaf
real		::	prepoststep_pdaf
integer		::	next_observation_pdaf
integer,	intent(inout)	::	outflag

interface

public subroutine PDAFomi_assimilate_en3dvar_estkf(collect_state_pdaf, distribute_state_pdaf, init_dim_obs_pdaf, obs_op_pdaf, cvt_ens_pdaf, cvt_adj_ens_pdaf, obs_op_lin_pdaf, obs_op_adj_pdaf, prepoststep_pdaf, next_observation_pdaf, outflag)

Arguments

Type	Intent		Name
real		::	collect_state_pdaf
real		::	distribute_state_pdaf
integer		::	init_dim_obs_pdaf
real		::	obs_op_pdaf
real		::	cvt_ens_pdaf
real		::	cvt_adj_ens_pdaf
real		::	obs_op_lin_pdaf
real		::	obs_op_adj_pdaf
real		::	prepoststep_pdaf
integer		::	next_observation_pdaf
integer,	intent(inout)	::	outflag

interface

public subroutine PDAFomi_assimilate_en3dvar_lestkf(collect_state_pdaf, distribute_state_pdaf, init_dim_obs_f_pdaf, obs_op_f_pdaf, cvt_ens_pdaf, cvt_adj_ens_pdaf, obs_op_lin_pdaf, obs_op_adj_pdaf, init_n_domains_pdaf, init_dim_l_pdaf, init_dim_obs_l_pdaf, g2l_state_pdaf, l2g_state_pdaf, prepoststep_pdaf, next_observation_pdaf, outflag)

Arguments

Type	Intent		Name
real		::	collect_state_pdaf
real		::	distribute_state_pdaf
integer		::	init_dim_obs_f_pdaf
real		::	obs_op_f_pdaf
real		::	cvt_ens_pdaf
real		::	cvt_adj_ens_pdaf
real		::	obs_op_lin_pdaf
real		::	obs_op_adj_pdaf
integer		::	init_n_domains_pdaf
integer		::	init_dim_l_pdaf
integer		::	init_dim_obs_l_pdaf
real		::	g2l_state_pdaf
integer		::	l2g_state_pdaf
real		::	prepoststep_pdaf
integer		::	next_observation_pdaf
integer,	intent(inout)	::	outflag

interface

public subroutine PDAFomi_assimilate_hyb3dvar_estkf(collect_state_pdaf, distribute_state_pdaf, init_dim_obs_pdaf, obs_op_pdaf, cvt_ens_pdaf, cvt_adj_ens_pdaf, cvt_pdaf, cvt_adj_pdaf, obs_op_lin_pdaf, obs_op_adj_pdaf, prepoststep_pdaf, next_observation_pdaf, outflag)

Arguments

Type	Intent		Name
real		::	collect_state_pdaf
real		::	distribute_state_pdaf
integer		::	init_dim_obs_pdaf
real		::	obs_op_pdaf
real		::	cvt_ens_pdaf
real		::	cvt_adj_ens_pdaf
real		::	cvt_pdaf
real		::	cvt_adj_pdaf
real		::	obs_op_lin_pdaf
real		::	obs_op_adj_pdaf
real		::	prepoststep_pdaf
integer		::	next_observation_pdaf
integer,	intent(inout)	::	outflag

interface

public subroutine PDAFomi_assimilate_hyb3dvar_lestkf(collect_state_pdaf, distribute_state_pdaf, init_dim_obs_f_pdaf, obs_op_f_pdaf, cvt_ens_pdaf, cvt_adj_ens_pdaf, cvt_pdaf, cvt_adj_pdaf, obs_op_lin_pdaf, obs_op_adj_pdaf, init_n_domains_pdaf, init_dim_l_pdaf, init_dim_obs_l_pdaf, g2l_state_pdaf, l2g_state_pdaf, prepoststep_pdaf, next_observation_pdaf, outflag)

Arguments

Type	Intent		Name
real		::	collect_state_pdaf
real		::	distribute_state_pdaf
integer		::	init_dim_obs_f_pdaf
real		::	obs_op_f_pdaf
real		::	cvt_ens_pdaf
real		::	cvt_adj_ens_pdaf
real		::	cvt_pdaf
real		::	cvt_adj_pdaf
real		::	obs_op_lin_pdaf
real		::	obs_op_adj_pdaf
integer		::	init_n_domains_pdaf
integer		::	init_dim_l_pdaf
integer		::	init_dim_obs_l_pdaf
real		::	g2l_state_pdaf
integer		::	l2g_state_pdaf
real		::	prepoststep_pdaf
integer		::	next_observation_pdaf
integer,	intent(inout)	::	outflag

interface

public subroutine PDAF_assimilate_3dvar(U_collect_state, U_distribute_state, U_init_dim_obs, U_obs_op, U_init_obs, U_prodRinvA, U_cvt, U_cvt_adj, U_obs_op_lin, U_obs_op_adj, U_prepoststep, U_next_observation, outflag)

Arguments

Type	Intent		Name
real		::	U_collect_state
real		::	U_distribute_state
real		::	U_init_dim_obs
real		::	U_obs_op
real		::	U_init_obs
real		::	U_prodRinvA
real		::	U_cvt
real		::	U_cvt_adj
real		::	U_obs_op_lin
real		::	U_obs_op_adj
real		::	U_prepoststep
real		::	U_next_observation
integer,	intent(out)	::	outflag

interface

public subroutine PDAF_assimilate_en3dvar_estkf(U_collect_state, U_distribute_state, U_init_dim_obs, U_obs_op, U_init_obs, U_prodRinvA, U_cvt_ens, U_cvt_adj_ens, U_obs_op_lin, U_obs_op_adj, U_init_obsvar, U_prepoststep, U_next_observation, outflag)

Arguments

Type	Intent		Name
real		::	U_collect_state
real		::	U_distribute_state
real		::	U_init_dim_obs
real		::	U_obs_op
real		::	U_init_obs
real		::	U_prodRinvA
real		::	U_cvt_ens
real		::	U_cvt_adj_ens
real		::	U_obs_op_lin
real		::	U_obs_op_adj
real		::	U_init_obsvar
real		::	U_prepoststep
real		::	U_next_observation
integer,	intent(out)	::	outflag

interface

public subroutine PDAF_assimilate_en3dvar_lestkf(U_collect_state, U_distribute_state, U_init_dim_obs, U_obs_op, U_init_obs, U_prodRinvA, U_cvt_ens, U_cvt_adj_ens, U_obs_op_lin, U_obs_op_adj, U_init_dim_obs_f, U_obs_op_f, U_init_obs_f, U_init_obs_l, U_prodRinvA_l, U_init_n_domains_p, U_init_dim_l, U_init_dim_obs_l, U_g2l_state, U_l2g_state, U_g2l_obs, U_init_obsvar, U_init_obsvar_l, U_prepoststep, U_next_observation, outflag)

Arguments

Type	Intent		Name
real		::	U_collect_state
real		::	U_distribute_state
real		::	U_init_dim_obs
real		::	U_obs_op
real		::	U_init_obs
real		::	U_prodRinvA
real		::	U_cvt_ens
real		::	U_cvt_adj_ens
real		::	U_obs_op_lin
real		::	U_obs_op_adj
real		::	U_init_dim_obs_f
real		::	U_obs_op_f
real		::	U_init_obs_f
real		::	U_init_obs_l
real		::	U_prodRinvA_l
real		::	U_init_n_domains_p
real		::	U_init_dim_l
real		::	U_init_dim_obs_l
real		::	U_g2l_state
real		::	U_l2g_state
real		::	U_g2l_obs
real		::	U_init_obsvar
real		::	U_init_obsvar_l
real		::	U_prepoststep
real		::	U_next_observation
integer,	intent(inout)	::	outflag

interface

public subroutine PDAF_assimilate_hyb3dvar_estkf(U_collect_state, U_distribute_state, U_init_dim_obs, U_obs_op, U_init_obs, U_prodRinvA, U_cvt_ens, U_cvt_adj_ens, U_cvt, U_cvt_adj, U_obs_op_lin, U_obs_op_adj, U_init_obsvar, U_prepoststep, U_next_observation, outflag)

Arguments

Type	Intent		Name
real		::	U_collect_state
real		::	U_distribute_state
real		::	U_init_dim_obs
real		::	U_obs_op
real		::	U_init_obs
real		::	U_prodRinvA
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
real		::	U_prepoststep
real		::	U_next_observation
integer,	intent(out)	::	outflag

interface

public subroutine PDAF_assimilate_hyb3dvar_lestkf(U_collect_state, U_distribute_state, U_init_dim_obs, U_obs_op, U_init_obs, U_prodRinvA, U_cvt_ens, U_cvt_adj_ens, U_cvt, U_cvt_adj, U_obs_op_lin, U_obs_op_adj, U_init_dim_obs_f, U_obs_op_f, U_init_obs_f, U_init_obs_l, U_prodRinvA_l, U_init_n_domains_p, U_init_dim_l, U_init_dim_obs_l, U_g2l_state, U_l2g_state, U_g2l_obs, U_init_obsvar, U_init_obsvar_l, U_prepoststep, U_next_observation, outflag)

Arguments

Type	Intent		Name
real		::	U_collect_state
real		::	U_distribute_state
real		::	U_init_dim_obs
real		::	U_obs_op
real		::	U_init_obs
real		::	U_prodRinvA
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_dim_obs_f
real		::	U_obs_op_f
real		::	U_init_obs_f
real		::	U_init_obs_l
real		::	U_prodRinvA_l
real		::	U_init_n_domains_p
real		::	U_init_dim_l
real		::	U_init_dim_obs_l
real		::	U_g2l_state
real		::	U_l2g_state
real		::	U_g2l_obs
real		::	U_init_obsvar
real		::	U_init_obsvar_l
real		::	U_prepoststep
real		::	U_next_observation
integer,	intent(out)	::	outflag

interface

public subroutine PDAFomi_put_state_3dvar(collect_state_pdaf, init_dim_obs_pdaf, obs_op_pdaf, cvt_pdaf, cvt_adj_pdaf, obs_op_lin_pdaf, obs_op_adj_pdaf, prepoststep_pdaf, outflag)

Arguments

Type	Intent		Name
real		::	collect_state_pdaf
integer		::	init_dim_obs_pdaf
real		::	obs_op_pdaf
real		::	cvt_pdaf
real		::	cvt_adj_pdaf
real		::	obs_op_lin_pdaf
real		::	obs_op_adj_pdaf
real		::	prepoststep_pdaf
integer,	intent(inout)	::	outflag

interface

public subroutine PDAFomi_put_state_en3dvar_estkf(collect_state_pdaf, init_dim_obs_pdaf, obs_op_pdaf, cvt_ens_pdaf, cvt_adj_ens_pdaf, obs_op_lin_pdaf, obs_op_adj_pdaf, prepoststep_pdaf, outflag)

Arguments

Type	Intent		Name
real		::	collect_state_pdaf
integer		::	init_dim_obs_pdaf
real		::	obs_op_pdaf
real		::	cvt_ens_pdaf
real		::	cvt_adj_ens_pdaf
real		::	obs_op_lin_pdaf
real		::	obs_op_adj_pdaf
real		::	prepoststep_pdaf
integer,	intent(inout)	::	outflag

interface

public subroutine PDAFomi_put_state_en3dvar_lestkf(collect_state_pdaf, init_dim_obs_f_pdaf, obs_op_f_pdaf, cvt_ens_pdaf, cvt_adj_ens_pdaf, obs_op_lin_pdaf, obs_op_adj_pdaf, init_n_domains_pdaf, init_dim_l_pdaf, init_dim_obs_l_pdaf, g2l_state_pdaf, l2g_state_pdaf, prepoststep_pdaf, outflag)

Arguments

Type	Intent		Name
real		::	collect_state_pdaf
integer		::	init_dim_obs_f_pdaf
real		::	obs_op_f_pdaf
real		::	cvt_ens_pdaf
real		::	cvt_adj_ens_pdaf
real		::	obs_op_lin_pdaf
real		::	obs_op_adj_pdaf
integer		::	init_n_domains_pdaf
integer		::	init_dim_l_pdaf
integer		::	init_dim_obs_l_pdaf
real		::	g2l_state_pdaf
integer		::	l2g_state_pdaf
real		::	prepoststep_pdaf
integer,	intent(inout)	::	outflag

interface

public subroutine PDAFomi_put_state_hyb3dvar_estkf(collect_state_pdaf, init_dim_obs_pdaf, obs_op_pdaf, cvt_ens_pdaf, cvt_adj_ens_pdaf, cvt_pdaf, cvt_adj_pdaf, obs_op_lin_pdaf, obs_op_adj_pdaf, prepoststep_pdaf, outflag)

Arguments

Type	Intent		Name
real		::	collect_state_pdaf
integer		::	init_dim_obs_pdaf
real		::	obs_op_pdaf
real		::	cvt_ens_pdaf
real		::	cvt_adj_ens_pdaf
real		::	cvt_pdaf
real		::	cvt_adj_pdaf
real		::	obs_op_lin_pdaf
real		::	obs_op_adj_pdaf
real		::	prepoststep_pdaf
integer,	intent(inout)	::	outflag

interface

public subroutine PDAFomi_put_state_hyb3dvar_lestkf(collect_state_pdaf, init_dim_obs_f_pdaf, obs_op_f_pdaf, cvt_ens_pdaf, cvt_adj_ens_pdaf, cvt_pdaf, cvt_adj_pdaf, obs_op_lin_pdaf, obs_op_adj_pdaf, init_n_domains_pdaf, init_dim_l_pdaf, init_dim_obs_l_pdaf, g2l_state_pdaf, l2g_state_pdaf, prepoststep_pdaf, outflag)

Arguments

Type	Intent		Name
real		::	collect_state_pdaf
integer		::	init_dim_obs_f_pdaf
real		::	obs_op_f_pdaf
real		::	cvt_ens_pdaf
real		::	cvt_adj_ens_pdaf
real		::	cvt_pdaf
real		::	cvt_adj_pdaf
real		::	obs_op_lin_pdaf
real		::	obs_op_adj_pdaf
integer		::	init_n_domains_pdaf
integer		::	init_dim_l_pdaf
integer		::	init_dim_obs_l_pdaf
real		::	g2l_state_pdaf
integer		::	l2g_state_pdaf
real		::	prepoststep_pdaf
integer,	intent(inout)	::	outflag

interface

public subroutine PDAF_put_state_3dvar(U_collect_state, U_init_dim_obs, U_obs_op, U_init_obs, U_prodRinvA, U_cvt, U_cvt_adj, U_obs_op_lin, U_obs_op_adj, U_prepoststep, outflag)

Arguments

Type	Intent		Name
real		::	U_collect_state
real		::	U_init_dim_obs
real		::	U_obs_op
real		::	U_init_obs
real		::	U_prodRinvA
real		::	U_cvt
real		::	U_cvt_adj
real		::	U_obs_op_lin
real		::	U_obs_op_adj
real		::	U_prepoststep
integer,	intent(out)	::	outflag

interface

public subroutine PDAF_put_state_en3dvar_estkf(U_collect_state, U_init_dim_obs, U_obs_op, U_init_obs, U_prodRinvA, U_cvt_ens, U_cvt_adj_ens, U_obs_op_lin, U_obs_op_adj, U_init_obsvar, U_prepoststep, outflag)

Arguments

Type	Intent		Name
real		::	U_collect_state
real		::	U_init_dim_obs
real		::	U_obs_op
real		::	U_init_obs
real		::	U_prodRinvA
real		::	U_cvt_ens
real		::	U_cvt_adj_ens
real		::	U_obs_op_lin
real		::	U_obs_op_adj
real		::	U_init_obsvar
real		::	U_prepoststep
integer,	intent(out)	::	outflag

interface

public subroutine PDAF_put_state_en3dvar_lestkf(U_collect_state, U_init_dim_obs, U_obs_op, U_init_obs, U_prodRinvA, U_cvt_ens, U_cvt_adj_ens, U_obs_op_lin, U_obs_op_adj, U_init_dim_obs_f, U_obs_op_f, U_init_obs_f, U_init_obs_l, U_prodRinvA_l, U_init_n_domains_p, U_init_dim_l, U_init_dim_obs_l, U_g2l_state, U_l2g_state, U_g2l_obs, U_init_obsvar, U_init_obsvar_l, U_prepoststep, outflag)

Arguments

Type	Intent		Name
real		::	U_collect_state
real		::	U_init_dim_obs
real		::	U_obs_op
real		::	U_init_obs
real		::	U_prodRinvA
real		::	U_cvt_ens
real		::	U_cvt_adj_ens
real		::	U_obs_op_lin
real		::	U_obs_op_adj
real		::	U_init_dim_obs_f
real		::	U_obs_op_f
real		::	U_init_obs_f
real		::	U_init_obs_l
real		::	U_prodRinvA_l
real		::	U_init_n_domains_p
real		::	U_init_dim_l
real		::	U_init_dim_obs_l
real		::	U_g2l_state
real		::	U_l2g_state
real		::	U_g2l_obs
real		::	U_init_obsvar
real		::	U_init_obsvar_l
real		::	U_prepoststep
integer,	intent(out)	::	outflag

interface

public subroutine PDAF_put_state_hyb3dvar_estkf(U_collect_state, U_init_dim_obs, U_obs_op, U_init_obs, U_prodRinvA, U_cvt, U_cvt_adj, U_cvt_ens, U_cvt_adj_ens, U_obs_op_lin, U_obs_op_adj, U_init_obsvar, U_prepoststep, outflag)

Arguments

Type	Intent		Name
real		::	U_collect_state
real		::	U_init_dim_obs
real		::	U_obs_op
real		::	U_init_obs
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
real		::	U_init_obsvar
real		::	U_prepoststep
integer,	intent(out)	::	outflag

interface

public subroutine PDAF_put_state_hyb3dvar_lestkf(U_collect_state, U_init_dim_obs, U_obs_op, U_init_obs, U_prodRinvA, U_cvt_ens, U_cvt_adj_ens, U_cvt, U_cvt_adj, U_obs_op_lin, U_obs_op_adj, U_init_dim_obs_f, U_obs_op_f, U_init_obs_f, U_init_obs_l, U_prodRinvA_l, U_init_n_domains_p, U_init_dim_l, U_init_dim_obs_l, U_g2l_state, U_l2g_state, U_g2l_obs, U_init_obsvar, U_init_obsvar_l, U_prepoststep, outflag)

Arguments

Type	Intent		Name
real		::	U_collect_state
real		::	U_init_dim_obs
real		::	U_obs_op
real		::	U_init_obs
real		::	U_prodRinvA
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_dim_obs_f
real		::	U_obs_op_f
real		::	U_init_obs_f
real		::	U_init_obs_l
real		::	U_prodRinvA_l
real		::	U_init_n_domains_p
real		::	U_init_dim_l
real		::	U_init_dim_obs_l
real		::	U_g2l_state
real		::	U_l2g_state
real		::	U_g2l_obs
real		::	U_init_obsvar
real		::	U_init_obsvar_l
real		::	U_prepoststep
integer,	intent(out)	::	outflag

interface

public subroutine PDAF_set_debug_flag(debugval)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(in)			::	debugval

interface

public subroutine PDAF_set_offline_mode(screen)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(in)			::	screen

PDAF_interfaces_module Module

Contents

Interfaces

Interfaces

interface

public subroutine PDAF_init(filtertype, subtype, stepnull, param_int, dim_pint, param_real, dim_preal, COMM_model, COMM_filter, COMM_couple, task_id, n_modeltasks, in_filterpe, U_init_ens, in_screen, flag)

Arguments

interface

public subroutine PDAF_print_info(printtype)

Arguments

interface

public subroutine PDAF_deallocate()

Arguments

interface

public subroutine PDAF_get_state_si(nsteps, time, doexit, flag)

Arguments

interface

public subroutine PDAF_get_state(steps, time, doexit, U_next_observation, U_distribute_state, U_prepoststep, flag)

Arguments

interface

public subroutine PDAF_put_state_seek(U_collect_state, U_init_dim_obs, U_obs_op, U_init_obs, U_prepoststep, U_prodRinvA, flag)

Arguments

interface

public subroutine PDAF_put_state_seek_si(flag)

Arguments

interface

public subroutine PDAF_assimilate_seek(U_collect_state, U_distribute_state, U_init_dim_obs, U_obs_op, U_init_obs, U_prepoststep, U_prodRinvA, U_next_observation, flag)

Arguments

interface

public subroutine PDAF_assimilate_seek_si(flag)

Arguments

interface

public subroutine PDAF_put_state_seik(U_collect_state, U_init_dim_obs, U_obs_op, U_init_obs, U_prepoststep, U_prodRinvA, U_init_obsvar, flag)

Arguments

interface

public subroutine PDAF_put_state_seik_si(flag)

Arguments

interface

public subroutine PDAF_assimilate_seik(U_collect_state, U_distribute_state, U_init_dim_obs, U_obs_op, U_init_obs, U_prepoststep, U_prodRinvA, U_next_observation, flag)

Arguments

interface

public subroutine PDAF_assimilate_seik_si(flag)

Arguments

interface

public subroutine PDAF_put_state_enkf(U_collect_state, U_init_dim_obs, U_obs_op, U_init_obs, U_prepoststep, U_add_obs_err, U_init_obs_covar, flag)

Arguments

interface

public subroutine PDAF_put_state_enkf_si(flag)

Arguments

interface

public subroutine PDAF_assimilate_enkf(U_collect_state, U_distribute_state, U_init_dim_obs, U_obs_op, U_init_obs, U_prepoststep, U_add_obs_error, U_init_obs_covar, U_next_observation, flag)

Arguments

interface

public subroutine PDAF_assimilate_enkf_si(flag)

Arguments

interface

public subroutine PDAF_put_state_lseik(U_collect_state, U_init_dim_obs, U_obs_op, U_init_obs, U_init_obs_l, U_prepoststep, U_prodRinvA_l, U_init_n_domains_p, U_init_dim_l, U_init_dim_obs_l, U_g2l_state, U_l2g_state, U_g2l_obs, U_init_obsvar, U_init_obsvar_l, flag)

Arguments

interface

public subroutine PDAF_put_state_lseik_si(flag)

Arguments

interface

Arguments

interface

public subroutine PDAF_assimilate_lseik_si(flag)

Arguments

interface

public subroutine PDAF_put_state_etkf(U_collect_state, U_init_dim_obs, U_obs_op, U_init_obs, U_prepoststep, U_prodRinvA, U_init_obsvar, flag)

Arguments

interface

public subroutine PDAF_put_state_etkf_si(flag)

Arguments

interface

public subroutine PDAF_assimilate_etkf(U_collect_state, U_distribute_state, U_init_dim_obs, U_obs_op, U_init_obs, U_prepoststep, U_prodRinvA, U_init_obsvar, U_next_observation, flag)

Arguments

interface

public subroutine PDAF_assimilate_etkf_si(flag)

Arguments

interface

public subroutine PDAF_put_state_letkf(U_collect_state, U_init_dim_obs, U_obs_op, U_init_obs, U_init_obs_l, U_prepoststep, U_prodRinvA_l, U_init_n_domains_p, U_init_dim_l, U_init_dim_obs_l, U_g2l_state, U_l2g_state, U_g2l_obs, U_init_obsvar, U_init_obsvar_l, flag)