src/HOL/Tools/datatype_rep_proofs.ML
changeset 5215 3224d1a9a8f1
parent 5177 0d3a168e4d44
child 5303 22029546d109
     1.1 --- a/src/HOL/Tools/datatype_rep_proofs.ML	Thu Jul 30 15:52:33 1998 +0200
     1.2 +++ b/src/HOL/Tools/datatype_rep_proofs.ML	Thu Jul 30 15:54:03 1998 +0200
     1.3 @@ -41,14 +41,6 @@
     1.4  
     1.5  (******************************************************************************)
     1.6  
     1.7 -(*----------------------------------------------------------*)
     1.8 -(* Proofs dependent on concrete representation of datatypes *)
     1.9 -(*                                                          *)
    1.10 -(* - injectivity of constructors                            *)
    1.11 -(* - distinctness of constructors (internal version)        *)
    1.12 -(* - induction theorem                                      *)
    1.13 -(*----------------------------------------------------------*)
    1.14 -
    1.15  fun representation_proofs (dt_info : datatype_info Symtab.table)
    1.16        new_type_names descr sorts types_syntax constr_syntax thy =
    1.17    let