@@ -418,9 +418,9 @@ function namespace_equations(sys::AbstractSystem)
418
418
map (eq-> namespace_equation (eq, sys), eqs)
419
419
end
420
420
421
- function namespace_equation (eq:: Equation , sys)
422
- _lhs = namespace_expr (eq. lhs, sys)
423
- _rhs = namespace_expr (eq. rhs, sys)
421
+ function namespace_equation (eq:: Equation , sys, n = nameof (sys) )
422
+ _lhs = namespace_expr (eq. lhs, sys, n )
423
+ _rhs = namespace_expr (eq. rhs, sys, n )
424
424
_lhs ~ _rhs
425
425
end
426
426
@@ -430,22 +430,22 @@ function namespace_assignment(eq::Assignment, sys)
430
430
Assignment (_lhs, _rhs)
431
431
end
432
432
433
- function namespace_expr (O, sys) where {T}
433
+ function namespace_expr (O, sys, n = nameof (sys) ) where {T}
434
434
ivs = independent_variables (sys)
435
435
O = unwrap (O)
436
436
if any (isequal (O), ivs)
437
437
return O
438
438
elseif isvariable (O)
439
- renamespace (sys , O)
439
+ renamespace (n , O)
440
440
elseif istree (O)
441
- renamed = map (a-> namespace_expr (a, sys), arguments (O))
441
+ renamed = map (a-> namespace_expr (a, sys, n ), arguments (O))
442
442
if symtype (operation (O)) <: FnType
443
- renamespace (sys , O)
443
+ renamespace (n , O)
444
444
else
445
445
similarterm (O, operation (O), renamed)
446
446
end
447
447
elseif O isa Array
448
- map (Base . Fix2 ( namespace_expr, sys), O)
448
+ map (o -> namespace_expr (o , sys, n ), O)
449
449
else
450
450
O
451
451
end
0 commit comments