Funext_type := WeakFunext_implies_Funext (NaiveFunext_implies_WeakFunext (fun A P f g p => let h := fun (x:finterval) (a:A) => finterval_rec _ (f a) (g a) (p a) x in ap h fseg)).
Require Import HoTT.Basics HoTT.Truncations HoTT.Types.Bool. Require Import Metatheory.Core Metatheory.FunextVarieties Metatheory.ImpredicativeTruncation.