JanetDocsPlaygroundI'm feeling luckyGitHub sign in
(defn square [x] (* x x)) (defn square-then-dec [x] ((comp dec square) x)) (defn dec-then-square [x] ((comp square dec) x)) (square-then-dec 3) # => 8 (dec-then-square 3) # => 4