;;; This file is part of the Scheme Untergrund Library.

;; This code, written by Taylor Campbell, is in the public domain.

;; If the #, is uncommented, the ' should be commented; and vice versa.

#,
(define-reader-constructor
  ;'
  pi (lambda () (atan 0 -1)))