Relax * method for Number and ScaledOperator

Author: albertomercurio

src/basic.jl

@@ -201,7 +201,7 @@ end
 
 for T in SCALINGNUMBERTYPES
     @eval function ScaledOperator(λ::$T, L::ScaledOperator)
-        λ = ScalarOperator(λ) * L.λ
+        λ = λ * L.λ
         ScaledOperator(λ, L.L)
     end
 

src/scalar.jl

@@ -317,15 +317,15 @@ end
 for T in SCALINGNUMBERTYPES[2:end]
     @eval function Base.:*(α::ScalarOperator, x::$T)
         if isconstant(α)
-            T2 = promote_type(T, eltype(α))
+            T2 = promote_type($T, eltype(α))
             return ScalarOperator(convert(T2, α) * x, α.update_func)
         else
             return ComposedScalarOperator(α, ScalarOperator(x))
         end
     end
     @eval function Base.:*(x::$T, α::ScalarOperator)
         if isconstant(α)
-            T2 = promote_type(T, eltype(α))
+            T2 = promote_type($T, eltype(α))
             return ScalarOperator(convert(T2, α) * x, α.update_func)
         else
             return ComposedScalarOperator(ScalarOperator(x), α)