Как совместить вариант с Клейсли

Question

Учитывая метод

def f[A, B, C](a: A) : Kleisli[Future, B, C] = ???

Мне нужен комбинатор, работающий с Option[A]

Моя первая попытка была:

def g[A, B, C](a: Option[A], default: => C) = a match {
  case Some(a) => save(a)
  case None => Kleisli[Future, B, C] { _ => Future.successful(default) }
}

Но после прочтения, как объединить последовательность Клейсли, я придумал лучшую версию:

def g[A, B, C](a: Option[A], default: => C) : Kleisli[Future, B, C] = 
  a.traverseU(f[A, B, C]).map(_.getOrElse(default))

Любая идея, чтобы улучшить?

Answer 1

Вот реализация идеи, предложенной в комментарии @TravisBrown.

def g[A, B, C](a: Option[A], default: => C) : Kleisli[Future, B, C] =
  a.fold(Future(default).liftKleisli[B])(f)

Читаемость может быть лучше.