blob: 0b2269e9b12e2eb0faee16f84885a04b24a24881 (
plain)
1
2
3
4
5
6
7
8
9
10
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¨ 𝕩
}
|
