module Chapter2.IDesc.Fixpoint {I : Set} where open import Chapter2.IDesc data μ (D : func I I)(i : I) : Set where ⟨_⟩ : ⟦ D ⟧func (μ D) i → μ D i