@@ -389,8 +389,8 @@ theorem iUnion_univ_pi_of_monotone {ι ι' : Type*} [LinearOrder ι'] [Nonempty
389389 ⋃ j : ι', pi univ (fun i => s i j) = pi univ fun i => ⋃ j, s i j :=
390390 iUnion_pi_of_monotone finite_univ fun i _ => hs i
391391
392- theorem Finite.iInf_iSup_eq {ι} {κ : ι → Sort *} [Nonempty (∀ a, κ a)] [Order.Frame α]
393- {s : Set ι} (hs : s.Finite) {f : ∀ a, κ a → α} :
392+ theorem Finite.iInf_iSup_eq {ι} {κ : ι → Sort *} [Nonempty (∀ a, κ a)] [Order.Frame α] {s : Set ι}
393+ (hs : s.Finite) {f : ∀ a, κ a → α} :
394394 ⨅ a ∈ s, ⨆ b, f a b = ⨆ g : ∀ a, κ a, ⨅ a ∈ s, f a (g a) := by
395395 classical
396396 induction s, hs using Set.Finite.induction_on with
@@ -405,8 +405,8 @@ theorem Finite.iInf_iSup_eq {ι} {κ : ι → Sort*} [Nonempty (∀ a, κ a)] [O
405405 exact ha ha'
406406 · exact le_iSup_of_le (g a) (le_iSup_of_le g le_rfl)
407407
408- theorem Finite.iSup_iInf_eq {ι} {κ : ι → Sort *} [Nonempty (∀ a, κ a)] [Order.Coframe α]
409- {s : Set ι} (hs : s.Finite) {f : ∀ a, κ a → α} :
408+ theorem Finite.iSup_iInf_eq {ι} {κ : ι → Sort *} [Nonempty (∀ a, κ a)] [Order.Coframe α] {s : Set ι}
409+ (hs : s.Finite) {f : ∀ a, κ a → α} :
410410 ⨆ a ∈ s, ⨅ b, f a b = ⨅ g : ∀ a, κ a, ⨆ a ∈ s, f a (g a) := by
411411 classical
412412 induction s, hs using Set.Finite.induction_on with
0 commit comments