fact: Definition WrapDecoder {A B C} (f: forall n, ByteBuffer.t n -> option (A * B * C)) := fun (bs: bytes) => match f _ (projT2 bs) with | Some (pkt, _, _) => Some pkt | None => None end.
imports: Fiat.QueryStructure.Automation.MasterPlan Fiat.Narcissus.Examples.NetworkStack.IPv4Header Fiat.Narcissus.Examples.NetworkStack.TCP_Packet Fiat.Narcissus.Formats.ByteBuffer Bedrock.Word Fiat.Narcissus.BinLib.Core