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