From 418f03d389ecc80008c87ef14e9fa153f3e225ef Mon Sep 17 00:00:00 2001
From: Marshall Lochbaum <mwlochbaum@gmail.com>
Date: Sun, 1 Nov 2020 09:26:43 -0500
Subject: Commit missing SVG script tutorial/prim.bqn (for primitive infoboxes)

---
 tutorial/prim.bqn | 11 +++++++++++
 1 file changed, 11 insertions(+)
 create mode 100644 tutorial/prim.bqn

(limited to 'tutorial')

diff --git a/tutorial/prim.bqn b/tutorial/prim.bqn
new file mode 100644
index 00000000..0b2269e9
--- /dev/null
+++ b/tutorial/prim.bqn
@@ -0,0 +1,11 @@
+# Show keys and names for primitives
+# Input is a list of "glyph%keys%Monad%Dyad" strings
+
+Primitives ← {
+  Row ← {
+    s ← ¯1⊸↓⌾(¯1⊸⊑) ((+`׬)⊸-'%'⊸=)⊸⊔ 𝕩∾" "
+    t ← ⟨0⊸Highlight, ("kbd"Enc"\"⊸∾)⍟≠⟩⊸({𝕎𝕩}¨)⌾(2⊸↑) s
+    "tr" Enc ((3<≠s)◶⟨2⊸/∾∾⟜" colspan='2'"¨,4⊸/⟩ ⟨"td"⟩) Enc¨ t
+  }
+  "table class='primitives'" Enc Row¨ 𝕩
+}
-- 
cgit v1.2.3