Theorem: BVExpr.bitblast.blastRotateRight_eq_eval_getLsb (LeanSAT/Reflect/BVExpr/BitBlast/Lemmas/RotateRight.lean)

State before:
α : Type
inst✝² : BEq α
inst✝¹ : Hashable α
inst✝ : DecidableEq α
w : Nat
aig : AIG α
target : aig.ShiftTarget w
assign : α → Bool
idx : Nat
hidx : idx < w
hidx2 : idx < w - target.distance % w
⊢ target.distance % w + idx < w
Tactic:
omega
State after:
no goals

State before:
α : Type
inst✝² : BEq α
inst✝¹ : Hashable α
inst✝ : DecidableEq α
w : Nat
aig : AIG α
target : aig.ShiftTarget w
assign : α → Bool
idx : Nat
hidx : idx < w
hidx2 : ¬idx < w - target.distance % w
⊢ idx - (w - target.distance % w) < w
Tactic:
omega
State after:
no goals

State before:
α : Type
inst✝² : BEq α
inst✝¹ : Hashable α
inst✝ : DecidableEq α
w : Nat
aig : AIG α
target : aig.ShiftTarget w
assign : α → Bool
⊢ ∀ (idx : Nat) (hidx : idx < w),
    ⟦{ aig := (blastRotateRight aig target).aig, ref := (blastRotateRight aig target).stream.getRef idx hidx },
        assign⟧ =
      if hidx2 : idx < w - target.distance % w then
        ⟦{ aig := aig, ref := target.stream.getRef (target.distance % w + idx) ⋯ }, assign⟧
      else ⟦{ aig := aig, ref := target.stream.getRef (idx - (w - target.distance % w)) ⋯ }, assign⟧
Tactic:
intros
State after:
α : Type
inst✝² : BEq α
inst✝¹ : Hashable α
inst✝ : DecidableEq α
w : Nat
aig : AIG α
target : aig.ShiftTarget w
assign : α → Bool
idx✝ : Nat
hidx✝ : idx✝ < w
⊢ ⟦{ aig := (blastRotateRight aig target).aig, ref := (blastRotateRight aig target).stream.getRef idx✝ hidx✝ },
      assign⟧ =
    if hidx2 : idx✝ < w - target.distance % w then
      ⟦{ aig := aig, ref := target.stream.getRef (target.distance % w + idx✝) ⋯ }, assign⟧
    else ⟦{ aig := aig, ref := target.stream.getRef (idx✝ - (w - target.distance % w)) ⋯ }, assign⟧

State before:
α : Type
inst✝² : BEq α
inst✝¹ : Hashable α
inst✝ : DecidableEq α
w : Nat
aig : AIG α
target : aig.ShiftTarget w
assign : α → Bool
idx✝ : Nat
hidx✝ : idx✝ < w
⊢ ⟦{ aig := (blastRotateRight aig target).aig, ref := (blastRotateRight aig target).stream.getRef idx✝ hidx✝ },
      assign⟧ =
    if hidx2 : idx✝ < w - target.distance % w then
      ⟦{ aig := aig, ref := target.stream.getRef (target.distance % w + idx✝) ⋯ }, assign⟧
    else ⟦{ aig := aig, ref := target.stream.getRef (idx✝ - (w - target.distance % w)) ⋯ }, assign⟧
Tactic:
unfold blastRotateRight
State after:
α : Type
inst✝² : BEq α
inst✝¹ : Hashable α
inst✝ : DecidableEq α
w : Nat
aig : AIG α
target : aig.ShiftTarget w
assign : α → Bool
idx✝ : Nat
hidx✝ : idx✝ < w
⊢ ⟦{
        aig :=
          (match target with
            | { stream := input, distance := distance } =>
              { aig := aig, stream := blastRotateRight.go input distance 0 ⋯ RefStream.empty }).aig,
        ref :=
          (match target with
                | { stream := input, distance := distance } =>
                  { aig := aig, stream := blastRotateRight.go input distance 0 ⋯ RefStream.empty }).stream.getRef
            idx✝ hidx✝ },
      assign⟧ =
    if hidx2 : idx✝ < w - target.distance % w then
      ⟦{ aig := aig, ref := target.stream.getRef (target.distance % w + idx✝) ⋯ }, assign⟧
    else ⟦{ aig := aig, ref := target.stream.getRef (idx✝ - (w - target.distance % w)) ⋯ }, assign⟧

State before:
α : Type
inst✝² : BEq α
inst✝¹ : Hashable α
inst✝ : DecidableEq α
w : Nat
aig : AIG α
target : aig.ShiftTarget w
assign : α → Bool
idx✝ : Nat
hidx✝ : idx✝ < w
⊢ ⟦{
        aig :=
          (match target with
            | { stream := input, distance := distance } =>
              { aig := aig, stream := blastRotateRight.go input distance 0 ⋯ RefStream.empty }).aig,
        ref :=
          (match target with
                | { stream := input, distance := distance } =>
                  { aig := aig, stream := blastRotateRight.go input distance 0 ⋯ RefStream.empty }).stream.getRef
            idx✝ hidx✝ },
      assign⟧ =
    if hidx2 : idx✝ < w - target.distance % w then
      ⟦{ aig := aig, ref := target.stream.getRef (target.distance % w + idx✝) ⋯ }, assign⟧
    else ⟦{ aig := aig, ref := target.stream.getRef (idx✝ - (w - target.distance % w)) ⋯ }, assign⟧
Tactic:
dsimp
State after:
α : Type
inst✝² : BEq α
inst✝¹ : Hashable α
inst✝ : DecidableEq α
w : Nat
aig : AIG α
target : aig.ShiftTarget w
assign : α → Bool
idx✝ : Nat
hidx✝ : idx✝ < w
⊢ ⟦{ aig := aig, ref := (blastRotateRight.go target.stream target.distance 0 ⋯ RefStream.empty).getRef idx✝ hidx✝ },
      assign⟧ =
    if hidx2 : idx✝ < w - target.distance % w then
      ⟦{ aig := aig, ref := target.stream.getRef (target.distance % w + idx✝) ⋯ }, assign⟧
    else ⟦{ aig := aig, ref := target.stream.getRef (idx✝ - (w - target.distance % w)) ⋯ }, assign⟧

State before:
α : Type
inst✝² : BEq α
inst✝¹ : Hashable α
inst✝ : DecidableEq α
w : Nat
aig : AIG α
target : aig.ShiftTarget w
assign : α → Bool
idx✝ : Nat
hidx✝ : idx✝ < w
⊢ ⟦{ aig := aig, ref := (blastRotateRight.go target.stream target.distance 0 ⋯ RefStream.empty).getRef idx✝ hidx✝ },
      assign⟧ =
    if hidx2 : idx✝ < w - target.distance % w then
      ⟦{ aig := aig, ref := target.stream.getRef (target.distance % w + idx✝) ⋯ }, assign⟧
    else ⟦{ aig := aig, ref := target.stream.getRef (idx✝ - (w - target.distance % w)) ⋯ }, assign⟧
Tactic:
rw [blastRotateRight.go_getRef]
State after:
α : Type
inst✝² : BEq α
inst✝¹ : Hashable α
inst✝ : DecidableEq α
w : Nat
aig : AIG α
target : aig.ShiftTarget w
assign : α → Bool
idx✝ : Nat
hidx✝ : idx✝ < w
⊢ ⟦{ aig := aig,
        ref :=
          if hidx3 : idx✝ < w - target.distance % w then target.stream.getRef (target.distance % w + idx✝) ⋯
          else target.stream.getRef (idx✝ - (w - target.distance % w)) ⋯ },
      assign⟧ =
    if hidx2 : idx✝ < w - target.distance % w then
      ⟦{ aig := aig, ref := target.stream.getRef (target.distance % w + idx✝) ⋯ }, assign⟧
    else ⟦{ aig := aig, ref := target.stream.getRef (idx✝ - (w - target.distance % w)) ⋯ }, assign⟧

case a
α : Type
inst✝² : BEq α
inst✝¹ : Hashable α
inst✝ : DecidableEq α
w : Nat
aig : AIG α
target : aig.ShiftTarget w
assign : α → Bool
idx✝ : Nat
hidx✝ : idx✝ < w
⊢ 0 ≤ idx✝

State before:
α : Type
inst✝² : BEq α
inst✝¹ : Hashable α
inst✝ : DecidableEq α
w : Nat
aig : AIG α
target : aig.ShiftTarget w
assign : α → Bool
idx✝ : Nat
hidx✝ : idx✝ < w
⊢ ⟦{ aig := aig,
        ref :=
          if hidx3 : idx✝ < w - target.distance % w then target.stream.getRef (target.distance % w + idx✝) ⋯
          else target.stream.getRef (idx✝ - (w - target.distance % w)) ⋯ },
      assign⟧ =
    if hidx2 : idx✝ < w - target.distance % w then
      ⟦{ aig := aig, ref := target.stream.getRef (target.distance % w + idx✝) ⋯ }, assign⟧
    else ⟦{ aig := aig, ref := target.stream.getRef (idx✝ - (w - target.distance % w)) ⋯ }, assign⟧

case a
α : Type
inst✝² : BEq α
inst✝¹ : Hashable α
inst✝ : DecidableEq α
w : Nat
aig : AIG α
target : aig.ShiftTarget w
assign : α → Bool
idx✝ : Nat
hidx✝ : idx✝ < w
⊢ 0 ≤ idx✝
Tactic:
. split
  . rfl
  . rfl
State after:
case a
α : Type
inst✝² : BEq α
inst✝¹ : Hashable α
inst✝ : DecidableEq α
w : Nat
aig : AIG α
target : aig.ShiftTarget w
assign : α → Bool
idx✝ : Nat
hidx✝ : idx✝ < w
⊢ 0 ≤ idx✝

State before:
case a
α : Type
inst✝² : BEq α
inst✝¹ : Hashable α
inst✝ : DecidableEq α
w : Nat
aig : AIG α
target : aig.ShiftTarget w
assign : α → Bool
idx✝ : Nat
hidx✝ : idx✝ < w
⊢ 0 ≤ idx✝
Tactic:
. omega
State after:
no goals

State before:
α : Type
inst✝² : BEq α
inst✝¹ : Hashable α
inst✝ : DecidableEq α
w : Nat
aig : AIG α
target : aig.ShiftTarget w
assign : α → Bool
idx✝ : Nat
hidx✝ : idx✝ < w
⊢ ⟦{ aig := aig,
        ref :=
          if hidx3 : idx✝ < w - target.distance % w then target.stream.getRef (target.distance % w + idx✝) ⋯
          else target.stream.getRef (idx✝ - (w - target.distance % w)) ⋯ },
      assign⟧ =
    if hidx2 : idx✝ < w - target.distance % w then
      ⟦{ aig := aig, ref := target.stream.getRef (target.distance % w + idx✝) ⋯ }, assign⟧
    else ⟦{ aig := aig, ref := target.stream.getRef (idx✝ - (w - target.distance % w)) ⋯ }, assign⟧
Tactic:
split
State after:
case isTrue
α : Type
inst✝² : BEq α
inst✝¹ : Hashable α
inst✝ : DecidableEq α
w : Nat
aig : AIG α
target : aig.ShiftTarget w
assign : α → Bool
idx✝ : Nat
hidx✝ : idx✝ < w
h✝ : idx✝ < w - target.distance % w
⊢ ⟦{ aig := aig, ref := target.stream.getRef (target.distance % w + idx✝) ⋯ }, assign⟧ =
    ⟦{ aig := aig, ref := target.stream.getRef (target.distance % w + idx✝) ⋯ }, assign⟧

case isFalse
α : Type
inst✝² : BEq α
inst✝¹ : Hashable α
inst✝ : DecidableEq α
w : Nat
aig : AIG α
target : aig.ShiftTarget w
assign : α → Bool
idx✝ : Nat
hidx✝ : idx✝ < w
h✝ : ¬idx✝ < w - target.distance % w
⊢ ⟦{ aig := aig, ref := target.stream.getRef (idx✝ - (w - target.distance % w)) ⋯ }, assign⟧ =
    ⟦{ aig := aig, ref := target.stream.getRef (idx✝ - (w - target.distance % w)) ⋯ }, assign⟧

State before:
case isTrue
α : Type
inst✝² : BEq α
inst✝¹ : Hashable α
inst✝ : DecidableEq α
w : Nat
aig : AIG α
target : aig.ShiftTarget w
assign : α → Bool
idx✝ : Nat
hidx✝ : idx✝ < w
h✝ : idx✝ < w - target.distance % w
⊢ ⟦{ aig := aig, ref := target.stream.getRef (target.distance % w + idx✝) ⋯ }, assign⟧ =
    ⟦{ aig := aig, ref := target.stream.getRef (target.distance % w + idx✝) ⋯ }, assign⟧

case isFalse
α : Type
inst✝² : BEq α
inst✝¹ : Hashable α
inst✝ : DecidableEq α
w : Nat
aig : AIG α
target : aig.ShiftTarget w
assign : α → Bool
idx✝ : Nat
hidx✝ : idx✝ < w
h✝ : ¬idx✝ < w - target.distance % w
⊢ ⟦{ aig := aig, ref := target.stream.getRef (idx✝ - (w - target.distance % w)) ⋯ }, assign⟧ =
    ⟦{ aig := aig, ref := target.stream.getRef (idx✝ - (w - target.distance % w)) ⋯ }, assign⟧
Tactic:
. rfl
State after:
case isFalse
α : Type
inst✝² : BEq α
inst✝¹ : Hashable α
inst✝ : DecidableEq α
w : Nat
aig : AIG α
target : aig.ShiftTarget w
assign : α → Bool
idx✝ : Nat
hidx✝ : idx✝ < w
h✝ : ¬idx✝ < w - target.distance % w
⊢ ⟦{ aig := aig, ref := target.stream.getRef (idx✝ - (w - target.distance % w)) ⋯ }, assign⟧ =
    ⟦{ aig := aig, ref := target.stream.getRef (idx✝ - (w - target.distance % w)) ⋯ }, assign⟧

State before:
case isFalse
α : Type
inst✝² : BEq α
inst✝¹ : Hashable α
inst✝ : DecidableEq α
w : Nat
aig : AIG α
target : aig.ShiftTarget w
assign : α → Bool
idx✝ : Nat
hidx✝ : idx✝ < w
h✝ : ¬idx✝ < w - target.distance % w
⊢ ⟦{ aig := aig, ref := target.stream.getRef (idx✝ - (w - target.distance % w)) ⋯ }, assign⟧ =
    ⟦{ aig := aig, ref := target.stream.getRef (idx✝ - (w - target.distance % w)) ⋯ }, assign⟧
Tactic:
. rfl
State after:
no goals

State before:
case isTrue
α : Type
inst✝² : BEq α
inst✝¹ : Hashable α
inst✝ : DecidableEq α
w : Nat
aig : AIG α
target : aig.ShiftTarget w
assign : α → Bool
idx✝ : Nat
hidx✝ : idx✝ < w
h✝ : idx✝ < w - target.distance % w
⊢ ⟦{ aig := aig, ref := target.stream.getRef (target.distance % w + idx✝) ⋯ }, assign⟧ =
    ⟦{ aig := aig, ref := target.stream.getRef (target.distance % w + idx✝) ⋯ }, assign⟧
Tactic:
rfl
State after:
no goals

State before:
case isFalse
α : Type
inst✝² : BEq α
inst✝¹ : Hashable α
inst✝ : DecidableEq α
w : Nat
aig : AIG α
target : aig.ShiftTarget w
assign : α → Bool
idx✝ : Nat
hidx✝ : idx✝ < w
h✝ : ¬idx✝ < w - target.distance % w
⊢ ⟦{ aig := aig, ref := target.stream.getRef (idx✝ - (w - target.distance % w)) ⋯ }, assign⟧ =
    ⟦{ aig := aig, ref := target.stream.getRef (idx✝ - (w - target.distance % w)) ⋯ }, assign⟧
Tactic:
rfl
State after:
no goals

State before:
case a
α : Type
inst✝² : BEq α
inst✝¹ : Hashable α
inst✝ : DecidableEq α
w : Nat
aig : AIG α
target : aig.ShiftTarget w
assign : α → Bool
idx✝ : Nat
hidx✝ : idx✝ < w
⊢ 0 ≤ idx✝
Tactic:
omega
State after:
no goals