public interface cov
Covariance of array elements
(Specification)
Functions
private module function cov_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 cov_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 cov_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 cov_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 cov_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 cov_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 cov_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 cov_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 cov_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 complex(kind=dp)(merge(size(x,1),size(x,2),mask=1
private module function cov_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 complex(kind=sp)(merge(size(x,1),size(x,2),mask=1
private module function cov_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 cov_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 cov_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 cov_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 cov_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 cov_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 cov_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 cov_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 cov_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 cov_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 cov_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 cov_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 cov_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 cov_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 cov_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 complex(kind=dp)(merge(size(x,1),size(x,2),mask=1
private module function cov_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 complex(kind=sp)(merge(size(x,1),size(x,2),mask=1
private module function cov_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 cov_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 cov_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 cov_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 cov_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 cov_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