refactor: add is_variable_numeric, is_numeric_symtype

Author: AayushSabharwal

src/utils.jl

@@ -838,6 +838,27 @@ function is_floatingpoint_symtype(T::Type)
            T <: AbstractArray && is_floatingpoint_symtype(eltype(T))
 end
 
+"""
+    $(TYPEDSIGNATURES)
+
+Check if `sym` represents a symbolic number or array of numbers.
+"""
+function is_variable_numeric(sym)
+    sym = unwrap(sym)
+    T = symtype(sym)
+    is_numeric_symtype(T)
+end
+
+"""
+    $(TYPEDSIGNATURES)
+
+Check if `T` is an appropriate symtype for a symbolic variable representing a number or
+array of numbers.
+"""
+function is_numeric_symtype(T::Type)
+    return T <: Number || T <: AbstractArray && is_numeric_symtype(eltype(T))
+end
+
 """
     $(TYPEDSIGNATURES)