scal_add_mat Function

private function scal_add_mat(a, b)

Scaler + Matrix

Type Bound

mat

Arguments

Type IntentOptional Attributes Name
real(kind=wp), intent(in) :: a

Scalat to add
class(mat), intent(in) :: b

Input Matrix

Return Value type(mat)


Source Code

    type(mat) function scal_add_mat(a, b)
        !! Scaler + Matrix

        !> Input Matrix
        class(mat),    intent(IN) :: b
        !> Scalat to add
        real(kind=wp), intent(IN) :: a

        scal_add_mat%vals = b%vals + a

    end function scal_add_mat