Mercurial Mercurial > hg > nominal2 / diff
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | file | latest | revisions | annotate | diff | comparison | raw | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
QuotMain.thy
changeset 366 84621d9942f5
parent 365 ba057402ea53
parent 364 4c455d58ac99
child 369 577539640a47 
--- a/QuotMain.thy	Tue Nov 24 15:31:29 2009 +0100
+++ b/QuotMain.thy	Tue Nov 24 16:10:31 2009 +0100
@@ -789,8 +789,8 @@
     ball_rsp_tac ctxt,
     bex_rsp_tac ctxt,
     FIRST' (map rtac rsp_thms),
+    rtac refl,
     (instantiate_tac @{thm REP_ABS_RSP(1)} ctxt THEN' (RANGE [quotient_tac quot_thm])),
-    rtac refl,
     (APPLY_RSP_TAC rty ctxt THEN' (RANGE [quotient_tac quot_thm, quotient_tac quot_thm])),
     Cong_Tac.cong_tac @{thm cong},
     rtac @{thm ext},
nominal2