(module htdp-beginner-abbr scheme/base (require mzlib/etc mzlib/list mzlib/math syntax/docprovide test-engine/scheme-tests) ;; Implements the forms: (require "private/teach.ss" "private/contract-forms.ss" "private/teachprims.ss") ;; syntax: (provide (rename-out [beginner-define define] [beginner-define-struct define-struct] [beginner-lambda lambda] [beginner-app #%app] [beginner-top #%top] [beginner-cond cond] [beginner-else else] [beginner-if if] [beginner-and and] [beginner-or or] [beginner-require require] [beginner-dots ..] [beginner-dots ...] [beginner-dots ....] [beginner-dots .....] [beginner-dots ......] ;; [beginner-contract contract] ;; [beginner-define-data define-data] [intermediate-quote quote] [intermediate-quasiquote quasiquote] [intermediate-unquote unquote] [intermediate-unquote-splicing unquote-splicing] [beginner-module-begin #%module-begin]) check-expect check-within check-error check-member-of check-range #%datum #%top-interaction empty true false) ;; procedures: (provide-and-document procedures (all-from beginner: lang/htdp-beginner procedures)) )