module Chapter5.Desc.Fixpoint where open import Chapter5.Desc data μ {ℓ}(D : Desc ℓ) : Set ℓ where ⟨_⟩ : ⟦ D ⟧ (μ D) → μ D