more Scribble unicode->latex hacks

svn: r16026

original commit: 7273020b16783ad2c75bc7af585b7ca74a6549ac
This commit is contained in:
Matthew Flatt 2009-09-16 21:34:18 +00:00
parent db76d02a70
commit 1ddb60fad0

View File

@ -604,6 +604,8 @@
[else [else
(if ((char->integer c) . > . 127) (if ((char->integer c) . > . 127)
(case c (case c
[(#\uB0) "$^{\\circ}$"] ; degree
[(#\uB2) "$^2$"]
[(#\u039A) "K"] ; kappa [(#\u039A) "K"] ; kappa
[(#\u0391) "A"] ; alpha [(#\u0391) "A"] ; alpha
[(#\u039F) "O"] ; omicron [(#\u039F) "O"] ; omicron