outer_product Interface

public interface outer_product

Computes the outer product of two vectors, returning a rank-2 array (Specification)


Contents


Functions

private pure module function outer_product_cdp(u, v) result(res)

Arguments

TypeIntentOptionalAttributesName
complex(kind=dp), intent(in) :: u(:)
complex(kind=dp), intent(in) :: v(:)

Return Value complex(kind=dp)(size(u),size(v))

private pure module function outer_product_csp(u, v) result(res)

Arguments

TypeIntentOptionalAttributesName
complex(kind=sp), intent(in) :: u(:)
complex(kind=sp), intent(in) :: v(:)

Return Value complex(kind=sp)(size(u),size(v))

private pure module function outer_product_iint16(u, v) result(res)

Arguments

TypeIntentOptionalAttributesName
integer(kind=int16), intent(in) :: u(:)
integer(kind=int16), intent(in) :: v(:)

Return Value integer(kind=int16)(size(u),size(v))

private pure module function outer_product_iint32(u, v) result(res)

Arguments

TypeIntentOptionalAttributesName
integer(kind=int32), intent(in) :: u(:)
integer(kind=int32), intent(in) :: v(:)

Return Value integer(kind=int32)(size(u),size(v))

private pure module function outer_product_iint64(u, v) result(res)

Arguments

TypeIntentOptionalAttributesName
integer(kind=int64), intent(in) :: u(:)
integer(kind=int64), intent(in) :: v(:)

Return Value integer(kind=int64)(size(u),size(v))

private pure module function outer_product_iint8(u, v) result(res)

Arguments

TypeIntentOptionalAttributesName
integer(kind=int8), intent(in) :: u(:)
integer(kind=int8), intent(in) :: v(:)

Return Value integer(kind=int8)(size(u),size(v))

private pure module function outer_product_rdp(u, v) result(res)

Arguments

TypeIntentOptionalAttributesName
real(kind=dp), intent(in) :: u(:)
real(kind=dp), intent(in) :: v(:)

Return Value real(kind=dp)(size(u),size(v))

private pure module function outer_product_rsp(u, v) result(res)

Arguments

TypeIntentOptionalAttributesName
real(kind=sp), intent(in) :: u(:)
real(kind=sp), intent(in) :: v(:)

Return Value real(kind=sp)(size(u),size(v))