fun <A> wrap(f: (R) -> A): (R) -> Pair<Out<Nothing, A>, R>
Wrap a business function in a given effect
Gives back "wrapped function"