Potential partial fixes for issue #1

This commit is contained in:
Christoph M. Wintersteiger 2016-07-25 19:17:45 +01:00
Родитель f30fabdb42
Коммит 3a6520f7da
3 изменённых файлов: 6 добавлений и 11 удалений

Просмотреть файл

@ -225,7 +225,7 @@ let tbndsEvaluateAtLeast1U (s:State) (tRel:Ref<TheoryRelation>) =
if holds <> Undefined then
let (expl, l) = tbndsGetImplication s tRel holds
s.Push (Imp (ref expl, l))
assert(not s.IsConflicted || s.isInTempMode)
// assert(not s.IsConflicted || s.isInTempMode)
else
tbndsGetImpliedBounds s tRel bVal

Просмотреть файл

@ -354,7 +354,6 @@ let tEvaluate1U (s:State) (tRel:Ref<TheoryRelation>) =
if holds <> Undefined then
let (expl, l) = tGetImplication s tRel holds
s.Push (Imp (ref expl, l))
assert(not s.IsConflicted)
| Z3_decl_kind.Z3_OP_ULEQ ->
let bVal = (!pVal).getValueB boolVar

Просмотреть файл

@ -462,18 +462,14 @@ type Trail (sz:int) =
else
// Negative PAPredicate
if not (value.isConcreteValue) then
let oldValue = (!bvVal).getValue v
let oldExpl = (!bvVal).getExplanation v
let negPABool = Negate rel.getBoolVar
let intersection = BitVector.Intersect oldValue value
let intersection = BitVector.Intersect oldValue value
if intersection.isInvalid then
assert (oldExpl <> Negate negPABool)
let cls = collectLiterals([ negPABool;
Negate oldExpl;
])
assert (oldExpl <> Negate l)
let cls = collectLiterals([ Negate l; Negate oldExpl; ])
cnflct <- Some (ref (newClauseFromList cls))
elif USE_BOUNDS then