mat_mult_scal Function

private function mat_mult_scal(a, b)

Matrix * Scalar

Type Bound

mat

Arguments

Type IntentOptional Attributes Name
class(mat), intent(in) :: a

Input Matrix
real(kind=wp), intent(in) :: b

Scalar to multiply by

Return Value type(mat)


Source Code

    type(mat) function mat_mult_scal(a, b)
        !! Matrix * Scalar

        !> Input Matrix
        class(mat),    intent(IN) :: a
        !> Scalar to multiply by
        real(kind=wp), intent(IN) :: b

        mat_mult_scal%vals = a%vals * b

    end function mat_mult_scal