able to run stem code due to org-babel-execute!

diff --git a/index.org b/index.org
index 49a4049d4ba4f01bdc9890604bb201fb21657d74..2d3c2a9a576e7e46b9128020338a99cf8f6509a9 100644 (file)
--- a/index.org
+++ b/index.org
@@ -62,7 +62,7 @@ website:
 #+begin_src shell :exports code :results silent
 cd ~/org/website
 git add .
-git commit -m "edit recursion article mindmap"
+git commit -m "able to run stem code due to org-babel-execute!"
 git push github main
 rsync -azvP ~/website_html/ root@nullring.xyz:/var/www/ret2pop/
 #+end_src

diff --git a/mindmap/recursion.org b/mindmap/recursion.org
index 3cc2a125aac5f65cd8bb78820bb863525a20f9cf..cbf6dad8848add2a18cc73568a203291734467d6 100644 (file)
--- a/mindmap/recursion.org
+++ b/mindmap/recursion.org
@@ -105,9 +105,14 @@ procedure is exactly the same as popping those values off a stack!
 ** Stacks Describe Recursion
 To see more transparently how stacks relate to recursion, we use my programming language stem, which is a
 concatenative programming language, as a more transparent example.
-#+begin_src stem
-factorial [ dup 0 <= [ 1 + ] [ dup 1 - factorial * ] ] def
+#+begin_src stem :exports both
+factorial [ dup 0 <= [ 1 + ] [ dup 1 - factorial * ] if ] def
+5 factorial .
 #+end_src
+
+#+RESULTS:
+: 120
+
 * TODO Recursion Describes…?
 
 * TODO Recursion is not Recursive