• Top
    • Documentation
    • Books
    • Boolean-reasoning
    • Projects
      • Apt
      • Zfc
      • Acre
      • Milawa
      • Smtlink
      • Abnf
      • Vwsim
      • Isar
      • Pfcs
      • Wp-gen
      • Dimacs-reader
      • Legacy-defrstobj
      • Proof-checker-array
      • Soft
      • C
      • Farray
      • Rp-rewriter
      • Instant-runoff-voting
      • Imp-language
      • Sidekick
      • Leftist-trees
      • Java
      • Taspi
      • Riscv
        • Specification
          • Semantics
          • Features
            • Feat-base
            • Feat-endian
              • Feat-endian-case
              • Feat-endian-fix
              • Feat-endian-equiv
              • Feat-endianp
              • Feat-endian-little
              • Feat-endian-big
              • Feat-endian-kind
              • Feat
              • Feat->xnum
              • Feat->xlen
              • Feat-64p
              • Feat-32p
              • Feat-little-endianp
              • Feat-big-endianp
              • Feat-embedp
              • Feat-mp
              • Feat-rv64im-le
              • Feat-rv64em-le
              • Feat-rv32im-le
              • Feat-rv32em-le
              • Feat-rv64im-be
              • Feat-rv64i-le
              • Feat-rv64i-be
              • Feat-rv64em-be
              • Feat-rv64e-le
              • Feat-rv64e-be
              • Feat-rv32im-be
              • Feat-rv32i-le
              • Feat-rv32i-be
              • Feat-rv32em-be
              • Feat-rv32e-le
              • Feat-rv32e-be
            • States
            • Instructions
            • Encoding
            • Reads-over-writes
            • Execution
            • Decoding
          • Executable
          • Specialized
        • Bitcoin
        • Des
        • Ethereum
        • X86isa
        • Sha-2
        • Yul
        • Zcash
        • Proof-checker-itp13
        • Regex
        • ACL2-programming-language
        • Json
        • Jfkr
        • Equational
        • Cryptography
        • Poseidon
        • Where-do-i-place-my-book
        • Axe
        • Aleo
        • Bigmems
        • Builtins
        • Execloader
        • Solidity
        • Paco
        • Concurrent-programs
        • Bls12-377-curves
      • Debugging
      • Std
      • Community
      • Proof-automation
      • Macro-libraries
      • ACL2
      • Interfacing-tools
      • Hardware-verification
      • Software-verification
      • Math
      • Testing-utilities
    • Feat-endian

    Feat-endian-kind

    Get the kind (tag) of a feat-endian structure.

    Signature
    (feat-endian-kind x) → kind
    Arguments
    x — Guard (feat-endianp x).

    Definitions and Theorems

    Function: feat-endian-kind$inline

    (defun feat-endian-kind$inline (x)
      (declare (xargs :guard (feat-endianp x)))
      (let ((__function__ 'feat-endian-kind))
        (declare (ignorable __function__))
        (mbe :logic (cond ((or (atom x) (eq (car x) :little))
                           :little)
                          (t :big))
             :exec (car x))))

    Theorem: feat-endian-kind-possibilities

    (defthm feat-endian-kind-possibilities
      (or (equal (feat-endian-kind x) :little)
          (equal (feat-endian-kind x) :big))
      :rule-classes
      ((:forward-chaining :trigger-terms ((feat-endian-kind x)))))