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