racket-test.rkt 182 B

12345678
  1. #lang racket
  2. (for*/list ([a 0]
  3. [b 0])
  4. ([current-a (in-list (list 1 2 3))]
  5. [current-b (in-list (list 4 5 6))])
  6. (list current-a current-b))