simp [IsSegment, isSegmentDef, ext_defined.df.iff, fbit_defined.df.iff, lt_succ_iff_le, numeral_eq_natCast]
M : Type u_1
inst✝⁵ : Zero M
inst✝⁴ : One M
inst✝³ : Add M
inst✝² : Mul M
inst✝¹ : LT M
inst✝ : M ⊧ₘ* 𝐈𝚫₀ + 𝛀₁
v : Fin 5 → M
⊢ (fun v => IsSegment (v 0) (v 1) (v 2) (v 3) (v 4)) v ↔ (Semiformula.Evalbm M v) (HSemiformula.val isSegmentDef)
M : Type u_1
inst✝⁵ : Zero M
inst✝⁴ : One M
inst✝³ : Add M
inst✝² : Mul M
inst✝¹ : LT M
inst✝ : M ⊧ₘ* 𝐈𝚫₀ + 𝛀₁
v : Fin 5 → M
⊢ (∀ i < v 3, v 4{v 0}[i + 1] = v 4{v 0}[i] + fbit (v 1) (v 2 + i)) ↔
    ∀ x < v 3,
      ∃ x_1 ≤ v 4,
        x_1 = v 4{v 0}[x + 1] ∧ ∃ x_2 ≤ v 4, x_2 = v 4{v 0}[x] ∧ ∃ x_3 < 2, x_3 = fbit (v 1) (v 2 + x) ∧ x_1 = x_2 + x_3