hms/hsim
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

feat: sundials

Browse source
This commit is contained in:
Henri Saudubray 2025-05-12 15:10:10 +02:00
parent 6cec3d6c5d
commit 80d4aef23f
Signed by: hms
GPG key ID: 7065F57ED8856128
8 changed files with 33 additions and 34 deletions
Download patch file Download diff file Expand all files Collapse all files

2
exm/vdp.ml
View file

@ -31,7 +31,7 @@ let horizon _ = max_float
let van_der_pol ()
: (state, _, _, carray, carray, carray, zarray, carray) hnode
= let yd = cmake csize in
let zout = cmake zsize in
let zout = cmake zsize in
let fder _ _ y = fder y yd in
let fzer _ _ _ = zout in
let init _ = { lx=of_array [| x0; y0 |]; i=true } in