imp_Trm_rec@{i j | Set < i} {A : Type@{i}} {P : Type@{j}} `{IsHProp P} (f : A -> P) : imp_Trm@{i} A -> P := fun ma => (equiv_smalltype@{Set j} P) (ma (smalltype@{Set j} P) _ ((equiv_smalltype@{Set j} P)^-1 o f)).
Require Import HoTT.Basics. Require Import Universes.Smallness.