multiple_assignment.zy 183 B

1234567891011
  1. (a b c = 1 2 3)
  2. (assert (== a 1))
  3. (assert (== b 2))
  4. (assert (== c 3))
  5. (defn f [x y] (+ x y))
  6. (r s t = (f 1 2) (f 3 4) (f 5 6))
  7. (assert (== r 3))
  8. (assert (== s 7))
  9. (assert (== t 11))