Re: [racket] Slideshow: change baseline

2013-05-22 Thread Laurent
On Wed, May 22, 2013 at 3:47 PM, Matthew Flatt wrote: > (define (frac a b) > (lift-above-baseline >(vc-append > a > (hline (max (pict-width a) (pict-width b)) 20) > b) >(- (pict-descent b) (pict-height b > > (slide (hbl-append (t "x=") (frac (t "1234") (t "5678" I

Re: [racket] Slideshow: change baseline

2013-05-22 Thread Matthew Flatt
At Wed, 22 May 2013 15:32:17 +0200, Laurent wrote: > Is it possible in slideshow to change the baseline of a pict? > > I have the following code to draw a fraction: > > ;; Fraction > ;; pict? pict? -> pict? > (define (frac a b) > (vc-append >a >(hline (max (pict-width a) (pict-width b))

[racket] Slideshow: change baseline

2013-05-22 Thread Laurent
Hi, Is it possible in slideshow to change the baseline of a pict? I have the following code to draw a fraction: ;; Fraction ;; pict? pict? -> pict? (define (frac a b) (vc-append a (hline (max (pict-width a) (pict-width b)) 20) b)) and I want to do some thing like: (hbl-append (t "x="