@@ -10,7 +10,7 @@ NEWTON = NLNewton(
1010 check_div = false , always_new = true , max_iter = 100 , relax = 9 // 10 , κ = 1e-6 )
1111
1212@testset " Fluid Domain and Tube" begin
13- function System (N; bulk_modulus, name)
13+ function FluidSystem (N; bulk_modulus, name)
1414 pars = @parameters begin
1515 bulk_modulus = bulk_modulus
1616 p_int = 0
@@ -33,9 +33,9 @@ NEWTON = NLNewton(
3333 System (eqs, t, [], pars; name, systems)
3434 end
3535
36- @mtkcompile s1_1 = System (1 ; bulk_modulus = 1e9 )
37- @mtkcompile s1_2 = System (1 ; bulk_modulus = 2e9 )
38- @mtkcompile s5_1 = System (5 ; bulk_modulus = 1e9 )
36+ @mtkcompile s1_1 = FluidSystem (1 ; bulk_modulus = 1e9 )
37+ @mtkcompile s1_2 = FluidSystem (1 ; bulk_modulus = 2e9 )
38+ @mtkcompile s5_1 = FluidSystem (5 ; bulk_modulus = 1e9 )
3939
4040 p1_1 = ODEProblem (s1_1, [], (0 , 0.05 ))
4141 p1_2 = ODEProblem (s1_2, [], (0 , 0.05 ))
@@ -61,7 +61,7 @@ NEWTON = NLNewton(
6161end
6262
6363@testset " Valve" begin
64- function System (; name)
64+ function ValveSystem (; name)
6565 pars = []
6666
6767 systems = @named begin
8181 System (eqs, t, [], pars; name, systems)
8282 end
8383
84- @named valve_system = System ()
84+ @named valve_system = ValveSystem ()
8585 sys = mtkcompile (valve_system)
8686 prob = ODEProblem (sys, [], (0 , 1 ))
8787 sol = solve (prob, Rodas5P (); abstol = 1e-6 , reltol = 1e-9 )
9898end
9999
100100@testset " DynamicVolume and minimum_volume feature" begin # Need help here
101- function System (; name, area = 0.01 , length = 0.1 , damping_volume = length * area * 0.1 )
101+ function TestSystem (; name, area = 0.01 , length = 0.1 , damping_volume = length * area * 0.1 )
102102 pars = []
103103
104104 # DynamicVolume values
148148 System (eqs, t, [], pars; name, systems, initialization_eqs)
149149 end
150150
151- @named sys = System ()
151+ @named sys = TestSystem ()
152152 sys = mtkcompile (sys; allow_symbolic = true )
153153 prob = ODEProblem (sys, [], (0 , 5 ))
154154 sol = solve (prob, Rodas5P (); abstol = 1e-6 , reltol = 1e-9 )
190190end
191191
192192@testset " Actuator System" begin
193- function System (use_input; name)
193+ function ActuatorSystem (use_input; name)
194194 pars = @parameters begin
195195 p_s = 200e5
196196 p_r = 5e5
@@ -280,12 +280,12 @@ end
280280 System (eqs, t, vars, pars; name, systems, initialization_eqs)
281281 end
282282
283- @mtkcompile initsys = System (false )
283+ @mtkcompile initsys = ActuatorSystem (false )
284284
285285 initprob = ODEProblem (initsys, [], (0 , 0 ))
286286 initsol = solve (initprob, Rodas5P ())
287287
288- @mtkcompile sys = System (true )
288+ @mtkcompile sys = ActuatorSystem (true )
289289
290290 dt = 1e-4
291291 time = 0 : dt: 0.1
318318end
319319
320320@testset " Prevent Negative Pressure" begin
321- @component function System (; name)
321+ @component function HydraulicSystem (; name)
322322 pars = @parameters let_gas = 1
323323
324324 systems = @named begin
@@ -338,11 +338,11 @@ end
338338 return System (eqs, t, [], pars; name, systems, initialization_eqs)
339339 end
340340
341- @mtkcompile sys = System ()
341+ @mtkcompile sys = HydraulicSystem ()
342342
343343 prob1 = ODEProblem (sys, [], (0 , 0.05 ))
344344 # prob1 = remake(prob1; u0 = BigFloat.(prob1.u0))
345- prob2 = ODEProblem (sys, [], (0 , 0.05 ), [sys . let_gas => 0 ] )
345+ prob2 = ODEProblem (sys, [sys . let_gas => 0 ], (0 , 0.05 ))
346346
347347 # @time sol1 = solve(prob1, Rodas5P(); abstol=1e-9, reltol=1e-9) #BUG: Using BigFloat gives... ERROR: MethodError: no method matching getindex(::Missing, ::Int64)
348348 @time sol1 = solve (prob1, Rodas5P (); adaptive = false , dt = 1e-6 ) # TODO : fix BigFloat to implement abstol=1e-9, reltol=1e-9
0 commit comments