simp at *
case S_axiom.plus.plus.a
a b : String
nab : ¬a = b
n : ℕ
a✝³ : NoVars O
a✝² a✝¹ : NoVars (fromNat n)
a✝ : NoVars O
e :
  Sinf_const.eval (Sinf_const.coerce (O +ₛ fromNat n) (NoVars.plus a✝³ a✝²)) =
    Sinf_const.eval (Sinf_const.coerce (fromNat n +ₛ O) (NoVars.plus a✝¹ a✝))
⊢ Sinf_const.eval (Sinf_const.coerce (O +ₛ fromNat n↗) (NoVars.plus NoVars.O (NoVars.S a✝¹))) =
    Sinf_const.eval (Sinf_const.coerce (fromNat n↗ +ₛ O) (NoVars.plus (NoVars.S a✝¹) NoVars.O))
no goals