Files
Construction-of-Compilers/Project-02-03-04-05/triplaprograms/ggT_euclid_rec.tripla
Jan-Niclas Loosen 8a40cb2636 New project structure
2026-03-03 16:45:00 +01:00

8 lines
154 B
Plaintext

let ggT(a, b) {
if (a == b) then
a
else if (a > b) then
ggT(a-b, b)
else
ggT(b-a, a)
} in ggT(2, 8)