如何摆脱AND和OR的布尔表达式中的大括号

时间:2016-08-11 08:59:40

标签: algorithm scala abstract-syntax-tree boolean-logic algebraic-data-types

假设我有一些简单的布尔表达式

(A || B) && (C || D)

目标是,摆脱此表达式中的大括号,例如

(A || B) && (C || D) => A && C || A && D || B && C || B && D

我们知道&&从左到右评估||之前。 为此,我创建了以下代数数据类型:

sealed trait Predicate
case class Or(left: Predicate, right: Predicate) extends Predicate
case class And(left: Predicate, right: Predicate) extends Predicate
case object True extends Predicate
case object False extends Predicate

假设我们已经有了某种字符串解析器,它将字符串转换为Predicate,它构建了某种抽象语法树。 例如,对于表达式(true || true) && (true || true),我们将使用以下树:And(Or(True, True), Or(True, True))。在这里我们考虑到括号。我们需要Or(Or(And(A, C), And(A, D)), Or(And(B, C), And(B,D)))。 我坚持使用以下解决方案:

def extractOr(pred: Predicate): Predicate = pred match {
    case And(Or(l, r), Or(ll, rr)) => Or(Or(And(l, ll), And(l, rr)), Or(And(r, ll), And(r, rr)))
    case And(Or(l, r), p) => Or(And(l, p), And(r, p))
    case And(p, Or(l, r)) => Or(And(p, l), And(p, r))
    case p => p
}

def popOrPredicateUp(pred: Predicate): Predicate = pred match {
    case And(l, r) => extractOr(And(popOrPredicateUp(l), popOrPredicateUp(r)))
    case Or(l, r) => Or(popOrPredicateUp(l), popOrPredicateUp(r))
    case p => p
}

但它的作用不正确,例如:And(False, Or(And(Or(True, True), False), True))

UPD:正如@coredump指出的那样,我需要得到DNF(sum of products)

1 个答案:

答案 0 :(得分:0)

最后,在@coredump(他指出了正确的方向)和Haskell包hatt(特别是code)的帮助下。我找到了以下解决方案:

sealed trait Predicate
case class Or(left: Predicate, right: Predicate) extends Predicate
case class And(left: Predicate, right: Predicate) extends Predicate
case class Not(pred: Predicate) extends Predicate
case object True extends Predicate
case object False extends Predicate

object PredicateOps{

  def toNNF(pred: Predicate): Predicate = pred match {
    case a @ (True | False) => a
    case a @ Not( True | False) => a
    case Not(Not(p)) => p
    case And(l, r) => And(toNNF(l), toNNF(r))
    case Not(And(l, r)) => toNNF( Or(Not(l), Not(r)))
    case Or(l, r) => Or(toNNF(l), toNNF(r))
    case Not(Or(l,r)) => toNNF( And(Not(l), Not(r)))
  }

  def dist(predL: Predicate, predR: Predicate): Predicate = (predL, predR) match {
    case (Or(l, r), p) => Or(dist(l, p), dist(r, p))
    case (p, Or(l, r)) => Or(dist(p, l), dist(p, r))
    case (l, r) => And(l, r)
  }

  def toDNF(pred: Predicate): Predicate = pred match {
    case And(l, r) => dist(toDNF(l), toDNF(r))
    case Or(l, r) =>  Or(toDNF(l), toDNF(r))
    case p => p
  }

}

以下是它的工作原理:

val expr = And(False, Or(And(Or(True, True), False), True))
val dnf = (PredicateOps.toNNF _ andThen PredicateOps.toDNF _).apply(expr)
println(dnf)

输出Or(Or(And(False,And(True,False)),And(False,And(True,False))),And(False,True)) ,这是正确的DNF。