   "Lift a value from the inner monad of a monad transformer into a value
   of the monad transformer."
   ([mv]
-     (if (not (nil? *forced-context*))
+     (if-not (nil? *forced-context*)
        (p/lift *forced-context* mv)
        (p/lift *context* mv)))
   ([m mv]

                  (bound? #'*forced-context*))
       (throw (IllegalArgumentException.
               "You are using return/pure function without context.")))
     (if (not (nil? *forced-context*))
       (p/pure *forced-context* v)
       (p/pure *context* v)))
  ([app v]

                  (bound? #'*forced-context*))
       (throw (IllegalArgumentException.
               "You are using return/pure function without context.")))
     (if-not (nil? *forced-context*)
       (p/mreturn *forced-context* v)
       (p/mreturn *context* v)))
  ([m v]
