changed sub/superscript scale to 2/3, improved docs to clarify tex vs. mred

svn: r1067
This commit is contained in:
Matthew Flatt 2005-10-13 16:18:47 +00:00
parent ee081262e8
commit 71c85fc75e
2 changed files with 10 additions and 5 deletions

View File

@ -1,8 +1,9 @@
_texpict_ is a MzScheme/MrEd library for creating pictures using a _texpict_ is a MzScheme/MrEd library for creating pictures using a
MrEd dc<%> (including post-script-dc% for _PostScript_ output) or MrEd dc<%> (including post-script-dc% for _PostScript_ output) or
_LaTeX_ as the back-end. The library was originally designed for LaTeX _LaTeX_ as the back-end. The two back-ends are incompatible; picts
output, hence the name. must be created for one or the other. The library was originally
designed for LaTeX output, hence the name.
Pictures are created as `pict' structures. Some procedures in the Pictures are created as `pict' structures. Some procedures in the
texpict library create new simple picts (e.g., `hline'). Others build texpict library create new simple picts (e.g., `hline'). Others build
@ -109,6 +110,9 @@ The library is available in unit form via _texpictr.ss_, which
produces a unit with no imports. The _texpicts.ss_ library file produces a unit with no imports. The _texpicts.ss_ library file
defines the unit's signature. defines the unit's signature.
Pictures created with this library are incompatible with Slideshow
and MrEd-based output.
To create a LaTeX picture, assemble a pict and then To create a LaTeX picture, assemble a pict and then
call `pict->string'. This string can be `display'ed to obtain the call `pict->string'. This string can be `display'ed to obtain the
LaTeX code, which is usually of the form: LaTeX code, which is usually of the form:
@ -226,7 +230,8 @@ Basic Constructors:
> (vline w h) -> pict > (vline w h) -> pict
> (dash-vline w h seg-length) -> pict ; default seg-length is 5 > (dash-vline w h seg-length) -> pict ; default seg-length is 5
To draw other kinds of lines, use `picture' or `cons-picture' To draw other kinds of lines, use `dc' [MrEd only] or `picture' or
`cons-picture' [LaTeX].
> (frame pict) -> pict > (frame pict) -> pict
> (dash-frame pict seg-length) -> pict ; default seg-length is 5 > (dash-frame pict seg-length) -> pict ; default seg-length is 5
@ -453,7 +458,7 @@ Drawing Adjusters:
Apply a color to a picture. If the given picture has a colorized Apply a color to a picture. If the given picture has a colorized
sub-picture, the color of the sub-picture is not affected. sub-picture, the color of the sub-picture is not affected.
Be sure to use the LaTeX package `colordvi'. [LaTeX: use the LaTeX package "colordvi"]
> (colorize pict color%) -> pict > (colorize pict color%) -> pict

View File

@ -171,7 +171,7 @@
[sup? (memq* 'superscript orig-style)]) [sup? (memq* 'superscript orig-style)])
(let ([s-font (if (or sub? sup?) (let ([s-font (if (or sub? sup?)
(extend-font font (extend-font font
(floor (* 1/2 (send font get-point-size))) (floor (* 2/3 (send font get-point-size)))
(send font get-style) (send font get-style)
(send font get-weight)) (send font get-weight))
font)] font)]