Multisubsets
Content created by Fredrik Bakke, Jonathan Prieto-Cubides, Egbert Rijke and Eléonore Mangel.
Created on 2022-04-08.
Last modified on 2023-10-09.
module foundation.multisubsets where
Imports
open import elementary-number-theory.natural-numbers open import foundation.dependent-pair-types open import foundation.images open import foundation.negated-equality open import foundation.universe-levels open import foundation-core.fibers-of-maps open import foundation-core.sets open import univalent-combinatorics.finite-types
Idea
A multisubset of a given set U
is a type B
equipped with a function
f : B → U
Definition
module _ {l1 : Level} (l2 : Level) where multisubset : Set l1 → UU (l1 ⊔ lsuc l2) multisubset U = Σ (UU l2) (λ B → B → type-Set U) is-locally-finite-multisubset : (U : Set l1) → multisubset U → UU (l1 ⊔ l2) is-locally-finite-multisubset U (pair B f) = (x : type-Set U) → is-finite (fiber f x) is-finite-multisubset : (U : Set l1) → multisubset U → UU (l1 ⊔ l2) is-finite-multisubset U (pair B f) = is-finite (im f) module _ {l1 : Level} where locally-finite-multisubset : Set l1 → UU l1 locally-finite-multisubset U = type-Set U → ℕ support-locally-finite-multisubset : (U : Set l1) → locally-finite-multisubset U → UU l1 support-locally-finite-multisubset U μ = Σ (type-Set U) (λ x → μ x ≠ 0) is-finite-locally-finite-multisubset : (U : Set l1) → locally-finite-multisubset U → UU l1 is-finite-locally-finite-multisubset U μ = is-finite (support-locally-finite-multisubset U μ)
Recent changes
- 2023-10-09. Fredrik Bakke and Egbert Rijke. Negated equality (#822).
- 2023-09-06. Egbert Rijke. Rename fib to fiber (#722).
- 2023-06-08. Fredrik Bakke. Remove empty
foundation
modules and replace them by their core counterparts (#644). - 2023-03-14. Fredrik Bakke. Remove all unused imports (#502).
- 2023-03-13. Jonathan Prieto-Cubides. More maintenance (#506).