;; Die ersten drei Zeilen dieser Datei wurden von DrRacket eingefügt. Sie enthalten Metadaten
;; über die Sprachebene dieser Datei in einer Form, die DrRacket verarbeiten kann.
#reader(lib "DMdA-vanilla-reader.ss" "deinprogramm")((modname mylist) (read-case-sensitive #f) (teachpacks ()) (deinprogramm-settings #(#f write repeating-decimal #f #t none explicit #f ())))
; Ein eigener Listenkonstruktor ohne define-record-procedures

(define mycons
  (lambda (x y)
    (lambda (m) (cond ((= m 0) x)
                      ((= m 1) y)))))

(define myfirst (lambda (xs) (xs 0)))

(define myrest (lambda (xs) (xs 1)))