automathon


: fac ( n -- n ) dup 1 > if dup 1 - fac * then ; 5 fac drop
word list
stack
    call stack