Merge pull request #988 from JuliaControl/hvc

implement `typed_hvcat` for LTI systems

Author: baggepinnen

lib/ControlSystemsBase/Project.toml

@@ -2,7 +2,7 @@ name = "ControlSystemsBase"
 uuid = "aaaaaaaa-a6ca-5380-bf3e-84a91bcd477e"
 authors = ["Dept. Automatic Control, Lund University"]
 repo = "https://github.com/JuliaControl/ControlSystems.jl.git"
-version = "1.14.6"
+version = "1.14.7"
 
 [deps]
 ForwardDiff = "f6369f11-7733-5829-9624-2563aa707210"

lib/ControlSystemsBase/src/connections.jl

@@ -134,6 +134,19 @@ end
 function Base.typed_hcat(::Type{T}, X...) where {T<:LTISystem}
     hcat(convert.(T, X)...)
 end
+
+# This method is copied from Base on julia v1.11, it was changed in v1.12, but we rely on it to create a MIMO transfer function
+function Base.typed_hvcat(::Type{T}, rows::Tuple{Vararg{Int}}, as...) where {T<:LTISystem}
+    nbr = length(rows)  # number of block rows
+    rs = Vector{Any}(undef, nbr)
+    a = 1
+    for i = 1:nbr
+        rs[i] = Base.typed_hcat(T, as[a:a-1+rows[i]]...)
+        a += rows[i]
+    end
+    T[rs...;]
+end
+
 # Ambiguity
 Base.typed_hcat(::Type{S}, X::Number...) where {S<:LTISystem} = hcat(convert.(S, X)...)
 Base.typed_hcat(::Type{S}, X::Union{AbstractArray{<:Number,1}, AbstractArray{<:Number,2}}...) where {S<:LTISystem} = hcat(convert.(S, X)...)