Documentation

Std.Tactic.BVDecide.Bitblast.BVExpr.Circuit.Lemmas.Operations.ShiftRight

This module contains the verification of the bitblasters for BitVec.shiftRight from Impl.Operations.ShiftRight.

@[irreducible]
theorem Std.Tactic.BVDecide.BVExpr.bitblast.blastShiftRightConst.go_get_aux {α : Type} [Hashable α] [DecidableEq α] {w : Nat} (aig : Std.Sat.AIG α) (distance : Nat) (input : aig.RefVec w) (curr : Nat) (hcurr : curr w) (s : aig.RefVec curr) (idx : Nat) (hidx : idx < curr) (hfoo : aig.decls.size (Std.Tactic.BVDecide.BVExpr.bitblast.blastShiftRightConst.go aig input distance curr hcurr s).aig.decls.size) :
(Std.Tactic.BVDecide.BVExpr.bitblast.blastShiftRightConst.go aig input distance curr hcurr s).vec.get idx = (s.get idx hidx).cast hfoo
theorem Std.Tactic.BVDecide.BVExpr.bitblast.blastShiftRightConst.go_get {α : Type} [Hashable α] [DecidableEq α] {w : Nat} (aig : Std.Sat.AIG α) (distance : Nat) (input : aig.RefVec w) (curr : Nat) (hcurr : curr w) (s : aig.RefVec curr) (idx : Nat) (hidx : idx < curr) :
(Std.Tactic.BVDecide.BVExpr.bitblast.blastShiftRightConst.go aig input distance curr hcurr s).vec.get idx = (s.get idx hidx).cast
theorem Std.Tactic.BVDecide.BVExpr.bitblast.blastShiftRightConst.go_denote_mem_prefix {α : Type} [Hashable α] [DecidableEq α] {w : Nat} {assign : αBool} (aig : Std.Sat.AIG α) (distance : Nat) (input : aig.RefVec w) (curr : Nat) (hcurr : curr w) (s : aig.RefVec curr) (start : Nat) (hstart : start < aig.decls.size) :
assign, { aig := (Std.Tactic.BVDecide.BVExpr.bitblast.blastShiftRightConst.go aig input distance curr hcurr s).aig, ref := { gate := start, hgate := } } = assign, { aig := aig, ref := { gate := start, hgate := hstart } }
@[irreducible]
theorem Std.Tactic.BVDecide.BVExpr.bitblast.blastShiftRightConst.go_denote_eq {α : Type} [Hashable α] [DecidableEq α] {w : Nat} (aig : Std.Sat.AIG α) (distance : Nat) (input : aig.RefVec w) (assign : αBool) (curr : Nat) (hcurr : curr w) (s : aig.RefVec curr) (idx : Nat) (hidx1 : idx < w) :
curr idxassign, { aig := (Std.Tactic.BVDecide.BVExpr.bitblast.blastShiftRightConst.go aig input distance curr hcurr s).aig, ref := (Std.Tactic.BVDecide.BVExpr.bitblast.blastShiftRightConst.go aig input distance curr hcurr s).vec.get idx hidx1 } = if hidx : distance + idx < w then assign, { aig := aig, ref := input.get (distance + idx) } else false
@[simp]
theorem Std.Tactic.BVDecide.BVExpr.bitblast.denote_blastShiftRightConst {α : Type} [Hashable α] [DecidableEq α] {w : Nat} (aig : Std.Sat.AIG α) (target : aig.ShiftTarget w) (assign : αBool) (idx : Nat) (hidx : idx < w) :
assign, { aig := (Std.Tactic.BVDecide.BVExpr.bitblast.blastShiftRightConst aig target).aig, ref := (Std.Tactic.BVDecide.BVExpr.bitblast.blastShiftRightConst aig target).vec.get idx hidx } = if hidx : target.distance + idx < w then assign, { aig := aig, ref := target.vec.get (target.distance + idx) } else false
@[irreducible]
theorem Std.Tactic.BVDecide.BVExpr.bitblast.blastArithShiftRightConst.go_get {α : Type} [Hashable α] [DecidableEq α] {w : Nat} (aig : Std.Sat.AIG α) (distance : Nat) (input : aig.RefVec w) (curr : Nat) (hcurr : curr w) (s : aig.RefVec curr) (idx : Nat) (hidx : idx < curr) :
(Std.Tactic.BVDecide.BVExpr.bitblast.blastArithShiftRightConst.go input distance curr hcurr s).get idx = s.get idx hidx
@[irreducible]
theorem Std.Tactic.BVDecide.BVExpr.bitblast.blastArithShiftRightConst.go_denote_eq {α : Type} [Hashable α] [DecidableEq α] {w : Nat} (aig : Std.Sat.AIG α) (distance : Nat) (input : aig.RefVec w) (assign : αBool) (curr : Nat) (hcurr : curr w) (s : aig.RefVec curr) (idx : Nat) (hidx1 : idx < w) :
curr idxassign, { aig := aig, ref := (Std.Tactic.BVDecide.BVExpr.bitblast.blastArithShiftRightConst.go input distance curr hcurr s).get idx hidx1 } = if hidx : distance + idx < w then assign, { aig := aig, ref := input.get (distance + idx) } else assign, { aig := aig, ref := input.get (w - 1) }
@[simp]
theorem Std.Tactic.BVDecide.BVExpr.bitblast.denote_blastArithShiftRightConst {α : Type} [Hashable α] [DecidableEq α] {w : Nat} (aig : Std.Sat.AIG α) (target : aig.ShiftTarget w) (assign : αBool) (idx : Nat) (hidx : idx < w) :
assign, { aig := (Std.Tactic.BVDecide.BVExpr.bitblast.blastArithShiftRightConst aig target).aig, ref := (Std.Tactic.BVDecide.BVExpr.bitblast.blastArithShiftRightConst aig target).vec.get idx hidx } = if hidx : target.distance + idx < w then assign, { aig := aig, ref := target.vec.get (target.distance + idx) } else assign, { aig := aig, ref := target.vec.get (w - 1) }
theorem Std.Tactic.BVDecide.BVExpr.bitblast.blastShiftRight.twoPowShift_eq {α : Type} [Hashable α] [DecidableEq α] {w : Nat} (aig : Std.Sat.AIG α) (target : Std.Tactic.BVDecide.BVExpr.bitblast.blastShiftRight.TwoPowShiftTarget aig w) (lhs : BitVec w) (rhs : BitVec target.n) (assign : αBool) (hleft : ∀ (idx : Nat) (hidx : idx < w), assign, { aig := aig, ref := target.lhs.get idx hidx } = lhs.getLsbD idx) (hright : ∀ (idx : Nat) (hidx : idx < target.n), assign, { aig := aig, ref := target.rhs.get idx hidx } = rhs.getLsbD idx) (idx : Nat) (hidx : idx < w) :
assign, { aig := (Std.Tactic.BVDecide.BVExpr.bitblast.blastShiftRight.twoPowShift aig target).aig, ref := (Std.Tactic.BVDecide.BVExpr.bitblast.blastShiftRight.twoPowShift aig target).vec.get idx hidx } = (lhs >>> (rhs &&& BitVec.twoPow target.n target.pow)).getLsbD idx
@[irreducible]
theorem Std.Tactic.BVDecide.BVExpr.bitblast.blastShiftRight.go_denote_eq {α : Type} [Hashable α] [DecidableEq α] {n : Nat} {w : Nat} (aig : Std.Sat.AIG α) (distance : aig.RefVec n) (curr : Nat) (hcurr : curr n - 1) (acc : aig.RefVec w) (lhs : BitVec w) (rhs : BitVec n) (assign : αBool) (hacc : ∀ (idx : Nat) (hidx : idx < w), assign, { aig := aig, ref := acc.get idx hidx } = (lhs.ushiftRightRec rhs curr).getLsbD idx) (hright : ∀ (idx : Nat) (hidx : idx < n), assign, { aig := aig, ref := distance.get idx hidx } = rhs.getLsbD idx) (idx : Nat) (hidx : idx < w) :
assign, { aig := (Std.Tactic.BVDecide.BVExpr.bitblast.blastShiftRight.go aig distance curr acc).aig, ref := (Std.Tactic.BVDecide.BVExpr.bitblast.blastShiftRight.go aig distance curr acc).vec.get idx hidx } = (lhs.ushiftRightRec rhs (n - 1)).getLsbD idx
theorem Std.Tactic.BVDecide.BVExpr.bitblast.denote_blastShiftRight {α : Type} [Hashable α] [DecidableEq α] {w0 : Nat} (aig : Std.Sat.AIG α) (target : aig.ArbitraryShiftTarget w0) (lhs : BitVec w0) (rhs : BitVec target.n) (assign : αBool) (hleft : ∀ (idx : Nat) (hidx : idx < w0), assign, { aig := aig, ref := target.target.get idx hidx } = lhs.getLsbD idx) (hright : ∀ (idx : Nat) (hidx : idx < target.n), assign, { aig := aig, ref := target.distance.get idx hidx } = rhs.getLsbD idx) (idx : Nat) (hidx : idx < w0) :
assign, { aig := (Std.Tactic.BVDecide.BVExpr.bitblast.blastShiftRight aig target).aig, ref := (Std.Tactic.BVDecide.BVExpr.bitblast.blastShiftRight aig target).vec.get idx hidx } = (lhs >>> rhs).getLsbD idx