fact: Fixpoint cfunType (fDom : list Type) (fCod : Type) {struct fDom} : Type := match fDom with | nil => fCod | cons T fDom' => T -> cfunType fDom' fCod end.
imports: Fiat.Common.Coq__8_4__8_5__Compat Coq.Sets.Ensembles Coq.ZArith.ZArith Coq.Classes.Morphisms Coq.Classes.SetoidTactics Fiat.Computation Fiat.Computation.SetoidMorphisms Coq.Logic.FunctionalExtensionality