Guest User

Untitled

a guest
Sep 2nd, 2018
96
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. user>  (for [x (range)
  2.          :while (<= x 10)
  3.          y (range x)
  4.          z (range x)
  5.          :let [yz (* y z)]
  6.          :when (= x yz)]
  7.       [x y z])
  8. ([4 2 2] [6 2 3] [6 3 2] [8 2 4] [8 4 2] [9 3 3] [10 2 5] [10 5 2])
  9.  
  10. user>  (for [x (range)
  11.          y (range x)
  12.          :while (<= x 10)
  13.          z (range x)
  14.          :let [yz (* y z)]
  15.          :when (= x yz)]
  16.       [x y z])
  17. ; Evaluation aborted. (Won't terminate)
Add Comment
Please, Sign In to add comment