subst en
c n : ℕ
H : SearchUpTo c n
n' : ℕ
en : n + 11 = n'
l : List ℕ
el : digits 10 n = l
H' : c = sumOfSquares l → c = 50 ∨ c = 73
⊢ SearchUpTo (c + 1) n'
c n : ℕ
H : SearchUpTo c n
l : List ℕ
el : digits 10 n = l
H' : c = sumOfSquares l → c = 50 ∨ c = 73
⊢ SearchUpTo (c + 1) (n + 11)