Now we are able to generate a loom graph based on expressions like :

(xray (* 8 (+ 3 2) (/ 5 3)))

and

(xray (map (fn [n] (* 3 n)) (map inc '(1 2 3 4))))