Skip to content

Commit

Permalink
Remove duplicate DiffEq construction
Browse files Browse the repository at this point in the history
  • Loading branch information
HarrisonGrodin committed Jan 31, 2019
1 parent 64086d1 commit 0c3f4fd
Showing 1 changed file with 5 additions and 5 deletions.
10 changes: 5 additions & 5 deletions src/systems/diffeqs/first_order_transform.jl
Expand Up @@ -27,9 +27,9 @@ function ode_order_lowering(eqs, iv)
var_order[var] = maxorder
var vars || push!(vars, var)
end
eq = lhs_renaming(eq, D)
eq = rhs_renaming(eq)
new_eqs[i] = eq
var′ = var_renaming(eq)
rhs′ = rhs_renaming(eq)
new_eqs[i] = DiffEq(D, var′, rhs′)
end

for var vars
Expand All @@ -45,8 +45,8 @@ function ode_order_lowering(eqs, iv)
return new_eqs
end

lhs_renaming(eq::DiffEq, D) = DiffEq(D, lower_varname(eq.D, eq.var, lower=true), eq.rhs)
rhs_renaming(eq::DiffEq) = DiffEq(eq.D, eq.var, _rec_renaming(eq.rhs))
var_renaming(eq::DiffEq) = lower_varname(eq.D, eq.var, lower=true)
rhs_renaming(eq::DiffEq) = _rec_renaming(eq.rhs)

function _rec_renaming(rhs)
isa(rhs, Operation) || return rhs
Expand Down

0 comments on commit 0c3f4fd

Please sign in to comment.