Inductive twoT := | twoT_1 | twoT_2.Inductive twoT := | twoT_1 | twoT_2.Inductive twoT := | twoT_1 | twoT_2.

Lemma prod2_comp2: forall p:point_set X * point_set Y, prod2_conv1 (prod2_conv2 p) = p.