Add kleisli/1 and test