          (cadd2 1 3)
          ;; => 4
 
-     With fixed arity:
+     With given arity:
 
          (def c+ (curry 3 +))
 


#?(:clj
   (defmacro lift-m
     "Lifts a function with the given fixed number of arguments to a
     monadic context.

         (def monad+ (lift-m 2 +))



#?(:clj
   (defmacro curry
     "Given either a fixed arity function or an arity and a function,
     return another which is curried.

     With inferred arity (function must have one fixed arity):

         (defn add2 [x y] (+ x y))
         (def cadd2 (curry add2))
