@@ -14,7 +14,7 @@ rs = ReactionSystem(rxs, t, [S,I,R], [k1,k2])
14
14
15
15
16
16
# ################################
17
- # testing for Jumps
17
+ # testing for Jumps / all dgs
18
18
# ################################
19
19
js = convert (JumpSystem, rs)
20
20
S = convert (Variable,S); I = convert (Variable,I); R = convert (Variable,R)
71
71
dg4 = varvar_dependencies (depsbg,deps2)
72
72
@test dg == dg4
73
73
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