∀ n, n = ((n+1)-1)

Theorem pred_Sn : forall (n:nat), logic.eq (nat) n (pred (S n)).

theorem pred_Sn : \forall (n:nat). (eq) (nat) n ((pred) ((S) n)).

theorem pred_Sn : forall (n:nat.nat) , (((logic.eq_) (nat.nat)) (n)) (((nat.pred_) ) (((nat.S) ) (n))).

pred_Sn : LEMMA (FORALL(n:nat_sttfa.sttfa_nat):logic_sttfa_th.eq[nat_sttfa.sttfa_nat](n)(nat_sttfa.pred(nat_sttfa.sttfa_S(n))))

Printing for OpenTheory is not working at the moment.