val parse_x509_version_payload_kind:parser_kind
val parse_x509_version_payload_kind:parser_kind
let parse_x509_version_payload_kind
: parser_kind
= parse_filter_kind (parse_asn1_TLV_kind_of_type INTEGER)
module X509.BasicFields.Version

open LowParse.Low.Base

open ASN1.Spec
open ASN1.Low

open X509.Base

open FStar.Integers

#set-options "--z3rlimit 32 --fuel 0 --ifuel 0"

let filter_x509_version
  (x: datatype_of_asn1_type INTEGER)
: GTot bool
= 0l <= x && x <= 2l

let x509_version_payload_t: Type
= parse_filter_refine filter_x509_version
/
X509.Base.fst.checked prims.fst.checked LowParse.Low.Base.fst.checked FStar.UInt8.fsti.checked FStar.UInt32.fsti.checked FStar.Pervasives.fsti.checked FStar.Integers.fst.checked FStar.Int32.fsti.checked FStar.Classical.fsti.checked ASN1.Spec.fst.checked ASN1.Low.fst.checked
X509.BasicFields.Version.fsti
LowParse.Spec.Base.parser_kind
LowParse.Spec.Combinators.parse_filter_kind ASN1.Spec.TLV.parse_asn1_TLV_kind_of_type ASN1.Base.INTEGER
let parse_x509_version_payload_kind:parser_kind =
  
parse_filter_kind (parse_asn1_TLV_kind_of_type INTEGER)