modelverse-thomas/interface/HUTN/test/talk_visitor/code/factorial.al

Integer function factorial(n : Integer):
	if(n <= 1):
		return 1
	else:
		return n * factorial(n - 1)

while(True):
	output(factorial(input()))