;;;; Diese Datei wird in eine Scheme Shell geladen um 
;;;; von dort aus die einzelnen Beispiele aufrufen zu können

;;; Prozeßkontrolle
(define (example-1-copy from to)
  (run (cat ,@from)
       (> ,to)))