fun main[] x = call ggt1[30,40] print x y = call ggt2[30,40] print y @x == y end fun ggt1[x,y] while x != y if x > y x = x - y else y = y - x end end @x end fun ggt2[a,b] while b x = a a = b b = x % b end @a end