fact: Example MixedRecord_compile : let wrapper := WrapInstance (H := @WrapListByte (natToWord _ 512)) in ParametricExtraction #vars mixedRecord #program ret (MixedRecord_encode mixedRecord) #arguments (MixedRecordAsCollectionOfVariables (NTSome "f1") (NTSome "f2") (NTSome "f3") mixedRecord) #env MicroEncoders_Env.
imports: Benchmarks.MicroEncodersSetup Fiat.Common.SumType Fiat.Common.EnumType Fiat.Common.BoundedLookup Fiat.Common.ilist Fiat.Computation Fiat.Narcissus.Automation.SolverOpt Fiat.Narcissus.BinLib.Bool Fiat.Narcissus.BinLib.Core Fiat.Narcissus.BinLib.Enum Fiat.Narcissus.BinLib.FixInt Fiat.Narcissus.Common.Compose Fiat.Narcissus.Common.ComposeCheckSum Fiat.Narcissus.Common.ComposeIf Fiat.Narcissus.Common.Specs Fiat.Narcissus.Common.WordFacts Fiat.Narcissus.Lib.FixList Fiat.Narcissus.Lib.IList Fiat.Narcissus.Lib2.Bool Fiat.Narcissus.Lib2.EnumOpt Fiat.Narcissus.Lib2.FixListOpt Fiat.Narcissus.Lib2.NatOpt Fiat.Narcissus.Lib2.NoCache Fiat.Narcissus.Lib2.SumTypeOpt Fiat.Narcissus.Lib2.Vector Fiat.Narcissus.Lib2.WordOpt Fiat.Narcissus.Lib2.IPChecksum