3 ms·
(sort-by (fn [u] (* (:age u) (:tuition u) (if (rhymes-with (:name u) 'Warvard) 1 (+ 0.9
by mnemonicsloth 14y ago
(sort-by
(fn [u]
(* (:age u)
(:tuition u)
(if (rhymes-with (:name u) 'Warvard)
1
(+ 0.9 (rand 0.1))))
univs)