Scheme saved on Monday November 26, 2001 at 10:17:02 PM
  Release 7.6.0
  Microcode 14.5
  Runtime 14.192
  Win32 1.5
  SF 4.38
  Liar (Intel i386) 4.113
  Edwin 3.110

;You are in an interaction window of the Edwin editor.
;Type C-h for help.  C-h m will describe some commands.
;Package: (user)
(define nil '())
(define (filter pred mylist)
  (map (lambda (x)
	 (if (pred x) x
	    nil )) mylist))
;Value: filter



(define (apply-all proc-list arg)
  (map (lambda (x)
	 (x arg)) proc-list))
(apply-all (list sqrt square 1+ -1+) 4)
;Value 18: (2 16 5 3)