apply bexp_pow2 lt_len
M : Type u_1
inst✝⁵ : Zero M
inst✝⁴ : One M
inst✝³ : Add M
inst✝² : Mul M
inst✝¹ : LT M
inst✝ : M ⊧ₘ* 𝐈𝚫₀ + 𝛀₁
L i S₁ S₂ p : M
pp : Pow2 p
h : (i + 1) * ‖L‖ < ‖p‖
pos₂ : 0 < S₂
lt_len : i * ‖L‖ < ‖S₁ + S₂ * p‖
this : Exponential ((i + 1) * ‖L‖) (bexp (S₁ + S₂ * p) (i * ‖L‖) * L # 1)
⊢ Pow2 (bexp (S₁ + S₂ * p) (i * ‖L‖))
no goals