modified:   Monads/Kleisli.agda