]> matita.cs.unibo.it Git - helm.git/blobdiff - matita/library/algebra/groups.ma
Huge commit for the release. Includes:
[helm.git] / matita / library / algebra / groups.ma
index ea345bc5469356224e3f102453264e0c3fa34542..6cb99481241e95a8c945902816d8832e5d8094c9 100644 (file)
@@ -316,10 +316,11 @@ record normal_subgroup (G:Group) : Type ≝
 theorem foo:
  ∀G.∀H:normal_subgroup G.∀x.x*H=H*x.
 *)
-
+(*
 theorem member_of_left_coset_mk_left_coset_x_H_a_to_member_of_left_coset_mk_left_coset_y_H_b_to_member_of_left_coset_mk_left_coset_op_x_y_H_op_a_b:
  ∀G.∀H:normal_subgroup G.∀x,y,a,b.
   a ∈ (x*H) → b ∈ (y*H) → (a·b) ∈ ((x·y)*H).
 intros;
 simplify;
-qed.
\ No newline at end of file
+qed.
+*)