git

1
(define book-class%
2
  (class* () object% RIGHT
3
    (field (pages 5))
4
    (field (ChangeMe 5))
5
    (define/public (letters)
6
      (* pages 500))
7
    (super-new)))
8