summaryrefslogtreecommitdiff
path: root/support/ultratex/user/greek.el
blob: 487c9d5aff2d45947993ef077cbdade81b0fcb77 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
;;; greek.el --- sample greek keys file.
;; Copyright (c) 1991, 1992, 1993, 1994, 1995, 1996, 1997, 1998, 1999
;; Mark Haiman, Nick Reingold, John Palmieri

;; (This is a sample file; it is part of the Ultra-TeX package.)

(define-key ultex-greek-map "a" "\\alpha ")
(define-key ultex-greek-map "b" "\\beta ")
(define-key ultex-greek-map "g" "\\gamma ")
(define-key ultex-greek-map "d" "\\delta ")
(define-key ultex-greek-map "e" "\\epsilon ")
(define-key ultex-greek-map "z" "\\zeta ")
(define-key ultex-greek-map "h" "\\eta ")
(define-key ultex-greek-map "q" "\\theta ")
(define-key ultex-greek-map "i" "\\iota ")
(define-key ultex-greek-map "k" "\\kappa ")
(define-key ultex-greek-map "l" "\\lambda ")
(define-key ultex-greek-map "m" "\\mu ")
(define-key ultex-greek-map "n" "\\nu ")
(define-key ultex-greek-map "u" "\\xi ")
(define-key ultex-greek-map "p" "\\pi ")
(define-key ultex-greek-map "r" "\\rho ")
(define-key ultex-greek-map "s" "\\sigma ")
(define-key ultex-greek-map "t" "\\tau ")
(define-key ultex-greek-map "y" "\\upsilon ")
(define-key ultex-greek-map "f" "\\phi ")
(define-key ultex-greek-map "x" "\\chi ")
(define-key ultex-greek-map "c" "\\psi ")
(define-key ultex-greek-map "o" "\\omega ")
(define-key ultex-greek-map "\C-e" "\\varepsilon ")
(define-key ultex-greek-map "\C-q" "\\vartheta ")
(define-key ultex-greek-map "\C-p" "\\varpi ")
(define-key ultex-greek-map "\C-r" "\\varrho ")
(define-key ultex-greek-map "\C-s" "\\varsigma ")
(define-key ultex-greek-map "\C-f" "\\varphi ")
(define-key ultex-greek-map "G" "\\Gamma ")
(define-key ultex-greek-map "D" "\\Delta ")
(define-key ultex-greek-map "Q" "\\Theta ")
(define-key ultex-greek-map "L" "\\Lambda ")
(define-key ultex-greek-map "U" "\\Xi ")
(define-key ultex-greek-map "P" "\\Pi ")
(define-key ultex-greek-map "S" "\\Sigma ")
(define-key ultex-greek-map "Y" "\\Upsilon ")
(define-key ultex-greek-map "F" "\\Phi ")
(define-key ultex-greek-map "C" "\\Psi ")
(define-key ultex-greek-map "O" "\\Omega ")
(define-key ultex-greek-map "\C-a" "\\aleph ")
(define-key ultex-greek-map "\C-i" "\\imath ")
(define-key ultex-greek-map "\C-j" "\\jmath ")
(define-key ultex-greek-map "\C-l" "\\ell ")
(define-key ultex-greek-map "?" "\\emptyset ")
(define-key ultex-greek-map "v" "\\forall ")
(define-key ultex-greek-map "j" "\\exists ")
(define-key ultex-greek-map "\C-_" "\\neg ")
(define-key ultex-greek-map "\C-d" "\\partial ")
(define-key ultex-greek-map "w" "\\infty ")
(define-key ultex-greek-map "V" "\\triangle ")
(define-key ultex-greek-map "=" "\\pm ")
(define-key ultex-greek-map "+" "\\mp ")
(define-key ultex-greek-map "1" "\\times ")
(define-key ultex-greek-map "!" "\\div ")
(define-key ultex-greek-map "`" "\\circ ")
(define-key ultex-greek-map "2" "\\amalg ")
(define-key ultex-greek-map "\C-^" "\\cdot ")
(define-key ultex-greek-map "9" "\\cap ")
(define-key ultex-greek-map "0" "\\cup ")
(define-key ultex-greek-map "-" "\\uplus ")
(define-key ultex-greek-map "6" "\\wedge ")
(define-key ultex-greek-map "7" "\\vee ")
(define-key ultex-greek-map "W" "\\sqcap ")
(define-key ultex-greek-map "8" "\\sqcup ")
(define-key ultex-greek-map "3" "\\oplus ")
(define-key ultex-greek-map "\C-z" "\\ominus ")
(define-key ultex-greek-map "4" "\\otimes ")
(define-key ultex-greek-map "\C-x" "\\oslash ")
(define-key ultex-greek-map "5" "\\odot ")
(define-key ultex-greek-map "~" "\\bigcirc ")
(define-key ultex-greek-map "\C-@" "\\setminus ")
(define-key ultex-greek-map "\C-@" "\\smallsetminus ")
(define-key ultex-greek-map "<" "\\leq ")
(define-key ultex-greek-map ">" "\\geq ")
(define-key ultex-greek-map "/" "\\not ")
(define-key ultex-greek-map "{" "\\subset ")
(define-key ultex-greek-map "[" "\\subseteq ")
(define-key ultex-greek-map "}" "\\supset ")
(define-key ultex-greek-map "]" "\\supseteq ")
(define-key ultex-greek-map "'" "\\in ")
(define-key ultex-greek-map "\"" "\\ni ")
(define-key ultex-greek-map "\C-w" "\\vdash ")
(define-key ultex-greek-map "\C-c" "\\equiv ")
(define-key ultex-greek-map "\C-v" "\\sim ")
(define-key ultex-greek-map "\C-b" "\\simeq ")
(define-key ultex-greek-map "\C-n" "\\approx ")
(define-key ultex-greek-map "\C-m" "\\cong ")
(define-key ultex-greek-map "\C-u" "\\perp ")
(define-key ultex-greek-map "\C-t" "\\rightarrow ")
(define-key ultex-greek-map "\C-y" "\\Rightarrow ")
(define-key ultex-greek-map "\C-g" "\\mapsto ")
(define-key ultex-greek-map "\C-h" "\\hookrightarrow ")
(define-key ultex-greek-map "," "\\sum ")
(define-key ultex-greek-map "." "\\prod ")
(define-key ultex-greek-map "@" "\\coprod ")
(define-key ultex-greek-map ";" "\\int ")
(define-key ultex-greek-map "\C-o" "\\oint ")
(define-key ultex-greek-map "(" "\\bigcap ")
(define-key ultex-greek-map ")" "\\bigcup ")
(define-key ultex-greek-map "*" "\\bigsqcup ")
(define-key ultex-greek-map "^" "\\bigwedge ")
(define-key ultex-greek-map "&" "\\bigvee ")
(define-key ultex-greek-map "%" "\\bigodot ")
(define-key ultex-greek-map "#" "\\bigoplus ")
(define-key ultex-greek-map "$" "\\bigotimes ")
(define-key ultex-greek-map "_" "\\biguplus ")
(define-key ultex-greek-map ":" "\\colon ")
(define-key ultex-greek-map "\M-d" "\\nabla ")
(define-key ultex-greek-map "\M-y" "\\Leftrightarrow ")

;;; greek.el ends here