var Interface

public interface var

Variance of array elements (Specification)

Functions

private module function var_1_cdp_cdp(x, dim, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=dp),	intent(in)			::	x(:)
integer,	intent(in)			::	dim
logical,	intent(in),	optional		::	mask
logical,	intent(in),	optional		::	corrected

Return Value real(kind=dp)

private module function var_1_csp_csp(x, dim, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=sp),	intent(in)			::	x(:)
integer,	intent(in)			::	dim
logical,	intent(in),	optional		::	mask
logical,	intent(in),	optional		::	corrected

Return Value real(kind=sp)

private module function var_1_iint16_dp(x, dim, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int16),	intent(in)			::	x(:)
integer,	intent(in)			::	dim
logical,	intent(in),	optional		::	mask
logical,	intent(in),	optional		::	corrected

Return Value real(kind=dp)

private module function var_1_iint32_dp(x, dim, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int32),	intent(in)			::	x(:)
integer,	intent(in)			::	dim
logical,	intent(in),	optional		::	mask
logical,	intent(in),	optional		::	corrected

Return Value real(kind=dp)

private module function var_1_iint64_dp(x, dim, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int64),	intent(in)			::	x(:)
integer,	intent(in)			::	dim
logical,	intent(in),	optional		::	mask
logical,	intent(in),	optional		::	corrected

Return Value real(kind=dp)

private module function var_1_iint8_dp(x, dim, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int8),	intent(in)			::	x(:)
integer,	intent(in)			::	dim
logical,	intent(in),	optional		::	mask
logical,	intent(in),	optional		::	corrected

Return Value real(kind=dp)

private module function var_1_rdp_rdp(x, dim, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=dp),	intent(in)			::	x(:)
integer,	intent(in)			::	dim
logical,	intent(in),	optional		::	mask
logical,	intent(in),	optional		::	corrected

Return Value real(kind=dp)

private module function var_1_rsp_rsp(x, dim, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=sp),	intent(in)			::	x(:)
integer,	intent(in)			::	dim
logical,	intent(in),	optional		::	mask
logical,	intent(in),	optional		::	corrected

Return Value real(kind=sp)

private module function var_2_cdp_cdp(x, dim, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=dp),	intent(in)			::	x(:,:)
integer,	intent(in)			::	dim
logical,	intent(in),	optional		::	mask
logical,	intent(in),	optional		::	corrected

Return Value real(kind=dp), (merge(size(x,1),size(x,2),mask=1

private module function var_2_csp_csp(x, dim, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=sp),	intent(in)			::	x(:,:)
integer,	intent(in)			::	dim
logical,	intent(in),	optional		::	mask
logical,	intent(in),	optional		::	corrected

Return Value real(kind=sp), (merge(size(x,1),size(x,2),mask=1

private module function var_2_iint16_dp(x, dim, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int16),	intent(in)			::	x(:,:)
integer,	intent(in)			::	dim
logical,	intent(in),	optional		::	mask
logical,	intent(in),	optional		::	corrected

Return Value real(kind=dp), (merge(size(x,1),size(x,2),mask=1

private module function var_2_iint32_dp(x, dim, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int32),	intent(in)			::	x(:,:)
integer,	intent(in)			::	dim
logical,	intent(in),	optional		::	mask
logical,	intent(in),	optional		::	corrected

Return Value real(kind=dp), (merge(size(x,1),size(x,2),mask=1

private module function var_2_iint64_dp(x, dim, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int64),	intent(in)			::	x(:,:)
integer,	intent(in)			::	dim
logical,	intent(in),	optional		::	mask
logical,	intent(in),	optional		::	corrected

Return Value real(kind=dp), (merge(size(x,1),size(x,2),mask=1

private module function var_2_iint8_dp(x, dim, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int8),	intent(in)			::	x(:,:)
integer,	intent(in)			::	dim
logical,	intent(in),	optional		::	mask
logical,	intent(in),	optional		::	corrected

Return Value real(kind=dp), (merge(size(x,1),size(x,2),mask=1

private module function var_2_rdp_rdp(x, dim, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=dp),	intent(in)			::	x(:,:)
integer,	intent(in)			::	dim
logical,	intent(in),	optional		::	mask
logical,	intent(in),	optional		::	corrected

Return Value real(kind=dp), (merge(size(x,1),size(x,2),mask=1

private module function var_2_rsp_rsp(x, dim, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=sp),	intent(in)			::	x(:,:)
integer,	intent(in)			::	dim
logical,	intent(in),	optional		::	mask
logical,	intent(in),	optional		::	corrected

Return Value real(kind=sp), (merge(size(x,1),size(x,2),mask=1

private module function var_3_cdp_cdp(x, dim, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=dp),	intent(in)			::	x(:,:,:)
integer,	intent(in)			::	dim
logical,	intent(in),	optional		::	mask
logical,	intent(in),	optional		::	corrected

Return Value real(kind=dp), (merge(size(x,1),size(x,2),mask=1

private module function var_3_csp_csp(x, dim, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=sp),	intent(in)			::	x(:,:,:)
integer,	intent(in)			::	dim
logical,	intent(in),	optional		::	mask
logical,	intent(in),	optional		::	corrected

Return Value real(kind=sp), (merge(size(x,1),size(x,2),mask=1

private module function var_3_iint16_dp(x, dim, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int16),	intent(in)			::	x(:,:,:)
integer,	intent(in)			::	dim
logical,	intent(in),	optional		::	mask
logical,	intent(in),	optional		::	corrected

Return Value real(kind=dp), (merge(size(x,1),size(x,2),mask=1

private module function var_3_iint32_dp(x, dim, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int32),	intent(in)			::	x(:,:,:)
integer,	intent(in)			::	dim
logical,	intent(in),	optional		::	mask
logical,	intent(in),	optional		::	corrected

Return Value real(kind=dp), (merge(size(x,1),size(x,2),mask=1

private module function var_3_iint64_dp(x, dim, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int64),	intent(in)			::	x(:,:,:)
integer,	intent(in)			::	dim
logical,	intent(in),	optional		::	mask
logical,	intent(in),	optional		::	corrected

Return Value real(kind=dp), (merge(size(x,1),size(x,2),mask=1

private module function var_3_iint8_dp(x, dim, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int8),	intent(in)			::	x(:,:,:)
integer,	intent(in)			::	dim
logical,	intent(in),	optional		::	mask
logical,	intent(in),	optional		::	corrected

Return Value real(kind=dp), (merge(size(x,1),size(x,2),mask=1

private module function var_3_rdp_rdp(x, dim, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=dp),	intent(in)			::	x(:,:,:)
integer,	intent(in)			::	dim
logical,	intent(in),	optional		::	mask
logical,	intent(in),	optional		::	corrected

Return Value real(kind=dp), (merge(size(x,1),size(x,2),mask=1

private module function var_3_rsp_rsp(x, dim, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=sp),	intent(in)			::	x(:,:,:)
integer,	intent(in)			::	dim
logical,	intent(in),	optional		::	mask
logical,	intent(in),	optional		::	corrected

Return Value real(kind=sp), (merge(size(x,1),size(x,2),mask=1

private module function var_all_1_cdp_cdp(x, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=dp),	intent(in)			::	x(:)
logical,	intent(in),	optional		::	mask
logical,	intent(in),	optional		::	corrected

Return Value real(kind=dp)

private module function var_all_1_csp_csp(x, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=sp),	intent(in)			::	x(:)
logical,	intent(in),	optional		::	mask
logical,	intent(in),	optional		::	corrected

Return Value real(kind=sp)

private module function var_all_1_iint16_dp(x, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int16),	intent(in)			::	x(:)
logical,	intent(in),	optional		::	mask
logical,	intent(in),	optional		::	corrected

Return Value real(kind=dp)

private module function var_all_1_iint32_dp(x, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int32),	intent(in)			::	x(:)
logical,	intent(in),	optional		::	mask
logical,	intent(in),	optional		::	corrected

Return Value real(kind=dp)

private module function var_all_1_iint64_dp(x, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int64),	intent(in)			::	x(:)
logical,	intent(in),	optional		::	mask
logical,	intent(in),	optional		::	corrected

Return Value real(kind=dp)

private module function var_all_1_iint8_dp(x, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int8),	intent(in)			::	x(:)
logical,	intent(in),	optional		::	mask
logical,	intent(in),	optional		::	corrected

Return Value real(kind=dp)

private module function var_all_1_rdp_rdp(x, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=dp),	intent(in)			::	x(:)
logical,	intent(in),	optional		::	mask
logical,	intent(in),	optional		::	corrected

Return Value real(kind=dp)

private module function var_all_1_rsp_rsp(x, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=sp),	intent(in)			::	x(:)
logical,	intent(in),	optional		::	mask
logical,	intent(in),	optional		::	corrected

Return Value real(kind=sp)

private module function var_all_2_cdp_cdp(x, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=dp),	intent(in)			::	x(:,:)
logical,	intent(in),	optional		::	mask
logical,	intent(in),	optional		::	corrected

Return Value real(kind=dp)

private module function var_all_2_csp_csp(x, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=sp),	intent(in)			::	x(:,:)
logical,	intent(in),	optional		::	mask
logical,	intent(in),	optional		::	corrected

Return Value real(kind=sp)

private module function var_all_2_iint16_dp(x, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int16),	intent(in)			::	x(:,:)
logical,	intent(in),	optional		::	mask
logical,	intent(in),	optional		::	corrected

Return Value real(kind=dp)

private module function var_all_2_iint32_dp(x, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int32),	intent(in)			::	x(:,:)
logical,	intent(in),	optional		::	mask
logical,	intent(in),	optional		::	corrected

Return Value real(kind=dp)

private module function var_all_2_iint64_dp(x, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int64),	intent(in)			::	x(:,:)
logical,	intent(in),	optional		::	mask
logical,	intent(in),	optional		::	corrected

Return Value real(kind=dp)

private module function var_all_2_iint8_dp(x, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int8),	intent(in)			::	x(:,:)
logical,	intent(in),	optional		::	mask
logical,	intent(in),	optional		::	corrected

Return Value real(kind=dp)

private module function var_all_2_rdp_rdp(x, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=dp),	intent(in)			::	x(:,:)
logical,	intent(in),	optional		::	mask
logical,	intent(in),	optional		::	corrected

Return Value real(kind=dp)

private module function var_all_2_rsp_rsp(x, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=sp),	intent(in)			::	x(:,:)
logical,	intent(in),	optional		::	mask
logical,	intent(in),	optional		::	corrected

Return Value real(kind=sp)

private module function var_all_3_cdp_cdp(x, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=dp),	intent(in)			::	x(:,:,:)
logical,	intent(in),	optional		::	mask
logical,	intent(in),	optional		::	corrected

Return Value real(kind=dp)

private module function var_all_3_csp_csp(x, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=sp),	intent(in)			::	x(:,:,:)
logical,	intent(in),	optional		::	mask
logical,	intent(in),	optional		::	corrected

Return Value real(kind=sp)

private module function var_all_3_iint16_dp(x, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int16),	intent(in)			::	x(:,:,:)
logical,	intent(in),	optional		::	mask
logical,	intent(in),	optional		::	corrected

Return Value real(kind=dp)

private module function var_all_3_iint32_dp(x, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int32),	intent(in)			::	x(:,:,:)
logical,	intent(in),	optional		::	mask
logical,	intent(in),	optional		::	corrected

Return Value real(kind=dp)

private module function var_all_3_iint64_dp(x, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int64),	intent(in)			::	x(:,:,:)
logical,	intent(in),	optional		::	mask
logical,	intent(in),	optional		::	corrected

Return Value real(kind=dp)

private module function var_all_3_iint8_dp(x, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int8),	intent(in)			::	x(:,:,:)
logical,	intent(in),	optional		::	mask
logical,	intent(in),	optional		::	corrected

Return Value real(kind=dp)

private module function var_all_3_rdp_rdp(x, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=dp),	intent(in)			::	x(:,:,:)
logical,	intent(in),	optional		::	mask
logical,	intent(in),	optional		::	corrected

Return Value real(kind=dp)

private module function var_all_3_rsp_rsp(x, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=sp),	intent(in)			::	x(:,:,:)
logical,	intent(in),	optional		::	mask
logical,	intent(in),	optional		::	corrected

Return Value real(kind=sp)

private module function var_mask_1_cdp_cdp(x, dim, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=dp),	intent(in)			::	x(:)
integer,	intent(in)			::	dim
logical,	intent(in)			::	mask(:)
logical,	intent(in),	optional		::	corrected

Return Value real(kind=dp)

private module function var_mask_1_csp_csp(x, dim, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=sp),	intent(in)			::	x(:)
integer,	intent(in)			::	dim
logical,	intent(in)			::	mask(:)
logical,	intent(in),	optional		::	corrected

Return Value real(kind=sp)

private module function var_mask_1_iint16_dp(x, dim, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int16),	intent(in)			::	x(:)
integer,	intent(in)			::	dim
logical,	intent(in)			::	mask(:)
logical,	intent(in),	optional		::	corrected

Return Value real(kind=dp)

private module function var_mask_1_iint32_dp(x, dim, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int32),	intent(in)			::	x(:)
integer,	intent(in)			::	dim
logical,	intent(in)			::	mask(:)
logical,	intent(in),	optional		::	corrected

Return Value real(kind=dp)

private module function var_mask_1_iint64_dp(x, dim, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int64),	intent(in)			::	x(:)
integer,	intent(in)			::	dim
logical,	intent(in)			::	mask(:)
logical,	intent(in),	optional		::	corrected

Return Value real(kind=dp)

private module function var_mask_1_iint8_dp(x, dim, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int8),	intent(in)			::	x(:)
integer,	intent(in)			::	dim
logical,	intent(in)			::	mask(:)
logical,	intent(in),	optional		::	corrected

Return Value real(kind=dp)

private module function var_mask_1_rdp_rdp(x, dim, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=dp),	intent(in)			::	x(:)
integer,	intent(in)			::	dim
logical,	intent(in)			::	mask(:)
logical,	intent(in),	optional		::	corrected

Return Value real(kind=dp)

private module function var_mask_1_rsp_rsp(x, dim, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=sp),	intent(in)			::	x(:)
integer,	intent(in)			::	dim
logical,	intent(in)			::	mask(:)
logical,	intent(in),	optional		::	corrected

Return Value real(kind=sp)

private module function var_mask_2_cdp_cdp(x, dim, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=dp),	intent(in)			::	x(:,:)
integer,	intent(in)			::	dim
logical,	intent(in)			::	mask(:,:)
logical,	intent(in),	optional		::	corrected

Return Value real(kind=dp), (merge(size(x,1),size(x,2),mask=1

private module function var_mask_2_csp_csp(x, dim, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=sp),	intent(in)			::	x(:,:)
integer,	intent(in)			::	dim
logical,	intent(in)			::	mask(:,:)
logical,	intent(in),	optional		::	corrected

Return Value real(kind=sp), (merge(size(x,1),size(x,2),mask=1

private module function var_mask_2_iint16_dp(x, dim, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int16),	intent(in)			::	x(:,:)
integer,	intent(in)			::	dim
logical,	intent(in)			::	mask(:,:)
logical,	intent(in),	optional		::	corrected

Return Value real(kind=dp), (merge(size(x,1),size(x,2),mask=1

private module function var_mask_2_iint32_dp(x, dim, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int32),	intent(in)			::	x(:,:)
integer,	intent(in)			::	dim
logical,	intent(in)			::	mask(:,:)
logical,	intent(in),	optional		::	corrected

Return Value real(kind=dp), (merge(size(x,1),size(x,2),mask=1

private module function var_mask_2_iint64_dp(x, dim, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int64),	intent(in)			::	x(:,:)
integer,	intent(in)			::	dim
logical,	intent(in)			::	mask(:,:)
logical,	intent(in),	optional		::	corrected

Return Value real(kind=dp), (merge(size(x,1),size(x,2),mask=1

private module function var_mask_2_iint8_dp(x, dim, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int8),	intent(in)			::	x(:,:)
integer,	intent(in)			::	dim
logical,	intent(in)			::	mask(:,:)
logical,	intent(in),	optional		::	corrected

Return Value real(kind=dp), (merge(size(x,1),size(x,2),mask=1

private module function var_mask_2_rdp_rdp(x, dim, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=dp),	intent(in)			::	x(:,:)
integer,	intent(in)			::	dim
logical,	intent(in)			::	mask(:,:)
logical,	intent(in),	optional		::	corrected

Return Value real(kind=dp), (merge(size(x,1),size(x,2),mask=1

private module function var_mask_2_rsp_rsp(x, dim, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=sp),	intent(in)			::	x(:,:)
integer,	intent(in)			::	dim
logical,	intent(in)			::	mask(:,:)
logical,	intent(in),	optional		::	corrected

Return Value real(kind=sp), (merge(size(x,1),size(x,2),mask=1

private module function var_mask_3_cdp_cdp(x, dim, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=dp),	intent(in)			::	x(:,:,:)
integer,	intent(in)			::	dim
logical,	intent(in)			::	mask(:,:,:)
logical,	intent(in),	optional		::	corrected

Return Value real(kind=dp), (merge(size(x,1),size(x,2),mask=1

private module function var_mask_3_csp_csp(x, dim, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=sp),	intent(in)			::	x(:,:,:)
integer,	intent(in)			::	dim
logical,	intent(in)			::	mask(:,:,:)
logical,	intent(in),	optional		::	corrected

Return Value real(kind=sp), (merge(size(x,1),size(x,2),mask=1

private module function var_mask_3_iint16_dp(x, dim, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int16),	intent(in)			::	x(:,:,:)
integer,	intent(in)			::	dim
logical,	intent(in)			::	mask(:,:,:)
logical,	intent(in),	optional		::	corrected

Return Value real(kind=dp), (merge(size(x,1),size(x,2),mask=1

private module function var_mask_3_iint32_dp(x, dim, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int32),	intent(in)			::	x(:,:,:)
integer,	intent(in)			::	dim
logical,	intent(in)			::	mask(:,:,:)
logical,	intent(in),	optional		::	corrected

Return Value real(kind=dp), (merge(size(x,1),size(x,2),mask=1

private module function var_mask_3_iint64_dp(x, dim, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int64),	intent(in)			::	x(:,:,:)
integer,	intent(in)			::	dim
logical,	intent(in)			::	mask(:,:,:)
logical,	intent(in),	optional		::	corrected

Return Value real(kind=dp), (merge(size(x,1),size(x,2),mask=1

private module function var_mask_3_iint8_dp(x, dim, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int8),	intent(in)			::	x(:,:,:)
integer,	intent(in)			::	dim
logical,	intent(in)			::	mask(:,:,:)
logical,	intent(in),	optional		::	corrected

Return Value real(kind=dp), (merge(size(x,1),size(x,2),mask=1

private module function var_mask_3_rdp_rdp(x, dim, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=dp),	intent(in)			::	x(:,:,:)
integer,	intent(in)			::	dim
logical,	intent(in)			::	mask(:,:,:)
logical,	intent(in),	optional		::	corrected

Return Value real(kind=dp), (merge(size(x,1),size(x,2),mask=1

private module function var_mask_3_rsp_rsp(x, dim, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=sp),	intent(in)			::	x(:,:,:)
integer,	intent(in)			::	dim
logical,	intent(in)			::	mask(:,:,:)
logical,	intent(in),	optional		::	corrected

Return Value real(kind=sp), (merge(size(x,1),size(x,2),mask=1

private module function var_mask_all_1_cdp_cdp(x, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=dp),	intent(in)			::	x(:)
logical,	intent(in)			::	mask(:)
logical,	intent(in),	optional		::	corrected

Return Value real(kind=dp)

private module function var_mask_all_1_csp_csp(x, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=sp),	intent(in)			::	x(:)
logical,	intent(in)			::	mask(:)
logical,	intent(in),	optional		::	corrected

Return Value real(kind=sp)

private module function var_mask_all_1_iint16_dp(x, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int16),	intent(in)			::	x(:)
logical,	intent(in)			::	mask(:)
logical,	intent(in),	optional		::	corrected

Return Value real(kind=dp)

private module function var_mask_all_1_iint32_dp(x, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int32),	intent(in)			::	x(:)
logical,	intent(in)			::	mask(:)
logical,	intent(in),	optional		::	corrected

Return Value real(kind=dp)

private module function var_mask_all_1_iint64_dp(x, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int64),	intent(in)			::	x(:)
logical,	intent(in)			::	mask(:)
logical,	intent(in),	optional		::	corrected

Return Value real(kind=dp)

private module function var_mask_all_1_iint8_dp(x, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int8),	intent(in)			::	x(:)
logical,	intent(in)			::	mask(:)
logical,	intent(in),	optional		::	corrected

Return Value real(kind=dp)

private module function var_mask_all_1_rdp_rdp(x, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=dp),	intent(in)			::	x(:)
logical,	intent(in)			::	mask(:)
logical,	intent(in),	optional		::	corrected

Return Value real(kind=dp)

private module function var_mask_all_1_rsp_rsp(x, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=sp),	intent(in)			::	x(:)
logical,	intent(in)			::	mask(:)
logical,	intent(in),	optional		::	corrected

Return Value real(kind=sp)

private module function var_mask_all_2_cdp_cdp(x, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=dp),	intent(in)			::	x(:,:)
logical,	intent(in)			::	mask(:,:)
logical,	intent(in),	optional		::	corrected

Return Value real(kind=dp)

private module function var_mask_all_2_csp_csp(x, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=sp),	intent(in)			::	x(:,:)
logical,	intent(in)			::	mask(:,:)
logical,	intent(in),	optional		::	corrected

Return Value real(kind=sp)

private module function var_mask_all_2_iint16_dp(x, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int16),	intent(in)			::	x(:,:)
logical,	intent(in)			::	mask(:,:)
logical,	intent(in),	optional		::	corrected

Return Value real(kind=dp)

private module function var_mask_all_2_iint32_dp(x, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int32),	intent(in)			::	x(:,:)
logical,	intent(in)			::	mask(:,:)
logical,	intent(in),	optional		::	corrected

Return Value real(kind=dp)

private module function var_mask_all_2_iint64_dp(x, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int64),	intent(in)			::	x(:,:)
logical,	intent(in)			::	mask(:,:)
logical,	intent(in),	optional		::	corrected

Return Value real(kind=dp)

private module function var_mask_all_2_iint8_dp(x, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int8),	intent(in)			::	x(:,:)
logical,	intent(in)			::	mask(:,:)
logical,	intent(in),	optional		::	corrected

Return Value real(kind=dp)

private module function var_mask_all_2_rdp_rdp(x, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=dp),	intent(in)			::	x(:,:)
logical,	intent(in)			::	mask(:,:)
logical,	intent(in),	optional		::	corrected

Return Value real(kind=dp)

private module function var_mask_all_2_rsp_rsp(x, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=sp),	intent(in)			::	x(:,:)
logical,	intent(in)			::	mask(:,:)
logical,	intent(in),	optional		::	corrected

Return Value real(kind=sp)

private module function var_mask_all_3_cdp_cdp(x, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=dp),	intent(in)			::	x(:,:,:)
logical,	intent(in)			::	mask(:,:,:)
logical,	intent(in),	optional		::	corrected

Return Value real(kind=dp)

private module function var_mask_all_3_csp_csp(x, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=sp),	intent(in)			::	x(:,:,:)
logical,	intent(in)			::	mask(:,:,:)
logical,	intent(in),	optional		::	corrected

Return Value real(kind=sp)

private module function var_mask_all_3_iint16_dp(x, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int16),	intent(in)			::	x(:,:,:)
logical,	intent(in)			::	mask(:,:,:)
logical,	intent(in),	optional		::	corrected

Return Value real(kind=dp)

private module function var_mask_all_3_iint32_dp(x, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int32),	intent(in)			::	x(:,:,:)
logical,	intent(in)			::	mask(:,:,:)
logical,	intent(in),	optional		::	corrected

Return Value real(kind=dp)

private module function var_mask_all_3_iint64_dp(x, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int64),	intent(in)			::	x(:,:,:)
logical,	intent(in)			::	mask(:,:,:)
logical,	intent(in),	optional		::	corrected

Return Value real(kind=dp)

private module function var_mask_all_3_iint8_dp(x, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=int8),	intent(in)			::	x(:,:,:)
logical,	intent(in)			::	mask(:,:,:)
logical,	intent(in),	optional		::	corrected

Return Value real(kind=dp)

private module function var_mask_all_3_rdp_rdp(x, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=dp),	intent(in)			::	x(:,:,:)
logical,	intent(in)			::	mask(:,:,:)
logical,	intent(in),	optional		::	corrected

Return Value real(kind=dp)

private module function var_mask_all_3_rsp_rsp(x, mask, corrected) result(res)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=sp),	intent(in)			::	x(:,:,:)
logical,	intent(in)			::	mask(:,:,:)
logical,	intent(in),	optional		::	corrected

Return Value real(kind=sp)