fact: Record cConsDef {Rep : Type} (Sig : consSig) := { cConsBody :> cConstructorType Rep (consDom Sig) }.
imports: Coq.Sets.Ensembles Coq.Lists.List Coq.Strings.String Fiat.Common Fiat.Computation Fiat.ADT.ADTSig Fiat.ADT.Core Fiat.ADT.ComputationalADT Fiat.Common.BoundedLookup Fiat.Common.ilist Fiat.ADTNotation.BuildADTSig Fiat.ADTNotation.BuildADT