path: root/test/test5.t

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