construct_linop_rsp Module Procedure

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

Arguments

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

Return Value type(linop_rsp)


Source Code

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