val subjectPublicKeyInfo_payload_t' : Type0
let subjectPublicKeyInfo_payload_t'
= parse_filter_refine (filter_subjectPublicKeyInfo_payload_t')
module X509.BasicFields.SubjectPublicKeyInfo
open ASN1.Spec
open ASN1.Low

open X509.Base
open X509.Crypto

open FStar.Integers

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

let filter_subjectPublicKeyInfo_payload_t'
  (x: (algorithmIdentifier_t) `tuple2` (datatype_of_asn1_type BIT_STRING))
: GTot bool
= (snd x).bs_len = 33ul &&
  (snd x).bs_unused_bits = 0ul
/
X509.Crypto.fst.checked X509.Base.fst.checked prims.fst.checked FStar.UInt32.fsti.checked FStar.Pervasives.Native.fst.checked FStar.Pervasives.fsti.checked FStar.Integers.fst.checked ASN1.Spec.fst.checked ASN1.Low.fst.checked
X509.BasicFields.SubjectPublicKeyInfo.fst
Type0
LowParse.Spec.Combinators.parse_filter_refine FStar.Pervasives.Native.tuple2 X509.Crypto.AlgorithmIdentifier.algorithmIdentifier_t ASN1.Base.datatype_of_asn1_type ASN1.Base.BIT_STRING X509.BasicFields.SubjectPublicKeyInfo.filter_subjectPublicKeyInfo_payload_t'
let subjectPublicKeyInfo_payload_t' =
  
parse_filter_refine (filter_subjectPublicKeyInfo_payload_t')