diag 接口

公共接口 diag

创建对角数组或提取数组的对角元素 (规范)


函数

私有模块函数 diag_cdp(v) 结果(res)

参数

类型 意图可选 属性 名称
complex(kind=dp), intent(in) :: v(:)

返回值 complex(kind=dp), (size(v),size(v))

私有模块函数 diag_cdp_k(v, k) 结果(res)

参数

类型 意图可选 属性 名称
complex(kind=dp), intent(in) :: v(:)
integer, intent(in) :: k

返回值 complex(kind=dp), (size(v)+abs(k),size(v)+abs(k))

私有模块函数 diag_cdp_mat(A) 结果(res)

参数

类型 意图可选 属性 名称
complex(kind=dp), intent(in) :: A(:,:)

返回值 complex(kind=dp), (minval(shape(A)))

私有模块函数 diag_cdp_mat_k(A, k) 结果(res)

参数

类型 意图可选 属性 名称
complex(kind=dp), intent(in) :: A(:,:)
integer, intent(in) :: k

返回值 complex(kind=dp), (minval(shape(A))-abs(k))

私有模块函数 diag_csp(v) 结果(res)

参数

类型 意图可选 属性 名称
complex(kind=sp), intent(in) :: v(:)

返回值 complex(kind=sp), (size(v),size(v))

私有模块函数 diag_csp_k(v, k) 结果(res)

参数

类型 意图可选 属性 名称
complex(kind=sp), intent(in) :: v(:)
integer, intent(in) :: k

返回值 complex(kind=sp), (size(v)+abs(k),size(v)+abs(k))

私有模块函数 diag_csp_mat(A) 结果(res)

参数

类型 意图可选 属性 名称
complex(kind=sp), intent(in) :: A(:,:)

返回值 complex(kind=sp), (minval(shape(A)))

私有模块函数 diag_csp_mat_k(A, k) 结果(res)

参数

类型 意图可选 属性 名称
complex(kind=sp), intent(in) :: A(:,:)
integer, intent(in) :: k

返回值 complex(kind=sp), (minval(shape(A))-abs(k))

私有模块函数 diag_iint16(v) 结果(res)

参数

类型 意图可选 属性 名称
integer(kind=int16), intent(in) :: v(:)

返回值 integer(kind=int16), (size(v),size(v))

私有模块函数 diag_iint16_k(v, k) 结果(res)

参数

类型 意图可选 属性 名称
integer(kind=int16), intent(in) :: v(:)
integer, intent(in) :: k

返回值 integer(kind=int16), (size(v)+abs(k),size(v)+abs(k))

私有模块函数 diag_iint16_mat(A) 结果(res)

参数

类型 意图可选 属性 名称
integer(kind=int16), intent(in) :: A(:,:)

返回值 integer(kind=int16), (minval(shape(A)))

私有模块函数 diag_iint16_mat_k(A, k) 结果(res)

参数

类型 意图可选 属性 名称
integer(kind=int16), intent(in) :: A(:,:)
integer, intent(in) :: k

返回值 integer(kind=int16), (minval(shape(A))-abs(k))

私有模块函数 diag_iint32(v) 结果(res)

参数

类型 意图可选 属性 名称
integer(kind=int32), intent(in) :: v(:)

返回值 integer(kind=int32), (size(v),size(v))

私有模块函数 diag_iint32_k(v, k) 结果(res)

参数

类型 意图可选 属性 名称
integer(kind=int32), intent(in) :: v(:)
integer, intent(in) :: k

返回值 integer(kind=int32), (size(v)+abs(k),size(v)+abs(k))

私有模块函数 diag_iint32_mat(A) 结果(res)

参数

类型 意图可选 属性 名称
integer(kind=int32), intent(in) :: A(:,:)

返回值 integer(kind=int32), (minval(shape(A)))

私有模块函数 diag_iint32_mat_k(A, k) 结果(res)

参数

类型 意图可选 属性 名称
integer(kind=int32), intent(in) :: A(:,:)
integer, intent(in) :: k

返回值 integer(kind=int32), (minval(shape(A))-abs(k))

私有模块函数 diag_iint64(v) 结果(res)

参数

类型 意图可选 属性 名称
integer(kind=int64), intent(in) :: v(:)

返回值 integer(kind=int64), (size(v),size(v))

私有模块函数 diag_iint64_k(v, k) 结果(res)

参数

类型 意图可选 属性 名称
integer(kind=int64), intent(in) :: v(:)
integer, intent(in) :: k

返回值 integer(kind=int64), (size(v)+abs(k),size(v)+abs(k))

私有模块函数 diag_iint64_mat(A) 结果(res)

参数

类型 意图可选 属性 名称
integer(kind=int64), intent(in) :: A(:,:)

返回值 integer(kind=int64), (minval(shape(A)))

私有模块函数 diag_iint64_mat_k(A, k) 结果(res)

参数

类型 意图可选 属性 名称
integer(kind=int64), intent(in) :: A(:,:)
integer, intent(in) :: k

返回值 integer(kind=int64), (minval(shape(A))-abs(k))

私有模块函数 diag_iint8(v) 结果(res)

参数

类型 意图可选 属性 名称
integer(kind=int8), intent(in) :: v(:)

返回值 integer(kind=int8), (size(v),size(v))

私有模块函数 diag_iint8_k(v, k) 结果(res)

参数

类型 意图可选 属性 名称
integer(kind=int8), intent(in) :: v(:)
integer, intent(in) :: k

返回值 integer(kind=int8), (size(v)+abs(k),size(v)+abs(k))

私有模块函数 diag_iint8_mat(A) 结果(res)

参数

类型 意图可选 属性 名称
integer(kind=int8), intent(in) :: A(:,:)

返回值 integer(kind=int8), (minval(shape(A)))

私有模块函数 diag_iint8_mat_k(A, k) 结果(res)

参数

类型 意图可选 属性 名称
integer(kind=int8), intent(in) :: A(:,:)
integer, intent(in) :: k

返回值 integer(kind=int8), (minval(shape(A))-abs(k))

私有模块函数 diag_rdp(v) 结果(res)

参数

类型 意图可选 属性 名称
real(kind=dp), intent(in) :: v(:)

返回值 real(kind=dp), (size(v),size(v))

私有模块函数 diag_rdp_k(v, k) 结果(res)

参数

类型 意图可选 属性 名称
real(kind=dp), intent(in) :: v(:)
integer, intent(in) :: k

返回值 real(kind=dp), (size(v)+abs(k),size(v)+abs(k))

私有模块函数 diag_rdp_mat(A) 结果(res)

参数

类型 意图可选 属性 名称
real(kind=dp), intent(in) :: A(:,:)

返回值 real(kind=dp), (minval(shape(A)))

私有模块函数 diag_rdp_mat_k(A, k) 结果(res)

参数

类型 意图可选 属性 名称
real(kind=dp), intent(in) :: A(:,:)
integer, intent(in) :: k

返回值 real(kind=dp), (minval(shape(A))-abs(k))

私有模块函数 diag_rsp(v) 结果(res)

参数

类型 意图可选 属性 名称
real(kind=sp), intent(in) :: v(:)

返回值 real(kind=sp), (size(v),size(v))

私有模块函数 diag_rsp_k(v, k) 结果(res)

参数

类型 意图可选 属性 名称
real(kind=sp), intent(in) :: v(:)
integer, intent(in) :: k

返回值 real(kind=sp), (size(v)+abs(k),size(v)+abs(k))

私有模块函数 diag_rsp_mat(A) 结果(res)

参数

类型 意图可选 属性 名称
real(kind=sp), intent(in) :: A(:,:)

返回值 real(kind=sp), (minval(shape(A)))

私有模块函数 diag_rsp_mat_k(A, k) 结果(res)

参数

类型 意图可选 属性 名称
real(kind=sp), intent(in) :: A(:,:)
integer, intent(in) :: k

返回值 real(kind=sp), (minval(shape(A))-abs(k))