fact: Definition ListWToTuple_Truncated' n (l: list W) : FiatWTuple n := match (TruncateList_length n (Word.natToWord 32 0) l) in _ = n0 return FiatWTuple n0 with | eq_refl => (ListWToTuple (TruncateList (Word.natToWord 32 0) n l)) end.
imports: Fiat.QueryStructure.Implementation.DataStructures.BagADT.QueryStructureImplementation Fiat.ADT.Core Bedrock.Platform.Facade.examples.TuplesF CertifiedExtraction.Utils Bedrock.Memory CertifiedExtraction.Extraction.QueryStructures.Basics Fiat.ADT.Core