diff options
Diffstat (limited to 'docs/history/07-zygote/code/examples/fact.s')
| -rw-r--r-- | docs/history/07-zygote/code/examples/fact.s | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/docs/history/07-zygote/code/examples/fact.s b/docs/history/07-zygote/code/examples/fact.s new file mode 100644 index 0000000..21f6e32 --- /dev/null +++ b/docs/history/07-zygote/code/examples/fact.s @@ -0,0 +1,3 @@ +10 fa c pb c 10 . q +:fa 0 $ 2 < fb z _ 1 r :fb 0 $ 1 - fa c * r +:pb 0 $ 1 > 0 $ p1 z pb c pd j :p1 _ :pd 1 & 48 + . r |