AntiAliasExample

From MHCGraphics

; Mead example file  -- antialiasing
;
; Jim Teresco
; Computer Science 110
; Mount Holyoke College
; March 3, 2008
;
; $Id: AntiAliasExample.scm 531 2008-03-04 04:37:46Z terescoj $
;
(require (lib "Defs.ss" "Mead"))

; our favorite simple scene - a red plaster sphere
(tell scene
      (add sphere redPlaster)
      )

; render an image with no antialiasing
(tell image
      (antiAlias 0))

(tell camera
      (shoot))

; render an image with the default level of antialiasing
(tell image
      (antiAlias 0.5))

(tell camera
      (shoot))

; render an image with full antialiasing
(tell image
      (antiAlias 1))

(tell camera
      (shoot))