feat (exm): sqrt example

2025-04-29 16:20:25 +02:00 · 2025-04-29 16:20:25 +02:00 · ebcceefe4c
commit ebcceefe4c
parent d398989ece
2 changed files with 80 additions and 0 deletions
--- a/src/bin/main.ml
+++ b/src/bin/main.ml
@ -43,6 +43,7 @@ let m = match !model with
  | "ball"   -> Ball.bouncing_ball
  | "vdp"    -> Vdp.van_der_pol
  | "sincos" -> Sincos.sinus_cosinus
+  | "sqrt"   -> Sqrt.sqrt
  | _        -> eprintf "Unknown model: %s\n" !model; exit 2
 let m = try m !modelargs with Invalid_argument s -> eprintf "%s\n" s; exit 2