(* T isIso => qq a. Ta isIso *)
Variable T1 : NT G F.
Hypothesis H' : AreNatIsos T T1.
Variable a : A.

Lemma NTa_areIso : AreIsos (T a) (T1 a).
Canonical Structure NTa_Iso : Iso (F a) (G a) := NTa_areIso.