Scalaz验证，验证内在价值

Question

我有一个Validation对象

val v = Validation[String, Option[Int]]

我需要进行第二次验证，以检查实际的Integer值是否等于100。 如果我做

val vv = v.map(_.map(intValue => if (intValue == 100) 
                               intValue.success[String] 
                           else 
                               "Bad value found".fail[Integer]))

我明白了：

Validation[String, Option[Validation[String, Int]]]

怎样才能以最简洁的方式将vv作为Validation [String，Option [Int]]

=========

从我自己找到可能的解决方案：

val validation: Validation[String, Option[Int]] = Some(100).success[String]

val validatedTwice: Validation[String, Option[Int]] = validation.fold(
  _ => validation,                             // if Failure then return it
  _.map(validateValue _) getOrElse validation  // validate Successful result
)

def validateValue(value: Int): Validation[String, Option[Int]] = {
  if (value == 100)
    Some(value).success[String]
  else
    "Bad value".fail[Option[Int]]
}

尽管它有效但看起来并不简洁优雅

==============

我自己的第二个解决方案，但也看起来过于复杂：

val validatedTwice2: Validation[String, Option[Int]] = validation.flatMap(
    _.map(validateValue _).map(_.map(Some(_))) getOrElse validation)

def validateValue(value: Int): Validation[String, Int] = {
    if (value == 100)
      value.success[String]
    else
      "Bad value".fail[Int]
}

Answer 1

首先，让我们设置一些类型的别名，因为反复输入这个别名会很快变旧。 当我们在这里时，我们会稍微整理你的验证逻辑。

type V[X] = Validation[String, X]
type O[X] = Option[X]
def checkInt(i: Int): V[Int] = Validation.fromEither(i != 100 either "Bad value found" or i)

val v: V[O[Int]] = _

这是我们开始的地方 - b1相当于你的vv情况

val b1: V[O[V[Int]]] = v.map(_.map(checkInt))

所以让我们按顺序选择将V [O [V [Int]]]翻转成V [V [O [Int]]]

val b2: V[V[O[Int]]] = v.map(_.map(checkInt)).map(_.sequence[V, Int])

或者，如果你感觉到lambda-y它可能是

sequence[({type l[x] = Validation[String, x]})#l, Int]

接下来我们讨论了嵌套验证 - 我们将引入Validation monad，因为我们确实想要这里的fastfail行为，尽管通常不是正确的做法。

implicit val monad = Validation.validationMonad[String]
val b3: V[O[Int]] = v.map(_.map(checkInt)).map(_.sequence[V, Int]).join

所以现在我们有了一个验证[String，Option [Int]]，所以我们就在那里，但这仍然非常混乱。 让我们用一些等式推理来整理它

根据第二个仿函数法，我们知道：

X.map(_.f).map(_.g) = X.map(_.f.g) =>
    val i1: V[O[Int]] = v.map(_.map(checkInt).sequence[V, Int]).join

并根据monad的定义：

X.map(f).join = X.flatMap(f) =>
    val i2: V[O[Int]] = v.flatMap(_.map(checkInt).sequence[V, Int])

然后我们应用遍历的自由定理：
（我在那张血腥的纸上挣扎得太厉害了，但看起来它有些沉入其中！）：

X.map(f).sequence = X.traverse(f andThen identity) = X.traverse(f) =>
    val i3: V[O[Int]] = v.flatMap(_.traverse[V, Int](checkInt))

所以现在我们正在寻找一些更文明的东西。 我想有一些技巧可以使用flatMap和遍历，但我已经没有灵感了。

Answer 2

您的解决方案过于复杂。 以下就足够了！

v flatMap (_.filter(_ == 100).toSuccess("Bad value found"))

所述toSuccess来自OptionW和转换的Option[A]成Validation[X, A]以提供用于在故障情况下，所述选项为空的情况下的值。 flatMap工作方式如下：

Validation[X, A] 
          => (A => Validation[X, B]) 
                                => (via flatMap) Validation[X, B]

也就是说， flatMap映射然后展平（ join scalaz-parlance）：

Validation[X, A]
          => (A => Validation[X, B]]
                            => (via map) Validation[X, Validation[X, B]]
                                                  =>  (via join) Validation[X, B]

Answer 3

使用flatMap ，如下所示：

v.flatMap(_.parseInt.fail.map(_.getMessage).validation)