git.oblomov.eu Git - xorg/xkeyboard-config/blob - symbols/apl

   1 // EXTRAS:
   2 //
   3 // APL Keyboard Layouts
   4
   5 // This file supports:
   6 // -    The Sharp APL for Unix (SAX) layout
   7 // -    The IBM APL2 layout
   8 // -    The Manugistics APL*PLUS II (Version 5.1, 1993) keyboard layout
   9 // -    The Dyalog APL layout - with additions for box drawing and commands
  10
  11 // Unicode APL table: http://aplwiki.com/UnicodeAplTable
  12 // ...and another: http://publibfp.boulder.ibm.com/epubs/pdf/h2110611.pdf (appendix A)
  13 // Generic Unicode stuff: http://www.fileformat.info/info/unicode/category/index.htm
  14
  15 // Tim Nelson (this file's creator) says:
  16
  17 // This file doesn't deal with all the combining stuff -- I'm not an APL programmer,
  18 // and am not quite sure what's needed here.  However, it may be possible to get this
  19 // working with dead keys and the like.  Patches gratefully accepted.
  20
  21 // Some of the shift-key assignments may differ from the APL tradition.  If
  22 // that's not considered acceptable, it should be possible to remap the
  23 // shift keys.  I have striven, however, to ensure that the use of shift keys
  24 // in these maps is at least self-consistent.
  25
  26 // I'm assuming that this will be used with another keyboard layout (ie. for
  27 // your language), with a special shift key to use these maps.
  28
  29 // 2011-12-22 Geoff Streeter: geoff@dyalog.com
  30 // Added the Dyalog support.
  31 // Corrected (what he thinks) are some errors.
  32 //      Resolving the confusion between APL's and Unicode's concept of Left and Right tacks.
  33 //      Unsure about some of the inheritance from APL2 into APLPLUS. Patches welcome.
  34 // Complied with freedesktop.org requirement that the keycodes be in sorted order. Which
  35 // leads to the bottom to top (roughly) definitions.
  36
  37 // default layout seems to have to be the first one. Choosing the basic Dyalog layout is definitely
  38 // better than using the "common" one. Choosing the complete Dyalog layout is not useful to non-Dyalog
  39 // users.
  40
  41 default partial alphanumeric_keys
  42 xkb_symbols "basic" {
  43         include "apl(dyalog_base)"      // forward reference good APL keyboard without Dyalogs extras
  44 };
  45
  46 // ┌─────┬─────┬─────┬─────┬─────┬─────┬─────┬─────┬─────┬─────┬─────┬─────┬─────┲━━━━━━━━━┓
  47 // │     │     │     │     │     │     │     │     │     │     │     │     │     ┃         ┃
  48 // │     │ ¨   │ ¯   │ <   │ ≤   │ =   │ ≥   │ >   │ ≠   │ ∨   │ ∧   │     │     ┃         ┃
  49 // ┢━━━━━┷━┱───┴─┬───┴─┬───┴─┬───┴─┬───┴─┬───┴─┬───┴─┬───┴─┬───┴─┬───┴─┬───┴─┬───┺━┳━━━━━━━┫
  50 // ┃       ┃     │     │     │     │     │     │     │     │     │     │     │     ┃       ┃
  51 // ┃       ┃ ?   │ ⍵   │ ∊   │ ⍴   │ ~   │ ↑   │ ↓   │ ⍳   │ ○   │ *   │ ←   │     ┃       ┃
  52 // ┣━━━━━━━┻┱────┴┬────┴┬────┴┬────┴┬────┴┬────┴┬────┴┬────┴┬────┴┬────┴┬────┴┬────┺┓      ┃
  53 // ┃        ┃     │     │     │     │     │     │     │     │     │     │     │     ┃      ┃
  54 // ┃        ┃ ⍺   │ ⌈   │ ⌊   │ _   │ ∇   │ ∆   │ ∘   │ '   │ ⎕   │     │     │     ┃      ┃
  55 // ┣━━━━━━━┳┹────┬┴────┬┴────┬┴────┬┴────┬┴────┬┴────┬┴────┬┴────┬┴────┬┴────┲┷━━━━━┻━━━━━━┫
  56 // ┃       ┃     │     │     │     │     │     │     │     │     │     │     ┃             ┃
  57 // ┃       ┃     │ ⊂   │ ⊃   │ ∩   │ ∪   │ ⊥   │ ⊤   │ |   │     │     │     ┃             ┃
  58 // ┣━━━━━━━╋━━━━━┷━┳━━━┷━━━┱─┴─────┴─────┴─────┴─────┴─────┴───┲━┷━━━━━╈━━━━━┻━┳━━━━━━━┳━━━┛
  59 // ┃       ┃       ┃       ┃                                   ┃       ┃       ┃       ┃
  60 // ┃       ┃       ┃       ┃                                   ┃       ┃       ┃       ┃
  61 // ┗━━━━━━━┻━━━━━━━┻━━━━━━━┹───────────────────────────────────┺━━━━━━━┻━━━━━━━┻━━━━━━━┛
  62
  63 partial hidden alphanumeric_keys
  64 xkb_symbols "common" {
  65         name[Group1]= "APL";
  66
  67         key <AB01> { [  U2282           ] }; // Z: ⊂ -- Subset Of
  68         key <AB02> { [  U2283           ] }; // X: ⊃ -- Superset Of
  69         key <AB03> { [  U2229           ] }; // C: ∩ -- Intersection
  70         key <AB04> { [  U222A           ] }; // V: ∪ -- Union
  71         key <AB05> { [  U22A5           ] }; // B: ⊥ -- Up Tack
  72         key <AB06> { [  U22A4           ] }; // N: ⊤ -- Down Tack
  73         key <AB07> { [  U007C           ] }; // M: | -- Vertical Line
  74
  75         key <AC01> { [  U237A           ] }; // A: ⍺ -- APL Functional Symbol Alpha
  76         key <AC02> { [  U2308           ] }; // S: ⌈ -- Left Ceiling
  77         key <AC03> { [  U230A           ] }; // D: ⌊ -- Left Floor
  78         key <AC04> { [  underscore      ] }; // F:
  79         key <AC05> { [  U2207           ] }; // G: ∇ -- Nabla
  80         key <AC06> { [  U2206           ] }; // H: ∆ -- Increment
  81         key <AC07> { [  U2218           ] }; // J: ∘ -- Ring Operator
  82         key <AC08> { [  apostrophe      ] }; // K:
  83         key <AC09> { [  U2395           ] }; // L: ⎕ -- APL Functional Symbol Quad
  84
  85         key <AD01> { [  question        ] }; // Q:
  86         key <AD02> { [  U2375           ] }; // W: ⍵ -- APL Functional Symbol Omega
  87         key <AD03> { [  U220A           ] }; // E: ∊ -- Small Element Of
  88         key <AD04> { [  U2374           ] }; // R: ⍴ -- APL Functional Symbol Rho
  89         key <AD05> { [  asciitilde      ] }; // T:
  90         key <AD06> { [  U2191           ] }; // Y: ↑ -- Upwards Arrow
  91         key <AD07> { [  U2193           ] }; // U: ↓ -- Downwards Arrow
  92         key <AD08> { [  U2373           ] }; // I: ⍳ -- APL Functional Symbol Iota
  93         key <AD09> { [  U25CB           ] }; // O: ○ -- White Circle
  94         key <AD10> { [  asterisk        ] }; // P: * -- asterisk
  95         key <AD11> { [  U2190           ] }; // [: ← -- Leftwards Arrow
  96
  97         key <AE01> { [  diaeresis       ] };
  98         key <AE02> { [  U00AF           ] }; // ¯ -- Macron
  99         key <AE03> { [  less            ] };
 100         key <AE04> { [  U2264           ] }; // ≤ -- Less-than Or Equal To
 101         key <AE05> { [  equal           ] };
 102         key <AE06> { [  U2265           ] }; // ≥ -- Greater-than Or Equal To
 103         key <AE07> { [  greater         ] };
 104         key <AE08> { [  U2260           ] }; // ≠ -- Not Equal To
 105         key <AE09> { [  U2228           ] }; // ∨ -- Logical Or
 106         key <AE10> { [  U2227           ] }; // ∧ -- Logical And
 107 };
 108
 109 // Keys common to a number of keyboards that allow normal language usage alongside APL
 110
 111 // ┌─────┬─────┬─────┬─────┬─────┬─────┬─────┬─────┬─────┬─────┬─────┬─────┬─────┲━━━━━━━━━┓
 112 // │     │     │     │     │     │     │     │     │     │ ⍱   │ ⍲   │     │  ⌹  ┃         ┃
 113 // │ ⋄   │ ¨   │ ¯   │ <   │ ≤   │ =   │ ≥   │ >   │ ≠   │ ∨   │ ∧   │  ×  │  ÷  ┃         ┃
 114 // ┢━━━━━┷━┱───┴─┬───┴─┬───┴─┬───┴─┬───┴─┬───┴─┬───┴─┬───┴─┬───┴─┬───┴─┬───┴─┬───┺━┳━━━━━━━┫
 115 // ┃       ┃     │     │     │     │     │     │     │     │     │     │     │     ┃       ┃
 116 // ┃       ┃ ?   │ ⍵   │ ∊   │ ⍴   │ ~   │ ↑   │ ↓   │ ⍳   │ ○   │ *   │ ←   │  →  ┃       ┃
 117 // ┣━━━━━━━┻┱────┴┬────┴┬────┴┬────┴┬────┴┬────┴┬────┴┬────┴┬────┴┬────┴┬────┴┬────┺┓      ┃
 118 // ┃        ┃     │     │     │     │     │     │     │     │     │     │     │     ┃      ┃
 119 // ┃        ┃ ⍺   │ ⌈   │ ⌊   │ _   │ ∇   │ ∆   │ ∘   │ '   │ ⎕   │     │     │     ┃      ┃
 120 // ┣━━━━━━━┳┹────┬┴────┬┴────┬┴────┬┴────┬┴────┬┴────┬┴────┬┴────┬┴────┬┴────┲┷━━━━━┻━━━━━━┫
 121 // ┃       ┃     │     │     │     │     │     │     │     │     │     │     ┃             ┃
 122 // ┃       ┃     │ ⊂   │ ⊃   │ ∩   │ ∪   │ ⊥   │ ⊤   │ |   │     │     │     ┃             ┃
 123 // ┣━━━━━━━╋━━━━━┷━┳━━━┷━━━┱─┴─────┴─────┴─────┴─────┴─────┴───┲━┷━━━━━╈━━━━━┻━┳━━━━━━━┳━━━┛
 124 // ┃       ┃       ┃       ┃                                   ┃       ┃       ┃       ┃
 125 // ┃       ┃       ┃       ┃                                   ┃       ┃       ┃       ┃
 126 // ┗━━━━━━━┻━━━━━━━┻━━━━━━━┹───────────────────────────────────┺━━━━━━━┻━━━━━━━┻━━━━━━━┛
 127
 128 partial alphanumeric_keys
 129 xkb_symbols "unified" {
 130         name[Group1]= "APL Keyboard Symbols: Unified Layout";
 131
 132         include "apl(common)"
 133
 134         key <AD12> { [ U2192                    ] }; // ]: → -- Rightwards Arrow
 135         key <AE09> { [ NoSymbol,        U2371   ] }; // 9: ⍱ -- APL Functional Symbol Down Caret Tilde
 136         key <AE10> { [ NoSymbol,        U2372   ] }; // 0: ⍲ -- APL Functional Symbol Up Caret Tilde
 137         key <AE11> { [ U00D7                    ] }; // -: × -- Multiplication Sign
 138         key <AE12> { [ U00F7,           U2339   ] }; // =: ÷ ⌹ -- Division Sign / APL Functional Symbol Quad Divide
 139         key <TLDE> { [ U22C4                    ] }; // `: ⋄ -- Diamond Operator
 140 };
 141
 142 // Layout: http://www.wickensonline.co.uk/apl-unicomp.html
 143
 144 // ┌─────┬─────┬─────┬─────┬─────┬─────┬─────┬─────┬─────┬─────┬─────┬─────┬─────┲━━━━━━━━━┓
 145 // │     │ ¡   │     │     │ ¢   │     │     │     │ ⍂   │ ⍱   │ ⍲   │  ≡  │  ⌹  ┃         ┃
 146 // │ ⋄   │ ¨   │ ¯   │ <   │ ≤   │ =   │ ≥   │ >   │ ≠   │ ∨   │ ∧   │  ×  │  ÷  ┃         ┃
 147 // ┢━━━━━┷━┱───┴─┬───┴─┬───┴─┬───┴─┬───┴─┬───┴─┬───┴─┬───┴─┬───┴─┬───┴─┬───┴─┬───┺━┳━━━━━━━┫
 148 // ┃       ┃ ¿   │ ⌽   │ ⍷   │     │ ⍉   │     │     │ ⍸   │ ⍥   │ ⍣   │     │     ┃       ┃
 149 // ┃       ┃ ?   │ ⍵   │ ∊   │ ⍴   │ ~   │ ↑   │ ↓   │ ⍳   │ ○   │ *   │ ←   │  →  ┃       ┃
 150 // ┣━━━━━━━┻┱────┴┬────┴┬────┴┬────┴┬────┴┬────┴┬────┴┬────┴┬────┴┬────┴┬────┴┬────┺┓      ┃
 151 // ┃        ┃ ⊖   │     │     │ ⍫   │ ⍒   │ ⍋   │ ⍤   │ ⌻   │ ⍞   │     │     │  ⍀  ┃      ┃
 152 // ┃        ┃ ⍺   │ ⌈   │ ⌊   │ _   │ ∇   │ ∆   │ ∘   │ '   │ ⎕   │  ⊢  │  ⊣  │  ⍝  ┃      ┃
 153 // ┣━━━━━━━┳┹────┬┴────┬┴────┬┴────┬┴────┬┴────┬┴────┬┴────┬┴────┬┴────┬┴────┲┷━━━━━┻━━━━━━┫
 154 // ┃       ┃     │     │     │ ⍝   │     │  ⍎  │  ⍕  │ ⌶   │  ⍪  │  ⍙  │  ⌿  ┃             ┃
 155 // ┃       ┃     │ ⊂   │ ⊃   │ ∩   │ ∪   │ ⊥   │ ⊤   │ |   │  ⍞  │  ⍎  │  ⍕  ┃             ┃
 156 // ┣━━━━━━━╋━━━━━┷━┳━━━┷━━━┱─┴─────┴─────┴─────┴─────┴─────┴───┲━┷━━━━━╈━━━━━┻━┳━━━━━━━┳━━━┛
 157 // ┃       ┃       ┃       ┃                                   ┃       ┃       ┃       ┃
 158 // ┃       ┃       ┃       ┃                                   ┃       ┃       ┃       ┃
 159 // ┗━━━━━━━┻━━━━━━━┻━━━━━━━┹───────────────────────────────────┺━━━━━━━┻━━━━━━━┻━━━━━━━┛
 160
 161 partial alphanumeric_keys
 162 xkb_symbols "sax" {
 163         name[Group1]= "APL Keyboard Symbols";
 164
 165         include "apl(unified)"
 166
 167         key <AB03> { [  NoSymbol,       U235D   ] }; // C: ⍝ -- APL Functional Symbol Up Shoe Jot
 168         key <AB05> { [  NoSymbol,       U234E   ] }; // B: ⍎ -- APL Functional Symbol Down Tack Jot (Unicode got the name wrong; it should have been "Up Tack")
 169         key <AB06> { [  NoSymbol,       U2355   ] }; // N: ⍕ -- APL Functional Symbol Up Tack Jot (Unicode got the name wrong; it should have been "Down Tack")
 170         key <AB07> { [  NoSymbol,       U2336   ] }; // M: ⌶ -- APL Functional Symbol I-Beam
 171         key <AB08> { [  U235E,          U236A   ] }; // ,: ⍞ ⍪ -- APL Functional Symbol Quote Quad / APL Functional Symbol Comma Bar
 172         key <AB09> { [  U234E,          U2359   ] }; // .: ⍎ ⍙ -- [See B key] / APL Functional Symbol Delta Underbar
 173         key <AB10> { [  U2355,          U233F   ] }; // /: ⍕ ⌿ -- [See N key] / APL Functional Symbol Slash Bar
 174
 175         key <AC01> { [  NoSymbol,       U2296   ] }; // A: ⊖ -- Circled Minus
 176         key <AC04> { [  NoSymbol,       U236B   ] }; // F: ⍫ -- APL Functional Symbol Del Tilde
 177         key <AC05> { [  NoSymbol,       U2352   ] }; // G: ∇ ⍒ -- APL Functional Symbol Del Stile
 178         key <AC06> { [  NoSymbol,       U234B   ] }; // H: ∆ ⍋ -- APL Functional Symbol Delta Stile
 179         key <AC07> { [  NoSymbol,       U2364   ] }; // J: ⍤ -- APL Functional Symbol Jot Diaeresis
 180         key <AC08> { [  NoSymbol,       U233B   ] }; // K: ⌻
 181         key <AC09> { [  NoSymbol,       U235E   ] }; // L: ⍞ -- APL Functional Symbol Quote Quad
 182         key <AC10> { [  U22A2                   ] }; // ;: ⊢ -- Right Tack
 183         key <AC11> { [  U22A3                   ] }; // ': ⊣ -- Left Tack
 184
 185         key <AD01> { [  NoSymbol,       U00BF   ] }; // Q: ¿ -- Inverted Question Mark
 186         key <AD02> { [  NoSymbol,       U233D   ] }; // W: ⌽ -- APL Functional Symbol Circle Stile
 187         key <AD03> { [  NoSymbol,       U2377   ] }; // E: ⍷ -- APL Functional Symbol Epsilon Underbar
 188         key <AD05> { [  NoSymbol,       U2349   ] }; // T: ⍉ -- APL Functional Symbol Circle Backslash
 189         key <AD08> { [  NoSymbol,       U2378   ] }; // I: ⍸ -- APL Functional Symbol Iota Underbar
 190         key <AD09> { [  NoSymbol,       U2365   ] }; // O: ⍥ -- APL Functional Symbol Circle Diaeresis
 191         key <AD10> { [  NoSymbol,       U235F   ] }; // P: ⍟ -- APL Functional Symbol Circle Star
 192         key <AE01> { [  NoSymbol,       U00A1   ] }; // 1: ¡ -- Inverted Exclamation Mark
 193         key <AE04> { [  NoSymbol,       cent    ] }; // 4:
 194         key <AE08> { [  NoSymbol,       U2342   ] }; // 8: ⍂ -- APL Functional Symbol Quad Backslash
 195         key <AE11> { [  NoSymbol,       U2261   ] }; // -: ≡ -- Identical To
 196
 197         key <BKSL> { [  U235D,          U2340   ] }; // \: ⍝ ⍀ -- APL Functional Symbol Up Shoe Jot / APL Functional Symbol Backslash Bar
 198 };
 199
 200 // Layout: http://www.wickensonline.co.uk/apl-unicomp.html
 201
 202 // ┌─────┬─────┬─────┬─────┬─────┬─────┬─────┬─────┬─────┬─────┬─────┬─────┬─────┲━━━━━━━━━┓
 203 // │  ⍂  │ ⌶   │ ⍫   │ ⍒   │ ⍋   │ ⌽   │ ⍉   │ ⊖   │ ⍟   │ ⍱   │ ⍲   │  !  │  ⌹  ┃         ┃
 204 // │  ⌻  │     │     │     │     │     │     │     │     │     │     │  -  │  ÷  ┃         ┃
 205 // │     │ ¨   │ ¯   │ <   │ ≤   │ =   │ ≥   │ >   │ ≠   │ ∨   │ ∧   │  +  │  ×  ┃         ┃
 206 // ┢━━━━━┷━┱───┴─┬───┴─┬───┴─┬───┴─┬───┴─┬───┴─┬───┴─┬───┴─┬───┴─┬───┴─┬───┴─┬───┺━┳━━━━━━━┫
 207 // ┃       ┃     │     │     │     │     │     │     │     │     │     │ ⍞   │  ⍙  ┃       ┃
 208 // ┃       ┃     │     │     │     │     │     │     │     │     │     │ →   │  ⍸  ┃       ┃
 209 // ┃       ┃ ?   │ ⍵   │ ∊   │ ⍴   │ ~   │ ↑   │ ↓   │ ⍳   │ ○   │ *   │ ←   │  ⌷  ┃       ┃
 210 // ┣━━━━━━━┻┱────┴┬────┴┬────┴┬────┴┬────┴┬────┴┬────┴┬────┴┬────┴┬────┴┬────┴┬────┺┓      ┃
 211 // ┃        ┃     │     │     │     │     │     │     │     │     │  ⍎  │  ⍕  │  ⍤  ┃      ┃
 212 // ┃        ┃     │     │     │     │     │     │     │     │     │  (  │  )  │  ⍷  ┃      ┃
 213 // ┃        ┃ ⍺   │ ⌈   │ ⌊   │ _   │ ∇   │ ∆   │ ∘   │ '   │ ⎕   │  [  │  ]  │  ≡  ┃      ┃
 214 // ┣━━━━━━━┳┹────┬┴────┬┴────┬┴────┬┴────┬┴────┬┴────┬┴────┬┴────┬┴────┬┴────┲┷━━━━━┻━━━━━━┫
 215 // ┃       ┃     │     │     │     │     │     │     │     │  ⍝  │  ⍀  │  ⌿  ┃             ┃
 216 // ┃       ┃     │     │     │     │     │     │     │     │  ;  │  :  │  \  ┃             ┃
 217 // ┃       ┃     │ ⊂   │ ⊃   │ ∩   │ ∪   │ ⊥   │ ⊤   │ |   │  ,  │  .  │  /  ┃             ┃
 218 // ┣━━━━━━━╋━━━━━┷━┳━━━┷━━━┱─┴─────┴─────┴─────┴─────┴─────┴───┲━┷━━━━━╈━━━━━┻━┳━━━━━━━┳━━━┛
 219 // ┃       ┃       ┃       ┃                                   ┃       ┃       ┃       ┃
 220 // ┃       ┃       ┃       ┃                                   ┃       ┃       ┃       ┃
 221 // ┗━━━━━━━┻━━━━━━━┻━━━━━━━┹───────────────────────────────────┺━━━━━━━┻━━━━━━━┻━━━━━━━┛
 222
 223 partial alphanumeric_keys
 224 xkb_symbols "apl2" {
 225         name[Group1]= "APL Keyboard Symbols: IBM APL2";
 226
 227         include "apl(common)"
 228
 229         // The first column is NoSymbol because it inherits.  The second is NoSymbol because those keys don't do anything
 230         // AFS - short for APL Functional Symbol
 231
 232         key <AB08> { [  comma,          semicolon,      U235D   ] }; // ,: ⍝ -- AFS Up Shoe Jot
 233         key <AB09> { [  period,         colon,          U2340   ] }; // .: ⍀ -- AFS Backslash Bar
 234         key <AB10> { [  slash,          backslash,      U233F   ] }; // /: ⌿ -- AFS Slash Bar
 235
 236         key <AC10> { [  bracketleft,    parenleft,      U234E   ] }; // ;: ⍎ -- [See B key in SAX layout]
 237         key <AC11> { [  bracketright,   parenright,     U2355   ] }; // ': ⍕ -- [See N key in SAX layout]
 238
 239         key <AD11> { [  NoSymbol,       U2192,          U235E   ] }; // [: (←) → ⍞ -- Rightwards Arrow / AFS Quote Quad
 240         key <AD12> { [  U2337,          U2378,          U2359   ] }; // ]: ⌷ ⍸ ⍙ -- AFS Squish Quad / AFS Iota Underbar / AFS Delta Underbar
 241
 242         key <AE01> { [  NoSymbol,       NoSymbol,       U2336   ] }; // 1: ⌶ -- AFS I-Beam
 243         key <AE02> { [  NoSymbol,       NoSymbol,       U236B   ] }; // 2: ⍫ -- AFS Del Tilde
 244         key <AE03> { [  NoSymbol,       NoSymbol,       U2353   ] }; // 3: ⍒ -- AFS Del Stile
 245         key <AE04> { [  NoSymbol,       NoSymbol,       U234B   ] }; // 4: ⍋ -- AFS Delta Stile
 246         key <AE05> { [  NoSymbol,       NoSymbol,       U233D   ] }; // 5: ⌽ -- AFS Circle Stile
 247         key <AE06> { [  NoSymbol,       NoSymbol,       U2349   ] }; // 6: ⍉ -- AFS Circle Backslash
 248         key <AE07> { [  NoSymbol,       NoSymbol,       U2296   ] }; // 7: ⊖ -- Circled Minus
 249         key <AE08> { [  NoSymbol,       NoSymbol,       U235F   ] }; // 8: ⍟ -- AFS Circle Star
 250         key <AE09> { [  NoSymbol,       NoSymbol,       U2371   ] }; // 9: ⍱ -- AFS Down Caret Tilde
 251         key <AE10> { [  NoSymbol,       NoSymbol,       U2372   ] }; // 0: ⍲ -- AFS Up Caret Tilde
 252         key <AE11> { [  plus,           minus,          exclam  ] }; // -:
 253         key <AE12> { [  U00D7,          U00F7,          U2339   ] }; // =: × ÷ ⌹ -- Multiplication Sign / Division Sign / AFS Quad Divide
 254
 255         key <BKSL> { [  U2261,          U2377,          U2364   ] }; // \: ≡ ⍷ ⍤ -- Identical To / AFS Epsilon Underbar / AFS Jot Diaeresis
 256
 257         key <TLDE> { [  NoSymbol,       U233B,          U2342   ] }; // `: ⌻ ⍂ --
 258
 259         include "level3(ralt_switch)"
 260 };
 261
 262 // ┌─────┬─────┬─────┬─────┬─────┬─────┬─────┬─────┬─────┬─────┬─────┬─────┬─────┲━━━━━━━━━┓
 263 // │  ⍪  │ ≡   │ ⍫   │ ⍒   │ ⍋   │ ⌽   │ ⍉   │ ⊖   │ ⍟   │ ⍱   │ ⍲   │  !  │  ⌹  ┃         ┃
 264 // │  ⋄  │     │     │     │     │     │     │     │     │     │     │  -  │  ÷  ┃         ┃
 265 // │  $  │ ¨   │ ¯   │ <   │ ≤   │ =   │ ≥   │ >   │ ≠   │ ∨   │ ∧   │  +  │  ×  ┃         ┃
 266 // ┢━━━━━┷━┱───┴─┬───┴─┬───┴─┬───┴─┬───┴─┬───┴─┬───┴─┬───┴─┬───┴─┬───┴─┬───┴─┬───┺━┳━━━━━━━┫
 267 // ┃       ┃     │     │     │     │     │     │     │     │     │     │ ⍞   │  ⍬  ┃       ┃
 268 // ┃       ┃     │     │     │     │     │     │     │     │     │     │ →   │  ⍸  ┃       ┃
 269 // ┃       ┃ ?   │ ⍵   │ ∊   │ ⍴   │ ~   │ ↑   │ ↓   │ ⍳   │ ○   │ *   │ ←   │  →  ┃       ┃
 270 // ┣━━━━━━━┻┱────┴┬────┴┬────┴┬────┴┬────┴┬────┴┬────┴┬────┴┬────┴┬────┴┬────┴┬────┺┓      ┃
 271 // ┃        ┃     │     │     │     │     │     │     │     │     │  ⍎  │  ⍕  │  ⍙  ┃      ┃
 272 // ┃        ┃     │     │     │     │     │     │     │     │     │  (  │  )  │  ⊣  ┃      ┃
 273 // ┃        ┃ ⍺   │ ⌈   │ ⌊   │ _   │ ∇   │ ∆   │ ∘   │ '   │ ⎕   │  [  │  ]  │  ⊢  ┃      ┃
 274 // ┣━━━━━━━┳┹────┬┴────┬┴────┬┴────┬┴────┬┴────┬┴────┬┴────┬┴────┬┴────┬┴────┲┷━━━━━┻━━━━━━┫
 275 // ┃       ┃     │     │     │     │     │     │     │     │  ⍝  │  ⍀  │  ⌿  ┃             ┃
 276 // ┃       ┃     │     │     │     │     │     │     │     │  ;  │  :  │  \  ┃             ┃
 277 // ┃       ┃     │ ⊂   │ ⊃   │ ∩   │ ∪   │ ⊥   │ ⊤   │ |   │  ,  │  .  │  /  ┃             ┃
 278 // ┣━━━━━━━╋━━━━━┷━┳━━━┷━━━┱─┴─────┴─────┴─────┴─────┴─────┴───┲━┷━━━━━╈━━━━━┻━┳━━━━━━━┳━━━┛
 279 // ┃       ┃       ┃       ┃                                   ┃       ┃       ┃       ┃
 280 // ┃       ┃       ┃       ┃                                   ┃       ┃       ┃       ┃
 281 // ┗━━━━━━━┻━━━━━━━┻━━━━━━━┹───────────────────────────────────┺━━━━━━━┻━━━━━━━┻━━━━━━━┛
 282
 283 partial alphanumeric_keys
 284 xkb_symbols "aplplusII" {
 285         name[Group1]= "APL Keyboard Symbols: Manugistics APL*PLUS II";
 286         // AFS - short for APL Functional Symbol
 287
 288         include "apl(apl2)"
 289
 290         key <AC10> { [  bracketleft,    parenleft,      U234E   ] }; // ;: ⍎ -- [See B key in SAX layout]
 291         key <AC11> { [  bracketright,   parenright,     U2355   ] }; // ': ⍕ -- [See N key in SAX layout]
 292         key <AD11> { [  U2190,          NoSymbol,       U235E   ] }; // [: ← ⍞ -- Leftwards Arrow / AFS Quote Quad
 293         key <AD12> { [  U2192,          NoSymbol,       U236C   ] }; // ]: → ⍬ -- Rightwards Arrow / AFS Zilde
 294         key <AE01> { [  NoSymbol,       NoSymbol,       U2261   ] }; // 1: ≡ -- Identical To
 295         key <BKSL> { [  U22A2,          U22A3,          U2359   ] }; // \: ⊢ ⊣ ⍙ -- Left Tack / Right Tack / AFS Delta Underbar
 296         key <TLDE> { [  dollar,         U22C4,          U236A   ] }; // `: ⋄ ⍪ -- Diamond Operator / AFS Comma Bar
 297 };
 298
 299
 300 // MicroAPL layout: http://aplwiki.com/APLXKeyboardLayouts
 301 // I didn't do the old-style MicroAPL layout; patches gratefully accepted
 302
 303 // ┌─────┬─────┬─────┬─────┬─────┬─────┬─────┬─────┬─────┬─────┬─────┬─────┬─────┲━━━━━━━━━┓
 304 // │ ⍞   │ ⌶   │ ⍫   │ ⍒   │ ⍋   │ ⌽   │ ⍉   │ ⊖   │ ⍟   │ ⍱   │ ⍲   │  !  │  ⌹  ┃         ┃
 305 // │ ⋄   │ ¨   │ ¯   │ <   │ ≤   │ =   │ ≥   │ >   │ ≠   │ ∨   │ ∧   │  ×  │  ÷  ┃         ┃
 306 // ┢━━━━━┷━┱───┴─┬───┴─┬───┴─┬───┴─┬───┴─┬───┴─┬───┴─┬───┴─┬───┴─┬───┴─┬───┴─┬───┺━┳━━━━━━━┫
 307 // ┃       ┃     │     │     │     │     │     │     │     │     │     │ ⍇   │  ⍈  ┃       ┃
 308 // ┃       ┃ ?   │ ⍵   │ ∊   │ ⍴   │ ~   │ ↑   │ ↓   │ ⍳   │ ○   │ *   │ ←   │  →  ┃       ┃
 309 // ┣━━━━━━━┻┱────┴┬────┴┬────┴┬────┴┬────┴┬────┴┬────┴┬────┴┬────┴┬────┴┬────┴┬────┺┓      ┃
 310 // ┃        ┃     │     │     │     │     │     │     │     │     │  ≡  │  ≢  │  ⊣  ┃      ┃
 311 // ┃        ┃ ⍺   │ ⌈   │ ⌊   │ _   │ ∇   │ ∆   │ ∘   │ '   │ ⎕   │  ⍎  │  ⍕  │  ⊢  ┃      ┃
 312 // ┣━━━━━━━┳┹────┬┴────┬┴────┬┴────┬┴────┬┴────┬┴────┬┴────┬┴────┬┴────┬┴────┲┷━━━━━┻━━━━━━┫
 313 // ┃       ┃     │     │     │     │     │     │     │     │  ⍪  │  ⍤  │     ┃             ┃
 314 // ┃       ┃     │ ⊂   │ ⊃   │ ∩   │ ∪   │ ⊥   │ ⊤   │ |   │  ⍝  │  ⍀  │  ⌿  ┃             ┃
 315 // ┣━━━━━━━╋━━━━━┷━┳━━━┷━━━┱─┴─────┴─────┴─────┴─────┴─────┴───┲━┷━━━━━╈━━━━━┻━┳━━━━━━━┳━━━┛
 316 // ┃       ┃       ┃       ┃                                   ┃       ┃       ┃       ┃
 317 // ┃       ┃       ┃       ┃                                   ┃       ┃       ┃       ┃
 318 // ┗━━━━━━━┻━━━━━━━┻━━━━━━━┹───────────────────────────────────┺━━━━━━━┻━━━━━━━┻━━━━━━━┛
 319
 320 partial alphanumeric_keys
 321 xkb_symbols "aplx" {
 322         name[Group1]= "APL Keyboard Symbols: APLX Unified APL Layout";
 323
 324         include "apl(unified)"
 325
 326         key <AB08> { [  U235D,          U236A   ] }; // ,: ⍝ ⍪ -- APL Functional Symbol Up Shoe Jot / APL Functional Symbol Comma Bar
 327         key <AB09> { [  U2340,          U2364   ] }; // .: ⍀ ⍤ -- APL Functional Symbol Backslash Bar / APL Functional Symbol Jot Diaeresis
 328         key <AB10> { [  U233F                   ] }; // /: ⌿ -- APL Functional Symbol Slash Bar
 329
 330         key <AC10> { [  U234E,          U2261   ] }; // ;: ⍎ ≡ -- [See B key in SAX layout] / Identical To
 331         key <AC11> { [  U2355,          U2262   ] }; // ': ⍕ ≢ -- [See N key in SAX layout] / Not Identical To
 332
 333         key <AD11> { [  NoSymbol,       U2347   ] }; // [: ⍇ -- Box With Left Arrow
 334         key <AD12> { [  NoSymbol,       U2348   ] }; // ]: ⍈ -- Box With Right Arrow
 335
 336         key <AE01> { [  NoSymbol,       U2336   ] }; // 1: ⌶ -- APL Functional Symbol I-Beam
 337         key <AE02> { [  NoSymbol,       U236B   ] }; // 2: ⍫ -- APL Functional Symbol Del Tilde
 338         key <AE03> { [  NoSymbol,       U2353   ] }; // 3: ⍒ -- APL Functional Symbol Del Stile
 339         key <AE04> { [  NoSymbol,       U234B   ] }; // 4: ⍋ -- APL Functional Symbol Delta Stile
 340         key <AE05> { [  NoSymbol,       U233D   ] }; // 5: ⌽ -- APL Functional Symbol Circle Stile
 341         key <AE06> { [  NoSymbol,       U2349   ] }; // 6: ⍉ -- APL Functional Symbol Circle Backslash
 342         key <AE07> { [  NoSymbol,       U2296   ] }; // 7: ⊖ -- Circled Minus
 343         key <AE08> { [  NoSymbol,       U235F   ] }; // 8: ⍟ -- APL Functional Symbol Circle Star
 344         key <AE11> { [  NoSymbol,       exclam  ] }; // -:
 345
 346         key <BKSL> { [  U22A2,          U22A3   ] }; // \: ⊢ ⊣ -- Right Tack / Left Tack
 347
 348         key <TLDE> { [  NoSymbol,       U235E   ] }; // `: ⍞ -- APL Functional Symbol Quote Quad
 349 };
 350
 351 // APL language support for the Dyalog keyboard.
 352 // Dyalog Ltd sell this keyboard with APL engravings. The current model is
 353 // engraved on a Cherry G80. Base languages for US, UK and DK are availible.
 354
 355 // Geoff Streeter, Dyalog Ltd. 2007-09-03
 356 // geoff@dyalog.com
 357 // extended for APL special actions 2008-09-09
 358 // add variant 2010-11-26
 359
 360 // The intention is that this keyboard layout overlays a base keyboard that provides
 361 // the alphabet and similar. If this keyboard is placed as the 2nd layout then it can
 362 // be reached with a latching shift to increase group by one.
 363
 364 partial alphanumeric_keys
 365 xkb_symbols "dyalog_base" {
 366         name[Group1]="APL";
 367
 368
 369 // ┌─────┬─────┬─────┬─────┬─────┬─────┬─────┬─────┬─────┬─────┬─────┬─────┬─────┲━━━━━━━━━┓
 370 // │     │ ⌶   │ ⍫   │ ⍒   │ ⍋   │ ⌽   │ ⍉   │ ⊖   │ ⍟   │ ⍱   │ ⍲   │ !   │ ⌹   ┃         ┃
 371 // │ ⋄   │ ¨   │ ¯   │ <   │ ≤   │ =   │ ≥   │ >   │ ≠   │ ∨   │ ∧   │ ×   │ ÷   ┃         ┃
 372 // ┢━━━━━┷━┱───┴─┬───┴─┬───┴─┬───┴─┬───┴─┬───┴─┬───┴─┬───┴─┬───┴─┬───┴─┬───┴─┬───┺━┳━━━━━━━┫
 373 // ┃       ┃     │     │ ⍷   │     │ ⍨   │     │     │ ⍸   │ ⍥   │ ⍣   │ ⍞   │ ⍬   ┃       ┃
 374 // ┃       ┃ ?   │ ⍵   │ ∊   │ ⍴   │ ~   │ ↑   │ ↓   │ ⍳   │ ○   │ *   │ ←   │ →   ┃       ┃
 375 // ┣━━━━━━━┻┱────┴┬────┴┬────┴┬────┴┬────┴┬────┴┬────┴┬────┴┬────┴┬────┴┬────┴┬────┺┓      ┃
 376 // ┃        ┃     │     │     │     │     │     │ ⍤   │     │ ⌷   │ ≡   │ ≢   │ ⊣   ┃      ┃
 377 // ┃        ┃ ⍺   │ ⌈   │ ⌊   │ _   │ ∇   │ ∆   │ ∘   │ '   │ ⎕   │ ⍎   │ ⍕   │ ⊢   ┃      ┃
 378 // ┣━━━━━━━┳┹────┬┴────┬┴────┬┴────┬┴────┬┴────┬┴────┬┴────┬┴────┬┴────┬┴────┲┷━━━━━┻━━━━━━┫
 379 // ┃       ┃     │     │     │     │     │     │     │     │ ⍪   │ ⍙   │ ⍠   ┃             ┃
 380 // ┃       ┃     │ ⊂   │ ⊃   │ ∩   │ ∪   │ ⊥   │ ⊤   │ |   │ ⍝   │ ⍀   │ ⌿   ┃             ┃
 381 // ┣━━━━━━━╋━━━━━┷━┳━━━┷━━━┱─┴─────┴─────┴─────┴─────┴─────┴───┲━┷━━━━━╈━━━━━┻━┳━━━━━━━┳━━━┛
 382 // ┃       ┃       ┃       ┃                                   ┃       ┃       ┃       ┃
 383 // ┃       ┃       ┃       ┃                                   ┃       ┃       ┃       ┃
 384 // ┗━━━━━━━┻━━━━━━━┻━━━━━━━┹───────────────────────────────────┺━━━━━━━┻━━━━━━━┻━━━━━━━┛
 385
 386
 387         key <AB01> { [ U2282                    ] };    // subset of
 388         key <AB02> { [ U2283                    ] };    // superset of
 389         key <AB03> { [ U2229                    ] };    // intersection
 390         key <AB04> { [ U222A                    ] };    // union
 391         key <AB05> { [ U22a5                    ] };    // up tack
 392         key <AB06> { [ U22a4                    ] };    // down tack
 393         key <AB07> { [ U007c                    ] };    // vertical line
 394         key <AB08> { [ U235d,           U236a   ] };    // up shoe jot, comma bar
 395         key <AB09> { [ U2340,           U2359   ] };    // backslash bar, delta underbar
 396         key <AB10> { [ U233f,           U2360   ] };    // slash bar, quad colon
 397         key <AC01> { [ U237a                    ] };    // alpha
 398         key <AC02> { [ U2308                    ] };    // left ceiling
 399         key <AC03> { [ U230a                    ] };    // left floor
 400         key <AC04> { [ underscore               ] };    // low line
 401         key <AC05> { [ U2207                    ] };    // nabla
 402         key <AC06> { [ U2206                    ] };    // increment
 403         key <AC07> { [ U2218,           U2364   ] };    // ring operator, jot diaeresis
 404         key <AC08> { [ apostrophe               ] };
 405         key <AC09> { [ U2395,           U2337   ] };    // quad, squish quad
 406         key <AC10> { [ U234e,           U2261   ] };    // up tack jot, identical to
 407         key <AC11> { [ U2355,           U2262   ] };    // down tack jot,  not identical to
 408         key <AD01> { [ question                 ] };
 409         key <AD02> { [ U2375                    ] };    // omega
 410         key <AD03> { [ U220a,           U2377   ] };    // small element of, epsilon underbar
 411         key <AD04> { [ U2374                    ] };    // rho
 412         key <AD05> { [ asciitilde,      U2368   ] };    // tilde, tilde diaeresis
 413         key <AD06> { [ U2191                    ] };    // upwards arrow
 414         key <AD07> { [ U2193                    ] };    // downwards arrow
 415         key <AD08> { [ U2373,           U2378   ] };    // iota, iota underbar
 416         key <AD09> { [ U25cb,           U2365   ] };    // circle, circle diaeresis
 417         key <AD10> { [ asterisk,        U2363   ] };    // asterisk, star diaeresis
 418         key <AD11> { [ U2190,           U235e   ] };    // left arrow, quote quad
 419         key <AD12> { [ U2192,           U236c   ] };    // right arrow, zilde
 420         key <AE01> { [ diaeresis,       U2336   ] };    // i-beam
 421         key <AE02> { [ overbar,         U236B   ] };    // deltilde
 422         key <AE03> { [ less,            U2352   ] };    // downgrade
 423         key <AE04> { [ U2264,           U234b   ] };    // lesseq upgrade
 424         key <AE05> { [ equal,           U233d   ] };    // circlestile
 425         key <AE06> { [ U2265,           U2349   ] };    // greatereq circleslope
 426         key <AE07> { [ greater,         U2296   ] };    // circlebar
 427         key <AE08> { [ U2260,           U235f   ] };    // notequal, circlestar
 428         key <AE09> { [ U2228,           U2371   ] };    // logical or, down caret tilde
 429         key <AE10> { [ U2227,           U2372   ] };    // logical and, up caret tilde
 430         key <AE11> { [ multiply,        exclam  ] };
 431         key <AE12> { [ division,        U2339   ] };    //  quad divide
 432         key <BKSL> { [ U22a2,           U22a3   ] };    // right tack, left tack
 433         key <TLDE> { [ U22c4                    ] };    // diamond
 434 };
 435
 436 partial keypad_keys
 437 xkb_symbols "dyalog_box" {
 438         name[Group1]="Dyalog box";
 439
 440 // ┌───┬───┬───┬───┐
 441 // │   │   │   │   │
 442 // ├───┼───┼───┼───┤
 443 // │ ┌ │ ┬ │ ┐ │   │
 444 // ├───┼───┼───┤   │
 445 // │ ├ │ ┼ │ ┤ │   │
 446 // ├───┼───┼───┼───┤
 447 // │ └ │ ┴ │ ┘ │   │
 448 // ├───┴───┼───┤   │
 449 // │   ─   │ │ │   │
 450 // └───────┴───┴───┘
 451
 452         key <KP0>  { [ U2500 ] };       // box drawing light horizontal
 453         key <KP1>  { [ U2514 ] };       // box drawing light up and right
 454         key <KP2>  { [ U2534 ] };       // box drawing light up and horizontal
 455         key <KP3>  { [ U2518 ] };       // box drawing light up and left
 456         key <KP4>  { [ U251c ] };       // box drawing light veritcal and right
 457         key <KP5>  { [ U253c ] };       // box drawing light veritcal and horizontal
 458         key <KP6>  { [ U2524 ] };       // box drawing light veritcal and left
 459         key <KP7>  { [ U250c ] };       // box drawing light down and right
 460         key <KP8>  { [ U252c ] };       // box drawing light down and horizontal
 461         key <KP9>  { [ U2510 ] };       // box drawing light down and left
 462         key <KPDL> { [ U2502 ] };       // box drawing light vertical
 463
 464 };
 465
 466 xkb_symbols "dyalog_codes" {
 467         name[Group1]="Dyalog Codes";
 468
 469 //      Layout of private use area for this. In the style of the Unicode book
 470 //
 471 //                              APL special actions             F800-F88F
 472 //
 473 //      │F800 F810 F820 F830 F840 F850 F860 F870 F880
 474 //      ├────┬────┬────┬────┬────┬────┬────┬────┬────┐
 475 //     0│QT  │LL  │BK  │FX  │Rc  │BP  │PA  │    │    │
 476 //      ├────┼────┼────┼────┼────┼────┼────┼────┼────┤
 477 //     1│ER  │HO  │ZM  │LN  │LW  │AB  │    │    │    │
 478 //      ├────┼────┼────┼────┼────┼────┼────┼────┼────┤
 479 //     2│TB  │CT  │SC  │MC  │RW  │HT  │    │    │    │
 480 //      ├────┼────┼────┼────┼────┼────┼────┼────┼────┤
 481 //     3│BT  │PT  │RP  │MR  │Lw  │TH  │    │    │    │
 482 //      ├────┼────┼────┼────┼────┼────┼────┼────┼────┤
 483 //     4│EP  │IN  │NX  │JP  │Rw  │RM  │    │    │    │
 484 //      ├────┼────┼────┼────┼────┼────┼────┼────┼────┤
 485 //     5│UC  │II  │PV  │D1  │Uc  │CB  │    │    │    │
 486 //      ├────┼────┼────┼────┼────┼────┼────┼────┼────┤
 487 //     6│DC  │DI  │RT  │D2  │Dc  │PR  │    │    │TO  │
 488 //      ├────┼────┼────┼────┼────┼────┼────┼────┼────┤
 489 //     7│RC  │DP  │RA  │D3  │Ll  │SR  │    │    │MO  │
 490 //      ├────┼────┼────┼────┼────┼────┼────┼────┼────┤
 491 //     8│LC  │DB  │ED  │D4  │Rl  │    │    │    │    │
 492 //      ├────┼────┼────┼────┼────┼────┼────┼────┼────┤
 493 //     9│US  │RD  │TC  │D5  │Ul  │TL  │    │    │    │
 494 //      ├────┼────┼────┼────┼────┼────┼────┼────┼────┤
 495 //     A│DS  │TG  │NB  │U1  │Dl  │UA  │    │    │    │
 496 //      ├────┼────┼────┼────┼────┼────┼────┼────┼────┤
 497 //     B│RS  │DK  │NS  │U2  │Us  │AO  │    │    │    │
 498 //      ├────┼────┼────┼────┼────┼────┼────┼────┼────┤
 499 //     C│LS  │OP  │ST  │U3  │Ds  │DO  │    │    │    │
 500 //      ├────┼────┼────┼────┼────┼────┼────┼────┼────┤
 501 //     D│UL  │CP  │EN  │U4  │DD  │GL  │    │    │S1  │
 502 //      ├────┼────┼────┼────┼────┼────┼────┼────┼────┤
 503 //     E│DL  │MV  │IF  │U5  │DH  │CH  │    │    │S2  │
 504 //      ├────┼────┼────┼────┼────┼────┼────┼────┼────┤
 505 //     F│RL  │FD  │HK  │Lc  │BH  │PU  │    │    │OS  │
 506 //      └────┴────┴────┴────┴────┴────┴────┴────┴────┘
 507 //
 508 //                              APL Function Keys               F700-F7FF
 509 //
 510 //      │F700 ...                           ...  F7F0
 511 //      ├────┬────┬────┬────┬....┬────┬────┬────┬────┐
 512 //     0│F0  │F16 │F32 │F48 │    │F192│F208│F224│F240│
 513 //      .
 514 //      .
 515 //      .
 516 //     F│F15 │F31 │F47 │F63 │    │F207│F223│F239│F255│
 517 //      └────┴────┴────┴────┴....┴────┴────┴────┴────┘
 518 //
 519 //      whilst these locations are defined. Dyalog's "aplkeys/xterm" file copes with
 520 //      normal function keys from the base keyboard rather than this overlay
 521
 522 // ┌─────┐                                                                       ┌───┐
 523 // │     │                                                                       │ZM │
 524 // │ QT  │                                                                       │ZM │
 525 // └─────┘                                                                       └───┘
 526
 527 // ┌─────┬─────┬─────┬─────┬─────┬─────┬─────┬─────┬─────┬─────┬─────┬─────┬─────┲━━━━━━━━━┓
 528 // │     │     │     │     │     │     │     │     │     │     │     │     │     ┃   CB    ┃
 529 // │     │     │     │     │     │     │     │     │     │     │     │     │     ┃   BP    ┃
 530 // ┢━━━━━┷━┱───┴─┬───┴─┬───┴─┬───┴─┬───┴─┬───┴─┬───┴─┬───┴─┬───┴─┬───┴─┬───┴─┬───┺━┳━━━━━━━┫
 531 // ┃ BT    ┃     │     │     │     │     │     │     │     │     │     │     │     ┃       ┃
 532 // ┃ TB    ┃     │     │     │     │     │     │     │     │     │     │     │     ┃       ┃
 533 // ┣━━━━━━━┻┱────┴┬────┴┬────┴┬────┴┬────┴┬────┴┬────┴┬────┴┬────┴┬────┴┬────┴┬────┺┓      ┃
 534 // ┃        ┃     │     │     │     │     │     │     │     │     │     │     │     ┃ TC   ┃
 535 // ┃        ┃     │     │     │     │     │     │     │     │     │     │     │     ┃ ED   ┃
 536 // ┣━━━━━━━┳┹────┬┴────┬┴────┬┴────┬┴────┬┴────┬┴────┬┴────┬┴────┬┴────┬┴────┲┷━━━━━┻━━━━━━┫
 537 // ┃       ┃     │     │     │     │     │     │     │     │     │     │     ┃             ┃
 538 // ┃       ┃     │     │     │     │     │     │     │     │     │     │     ┃             ┃
 539 // ┣━━━━━━━╋━━━━━┷━┳━━━┷━━━┱─┴─────┴─────┴─────┴─────┴─────┴───┲━┷━━━━━╈━━━━━┻━┳━━━━━━━┳━━━┛
 540 // ┃       ┃       ┃       ┃              MO                   ┃       ┃       ┃       ┃
 541 // ┃       ┃       ┃       ┃              TO                   ┃       ┃       ┃       ┃
 542 // ┗━━━━━━━┻━━━━━━━┻━━━━━━━┹───────────────────────────────────┺━━━━━━━┻━━━━━━━┻━━━━━━━┛
 543
 544
 545         key <BKSP> { [ Uf850,   Uf855   ] };    // BP CB
 546         key <ESC>  { [ Uf800            ] };    // QT
 547         key <FK11> { [ Uf821,   Uf821   ] };    // ZM, ZM put this on both, the unshifted one sometimes gets lost
 548         key <RTRN> { [ Uf828,   Uf829   ] };    // ED, TC
 549         key <SPCE> { [ Uf886,   Uf887   ] };    // TO, MO
 550         key <TAB>  { [ Uf802,   Uf803   ] };    // TB, BT
 551
 552 //      ┌─────┐
 553 //      │     │
 554 //      │ BK  │
 555 // ┌────┼─────┼────┐
 556 // │ BH │     │ RM │
 557 // │ PV │ FD  │ NX │
 558 // └────┴─────┴────┘
 559
 560         key <DOWN> { [ Uf81f            ] };    // FD
 561         key <LEFT> { [ Uf825,   Uf84f   ] };    // PV, BH
 562         key <RGHT> { [ Uf824,   Uf854   ] };    // NX, RM
 563         key <UP>   { [ Uf820            ] };    // BK
 564
 565
 566 // ┌───┬───┬───┐
 567 // │PT │LL │UL │
 568 // │CP │LS │US │
 569 // ├───┼───┼───┤
 570 // │CT │RL │DL │
 571 // │DK │RS │DS │
 572 // └───┴───┴───┘
 573
 574         key <DELE> { [ Uf81b, Uf812 ] };        // DK, CT
 575         key <END>  { [ Uf80b, Uf80f ] };        // RS, RL
 576         key <HOME> { [ Uf80c, Uf810 ] };        // LS, LL
 577         key <INS>  { [ Uf81d, Uf813 ] };        // CP, PT
 578         key <PGDN> { [ Uf80a, Uf80e ] };        // DS, DL
 579         key <PGUP> { [ Uf809, Uf80d ] };        // US, UL
 580
 581 // ┌───┬───┬───┬───┐
 582 // │   │RD │TG │LN │
 583 // ├───┼───┼───┼───┤
 584 // │   │   │   │   │
 585 // ├───┼───┼───┤TL │
 586 // │   │   │   │   │
 587 // ├───┼───┼───┼───┤
 588 // │   │   │   │   │
 589 // ├───┴───┼───┤   │
 590 // │       │   │   │
 591 // └───────┴───┴───┘
 592
 593
 594         key <KPAD> { [ Uf859 ] };       // TL
 595         key <KPDV> { [ Uf819 ] };       // RD
 596         key <KPMU> { [ Uf81a ] };       // TG
 597         key <KPSU> { [ Uf831 ] };       // LN
 598 };
 599
 600 xkb_symbols "dyalog" {
 601         include "apl(dyalog_base)"
 602         include "apl(dyalog_box)"
 603         include "apl(dyalog_codes)"
 604         name[Group1] = "Dyalog APL complete";
 605 };
 606