vault backup: 2023-09-12 18:19:23
This commit is contained in:
parent
7aa0bf9977
commit
62d0aa1d7b
@ -287,7 +287,5 @@ let rec quo a b =
|
||||
0
|
||||
else if b = 1 then
|
||||
a
|
||||
else if a = b then
|
||||
a
|
||||
else
|
||||
a - quo (a-b) b ;;
|
||||
1 + quo (a-b) b ;;
|
Loading…
x
Reference in New Issue
Block a user