Files
Construction-of-Compilers/Project-02/triplaprograms/wrapped-ggT.tripla
Jan-Niclas Loosen fe33668b5f Init next project
2025-11-11 14:40:50 +01:00

8 lines
201 B
Plaintext

let wrapper(a, b) {
let ggt(noneSense) {
if a == b then a
else
if a > b then wrapper(a-b, b)
else wrapper(b-a, a)
} in ggt(0)
} in wrapper(21, 49)