vault backup: 2023-09-12 18:14:32

This commit is contained in:
Louis Gallet 2023-09-12 18:14:32 +02:00
parent e8d4c08ae7
commit 7aa0bf9977
Signed by: lgallet
SSH Key Fingerprint: SHA256:qnW7pk4EoMRR0UftZLZQKSMUImbEFsiruLC7jbCHJAY

View File

@ -287,5 +287,7 @@ let rec quo a b =
0
else if b = 1 then
a
else if a = b then
a
else
a - quo (a-b) b ;;