;;; 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