1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16
dec F { a = input t = 1 l: t * a a - 1 jnz a l: ret t } dec M { l: a = F print a jmp l: }