Fix matrix expression conversion to use row-major order

eswagel · Nov 13, 2024 · 8db116d · 8db116d
1 parent 780ea35
commit 8db116d
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/Project.toml b/Project.toml
@@ -1,7 +1,7 @@
 name = "SymbolicsMathLink"
 uuid = "7963cd39-1b62-4514-9cf0-788fb5452611"
 authors = ["E. Swagel"]
-version = "2.0.0"
+version = "2.0.1"
 
 [deps]
 MathLink = "18c93696-a329-5786-9845-8443133fa0b4"

diff --git a/src/Header/expr_to_mathematica.jl b/src/Header/expr_to_mathematica.jl
@@ -64,7 +64,7 @@ end
 (expr_to_mathematica(num::T)::T) where {T<:Mtypes}=num
 expr_to_mathematica(eq::Equation)::MathLink.WExpr=MathLink.WSymbol("Equal")(expr_to_mathematica(Symbolics.toexpr(eq.lhs)::Union{Expr, Symbol, Int, Float64, Rational}),expr_to_mathematica(Symbolics.toexpr(eq.rhs)::Union{Expr, Symbol, Int, Float64, Rational}))
 (expr_to_mathematica(vect::Vector{T})::MathLink.WExpr) where T=MathLink.WSymbol("List")(expr_to_mathematica.(vect)...)
-(expr_to_mathematica(mat::Matrix{T})::MathLink.WExpr) where T = expr_to_mathematica([mat[:,i] for i in 1:size(mat,2)])
+(expr_to_mathematica(mat::Matrix{T})::MathLink.WExpr) where T = expr_to_mathematica([mat[i, :] for i in 1:size(mat,1)])
 expr_to_mathematica(num::Num)::Mtypes=expr_to_mathematica(Symbolics.toexpr(num)::Union{Expr, Symbol, Int, Float64, Rational})
 expr_to_mathematica(dict::Dict)::MathLink.WExpr=begin
     rules = MathLink.WExpr[]