Welcome to DrScheme, version 4.2.1 [3m].
Language: Swindle; memory limit: 128 megabytes.
=======================================
  CMPU-145, Fall 2012
  Asmt. 1
  Solutions!
=======================================


------------------------
  (1) DISJOINT?
------------------------

(disjoint? () ()) ====> #t
(disjoint? () '(a b c)) ====> #t
(disjoint? '(a b c) '(d e f g h)) ====> #t
(disjoint? '(a b c d) '(d e b f c h)) ====> #f
(disjoint? '(a b c d e f g) '(1 2 3 4 g 5 6)) ====> #f

(alt-disjoint? () ()) ====> #t
(alt-disjoint? () '(a b c)) ====> #t
(alt-disjoint? '(a b c) '(d e f g h)) ====> #t
(alt-disjoint? '(a b c d) '(d e b f c h)) ====> #f
(alt-disjoint? '(a b c d e f g) '(1 2 3 4 g 5 6)) ====> #f

------------------------
  (2) POWER-SET
------------------------

(power-set ()) ====> (())
(power-set '(a)) ====> (() (a))
(power-set '(1 2)) ====> (() (2) (1) (1 2))
(power-set '(X Y Z)) ====> (() (Z) (Y) (Y Z) (X) (X Z) (X Y) (X Y Z))

(length (power-set '(1 2 3 4 5 6))) ====> 64
(length (power-set '(1 2 3 4 5 6 7 8 9 10))) ====> 1024
>