∀ m, (gcd O m) = m

Theorem gcd_O_l : forall (m:nat.nat), logic.eq (nat.nat) (gcd nat.O m) m.

theorem gcd_O_l : \forall (m:nat). (eq) (nat) ((gcd) (O) m) m.

theorem gcd_O_l : forall (m:nat.nat) , (((logic.eq_) (nat.nat)) ((((gcd.gcd) ) ((nat.O) )) (m))) (m).

gcd_O_l : LEMMA (FORALL(m:nat_sttfa_th.sttfa_nat):logic_sttfa_th.eq[nat_sttfa_th.sttfa_nat](gcd_sttfa.gcd(nat_sttfa_th.sttfa_O)(m))(m))

Printing for OpenTheory is not working at the moment.