Tree @
master
(
Download .tar.gz
)
..
equal.vinegar
fact.vinegar
fact2.vinegar
pop.vinegar
swap.vinegar
underflow.vinegar
unequal.vinegar
fact.vinegar
@
master
—
raw
·
history
·
blame
1
2
fact = dup int[0] gt! (dup int[1] eq! | pop dup int[1] sub fact mul);
main = int[5] fact;