You cannot select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
typesetting/quad/main-typed-sample.rkt

11 lines
478 B
Racket

10 years ago
#lang typed/racket/base
(require "main-typed.rkt" "logger-typed.rkt" "world-typed.rkt" "samples-typed.rkt")
10 years ago
(require "render.rkt" racket/class profile)
(activate-logger quad-logger)
(parameterize ([world:quality-default world:draft-quality]
[world:paper-width-default 600.0]
[world:paper-height-default 700.0])
(define sample (ti5))
(define to (begin (time (typeset sample))))
10 years ago
#; (time (send (new pdf-renderer%) render-to-file to "foo.pdf")))