1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21
(* Example proof script for Coq Proof General (Coq V8 syntax). $Id$ *) Module Example. Goal forall (A B:Prop),(A /\ B) -> (B /\ A). intros A B. intros H. elim H. split. assumption. assumption. Save and_comms. End Example.