removed outdated comment moved back and updated (at the direct request of Christian Urban)
authorkuncar
Wed, 30 Nov 2011 18:50:46 +0100
changeset 45698 fd8e140ae879
parent 45697 3b7c35a08723
child 45699 3e006216319f
removed outdated comment moved back and updated (at the direct request of Christian Urban)
src/HOL/Tools/Quotient/quotient_type.ML
--- a/src/HOL/Tools/Quotient/quotient_type.ML	Wed Nov 30 15:07:10 2011 +0100
+++ b/src/HOL/Tools/Quotient/quotient_type.ML	Wed Nov 30 18:50:46 2011 +0100
@@ -216,6 +216,20 @@
 
 (*** interface and syntax setup ***)
 
+(* the ML-interface takes a list of tuples consisting of:
+
+ - the name of the quotient type
+ - its free type variables (first argument)
+ - its mixfix annotation
+ - the type to be quotient
+ - the partial flag (a boolean)
+ - the relation according to which the type is quotient
+ - optional names of morphisms (rep/abs)
+
+ it opens a proof-state in which one has to show that the
+ relations are equivalence relations
+*)
+
 fun quotient_type quot_list lthy =
   let
     (* sanity check *)