multiply_scalar Interface

interface
private module function multiply_scalar(a, scalar) result(c)

Arguments

Type IntentOptional Attributes Name
class(array_type), intent(in), target :: a
real(kind=real32), intent(in) :: scalar

Return Value type(array_type),pointer