@@ -4,13 +4,13 @@ using ModelingToolkit: t_nounits as t, D_nounits as D
44
55@connector function Pin (; name)
66 sts = @variables v (t) [guess = 1.0 ] i (t) [guess = 1.0 , connect = Flow]
7- ODESystem (Equation[], t, sts, []; name = name)
7+ System (Equation[], t, sts, []; name = name)
88end
99
1010@component function Ground (; name)
1111 @named g = Pin ()
1212 eqs = [g. v ~ 0 ]
13- compose (ODESystem (eqs, t, [], []; name = name), g)
13+ compose (System (eqs, t, [], []; name = name), g)
1414end
1515
1616@component function OnePort (; name)
2020 eqs = [v ~ p. v - n. v
2121 0 ~ p. i + n. i
2222 i ~ p. i]
23- compose (ODESystem (eqs, t, sts, []; name = name), p, n)
23+ compose (System (eqs, t, sts, []; name = name), p, n)
2424end
2525
2626@component function Resistor (; name, R = 1.0 )
3030 eqs = [
3131 v ~ i * R
3232 ]
33- extend (ODESystem (eqs, t, [], ps; name = name), oneport)
33+ extend (System (eqs, t, [], ps; name = name), oneport)
3434end
3535
3636@component function Capacitor (; name, C = 1.0 )
4040 eqs = [
4141 D (v) ~ i / C
4242 ]
43- extend (ODESystem (eqs, t, [], ps; name = name), oneport)
43+ extend (System (eqs, t, [], ps; name = name), oneport)
4444end
4545
4646@component function ConstantVoltage (; name, V = 1.0 )
5050 eqs = [
5151 V ~ v
5252 ]
53- extend (ODESystem (eqs, t, [], ps; name = name), oneport)
53+ extend (System (eqs, t, [], ps; name = name), oneport)
5454end
5555
5656@component function Inductor (; name, L = 1.0 )
6060 eqs = [
6161 D (i) ~ v / L
6262 ]
63- extend (ODESystem (eqs, t, [], ps; name = name), oneport)
63+ extend (System (eqs, t, [], ps; name = name), oneport)
6464end
6565
6666@connector function HeatPort (; name)
6767 @variables T (t) [guess = 293.15 ] Q_flow (t) [guess = 0.0 , connect = Flow]
68- ODESystem (Equation[], t, [T, Q_flow], [], name = name)
68+ System (Equation[], t, [T, Q_flow], [], name = name)
6969end
7070
7171@component function HeatingResistor (; name, R = 1.0 , TAmbient = 293.15 , alpha = 1.0 )
7979 h. Q_flow ~ - v * p. i # -LossPower
8080 v ~ p. v - n. v
8181 0 ~ p. i + n. i]
82- compose (ODESystem (eqs, t, [v, RTherm], [R, TAmbient, alpha],
82+ compose (System (eqs, t, [v, RTherm], [R, TAmbient, alpha],
8383 name = name), p, n, h)
8484end
8585
9090 eqs = [
9191 D (h. T) ~ h. Q_flow / C
9292 ]
93- compose (ODESystem (eqs, t, [], [rho, V, cp],
93+ compose (System (eqs, t, [], [rho, V, cp],
9494 name = name), h)
9595end
0 commit comments