vault backup: 2023-09-07 14:45:09

This commit is contained in:
Louis Gallet 2023-09-07 14:45:09 +02:00
parent c137d638a7
commit 0ccbedd80a
Signed by: lgallet
SSH Key Fingerprint: SHA256:qnW7pk4EoMRR0UftZLZQKSMUImbEFsiruLC7jbCHJAY

View File

@ -70,6 +70,8 @@ let add a b =
else else
b-a + b/a b-a + b/a
let test x y = (if x> y then x else y ) *(x+y);;
let f a b c = let f a b c =
(if a > b && if b > c then (if a > b && if b > c then
a + b else c + a a + b else c + a