@@ -14,7 +14,7 @@ rs = ReactionSystem(rxs, t, [S,I,R], [k1,k2])
1414
1515
1616# ################################
17- # testing for Jumps
17+ # testing for Jumps / all dgs
1818# ################################
1919js = convert (JumpSystem, rs)
2020S = convert (Variable,S); I = convert (Variable,I); R = convert (Variable,R)
7171dg4 = varvar_dependencies (depsbg,deps2)
7272@test dg == dg4
7373
74-
74+ # ####################################
75+ # testing for ODE/SDEs
76+ # ####################################
77+ os = convert (ODESystem, rs)
78+ deps = equation_dependencies (os)
79+ eq_sdeps = [[S,I], [S,I], [S,I,R]]
80+ @test all (i -> isequal (Set (eq_sdeps[i]),Set (deps[i])), 1 : length (deps))
81+
82+ sdes = convert (ODESystem, rs)
83+ deps = equation_dependencies (sdes)
84+ @test all (i -> isequal (Set (eq_sdeps[i]),Set (deps[i])), 1 : length (deps))
85+
86+ # ####################################
87+ # testing for nonlin sys
88+ # ####################################
89+ @variables x y z
90+ @parameters σ ρ β
91+
92+ eqs = [0 ~ σ* (y- x),
93+ 0 ~ ρ- y,
94+ 0 ~ y - β* z]
95+ ns = NonlinearSystem (eqs, [x,y,z],[σ,ρ,β])
96+ deps = equation_dependencies (ns)
97+ eq_sdeps = [[x,y],[y],[y,z]]
98+ @test all (i -> isequal (Set (deps[i]),Set (convert .(Variable,eq_sdeps[i]))), 1 : length (deps))
0 commit comments