feat: lift runtime into language, start of zelus 2024 compatibility
This commit is contained in:
parent
dc8d941b84
commit
ffc583985a
37 changed files with 1154 additions and 143 deletions
|
|
@ -7,15 +7,6 @@ module Defaultsolver : IGNORE = struct end
|
|||
|
||||
module Zlsrun = struct
|
||||
module Make (S : IGNORE) = struct
|
||||
let go s =
|
||||
let s = Lift.lift_hsim s in
|
||||
let open Hsim in
|
||||
let state = (module State.InPlaceSimState : State.SimState) in
|
||||
let solver =
|
||||
Solver.solver (StatefulSundials.InPlace.csolve)
|
||||
(Types.d_of_dc StatefulZ.InPlace.zsolve) in
|
||||
let open Sim.Sim(val state) in
|
||||
()
|
||||
(* run_until_n (Utils.ignore 0 (run s solver)) 30. 1 ignore *)
|
||||
let go _ = ()
|
||||
end
|
||||
end
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue