nat.le_to_le_to_eq
∀ n m, n ≤ m ⇒ m ≤ n ⇒ n = m
Theorem le_to_le_to_eq : forall (n:nat), forall (m:nat), (le n m) -> (le m n) -> logic.eq (nat) n m.
theorem le_to_le_to_eq : \forall (n:nat). \forall (m:nat). ((le) n m) -> ((le) m n) -> (eq) (nat) n m.
theorem le_to_le_to_eq : forall (n:nat.nat) , forall (m:nat.nat) , ((((nat.le_) ) (n)) (m)) -> ((((nat.le_) ) (m)) (n)) -> (((logic.eq_) (nat.nat)) (n)) (m).
le_to_le_to_eq : LEMMA (FORALL(n:nat_sttfa.sttfa_nat):(FORALL(m:nat_sttfa.sttfa_nat):(nat_sttfa.le(n)(m) => (nat_sttfa.le(m)(n) => logic_sttfa_th.eq[nat_sttfa.sttfa_nat](n)(m)))))
Printing for OpenTheory is not working at the moment.