• Top
    • Documentation
    • Books
    • Boolean-reasoning
    • Debugging
    • Projects
    • Std
    • Proof-automation
    • Macro-libraries
    • ACL2
    • Interfacing-tools
    • Hardware-verification
    • Software-verification
      • Kestrel-books
        • Crypto-hdwallet
        • Apt
        • Error-checking
        • Abnf
        • Fty-extensions
        • Isar
        • Kestrel-utilities
        • Pfcs
        • Soft
        • Bv
        • Imp-language
        • Event-macros
        • Java
        • Bitcoin
          • Bip32
          • Bech32
          • Bip39
            • *bip39-english-words*
            • Bip39-mnemonic-to-seed
            • Bip39-entropy-to-word-indexes
            • Bip39-entropy
            • Bip39-word-indexes-to-words
            • Bip39-words-to-mnemonic
            • Bip39-entropy-to-seed
            • Bip39-entropy-to-mnemonic
            • Bip39-english-words-bound-p
            • Bip39-entropy-size-p
            • Bip44
            • Base58
            • Bip43
            • Bytes
            • Base58check
            • Cryptography
            • Bip-350
            • Bip-173
          • Ethereum
          • Yul
          • Zcash
          • ACL2-programming-language
          • Prime-fields
          • C
          • Syntheto
          • File-io-light
          • Number-theory
          • Cryptography
          • Lists-light
          • Json
          • Axe
          • Builtins
          • Solidity
          • Std-extensions
          • Helpers
          • Htclient
          • Typed-lists-light
          • Arithmetic-light
        • X86isa
        • Axe
        • Execloader
      • Math
      • Testing-utilities
    • Bip39

    Bip39-entropy-size-p

    Possible sizes of the entropy in bits.

    These are the possible values of ENT in the table in [BIP39].

    This is an ordinary std::defenum.

    Function: bip39-entropy-size-p

    (defun bip39-entropy-size-p (x)
      (declare (xargs :guard t))
      (or (eql x '128)
          (eql x '160)
          (eql x '192)
          (eql x '224)
          (eql x '256)))

    Theorem: type-when-bip39-entropy-size-p

    (defthm type-when-bip39-entropy-size-p
      (implies (bip39-entropy-size-p x)
               (if (integerp x) (< '1 x) 'nil))
      :rule-classes :compound-recognizer)