construct_spd_linop_rsp Module Procedure

module procedure construct_spd_linop_rsp private pure module function construct_spd_linop_rsp(data) result(A)

Arguments

Type IntentOptional Attributes Name
real(kind=sp), intent(in), dimension(test_size, test_size) :: data

Return Value type(spd_linop_rsp)


Source Code

        pure module function construct_spd_linop_rsp(data) result(A)
            implicit none(type, external)
            real(sp), dimension(test_size, test_size), intent(in) :: data
            type(spd_linop_rsp) :: A
        end function construct_spd_linop_rsp