def0 IsProp : ★ → ★ = λ A ⇒ (x y : A) → x ≡ y : A

def0 feq : (A : ★) → (f g : IsProp A) → f ≡ g : IsProp A =
  λ A f g ⇒ δ _ ⇒ f