src/HOL/Library/Product_Order.thy
changeset 67091 1393c2340eec
parent 63972 c98d1dd7eba1
child 67829 2a6ef5ba4822
     1.1 --- a/src/HOL/Library/Product_Order.thy	Sun Nov 26 13:19:52 2017 +0100
     1.2 +++ b/src/HOL/Library/Product_Order.thy	Sun Nov 26 21:08:32 2017 +0100
     1.3 @@ -220,11 +220,11 @@
     1.4  of two complete lattices:\<close>
     1.5  
     1.6  lemma INF_prod_alt_def:
     1.7 -  "INFIMUM A f = (INFIMUM A (fst o f), INFIMUM A (snd o f))"
     1.8 +  "INFIMUM A f = (INFIMUM A (fst \<circ> f), INFIMUM A (snd \<circ> f))"
     1.9    unfolding Inf_prod_def by simp
    1.10  
    1.11  lemma SUP_prod_alt_def:
    1.12 -  "SUPREMUM A f = (SUPREMUM A (fst o f), SUPREMUM A (snd o f))"
    1.13 +  "SUPREMUM A f = (SUPREMUM A (fst \<circ> f), SUPREMUM A (snd \<circ> f))"
    1.14    unfolding Sup_prod_def by simp
    1.15  
    1.16