merge
authorpanny
Tue, 26 Nov 2013 15:54:03 +0100
changeset 559655836854ca0a8
parent 55964 c822230fd22b
parent 55963 acb41098607a
child 55971 33a68b7f2736
merge
     1.1 --- a/NEWS	Mon Nov 25 20:25:22 2013 +0100
     1.2 +++ b/NEWS	Tue Nov 26 15:54:03 2013 +0100
     1.3 @@ -37,6 +37,8 @@
     1.4  * Elimination of fact duplicates:
     1.5      equals_zero_I ~> minus_unique
     1.6      diff_eq_0_iff_eq ~> right_minus_eq
     1.7 +    nat_infinite ~> infinite_UNIV_nat
     1.8 +    int_infinite ~> infinite_UNIV_int
     1.9  INCOMPATIBILITY.
    1.10  
    1.11  * Fact name consolidation:
     2.1 --- a/src/HOL/Library/Library.thy	Mon Nov 25 20:25:22 2013 +0100
     2.2 +++ b/src/HOL/Library/Library.thy	Tue Nov 26 15:54:03 2013 +0100
     2.3 @@ -65,6 +65,7 @@
     2.4    Transitive_Closure_Table
     2.5    Wfrec
     2.6    While_Combinator
     2.7 +  Zorn
     2.8  begin
     2.9  end
    2.10  (*>*)
     3.1 --- a/src/Tools/subtyping.ML	Mon Nov 25 20:25:22 2013 +0100
     3.2 +++ b/src/Tools/subtyping.ML	Tue Nov 26 15:54:03 2013 +0100
     3.3 @@ -129,7 +129,8 @@
     3.4  
     3.5  infixr ++> +@> (* lazy error msg composition *)
     3.6  
     3.7 -fun err ++> prt = err #> apsnd (cons prt);
     3.8 +fun (err : unit -> string * Pretty.T list) ++> (prt : Pretty.T) =
     3.9 +  err #> apsnd (cons prt);
    3.10  val op +@> = Library.foldl op ++>;
    3.11  
    3.12  fun eval_err err = err ()