alexgian

#lang racket

(require
  srfi/1
  math
  racket/struct
  ;; syntax stuff
  (for-syntax
   syntax/parse
   syntax/parse/lib/function-header))

alexgian

#lang scheme/base

;;; ============================================================================
;;; Port of the "Simply Scheme" book code to allow use under Racket
;;; ============================================================================
;;; It allows re-defining of module functions, which was the main obstacle
;;; to its operation previously.
;;; The first part is an adaptation of the necessary changes to run on Racket
;;; by importing aliased existing module functions using "require" and "only-in"
;;; The second part is the (slightly adapted) code from