• Top
    • Documentation
    • Books
    • Boolean-reasoning
    • Projects
    • Debugging
    • Std
    • Proof-automation
    • Macro-libraries
    • ACL2
    • Interfacing-tools
    • Hardware-verification
    • Software-verification
      • Kestrel-books
        • Crypto-hdwallet
        • Apt
        • Error-checking
        • Fty-extensions
        • Isar
        • Kestrel-utilities
        • Set
        • Soft
        • C
        • Bv
        • Imp-language
        • Event-macros
        • Java
          • Atj
          • Aij
          • Language
            • Syntax
            • Semantics
              • Primitive-function-macros
              • Primitive-values
              • Floating-point-placeholders
              • Pointers
              • Floating-point-value-set-parameters
              • Values
                • Jvalue
                  • Jvalue-fix
                  • Jvalue-equiv
                  • Jvalue-reference
                  • Jvalue-primitive
                  • Jvaluep
                    • Jvalue-kind
                  • Jvaluex
                • Primitive-operations
                • Primitive-conversions
                • Reference-values
          • Bitcoin
          • Ethereum
          • Yul
          • Zcash
          • ACL2-programming-language
          • Prime-fields
          • Json
          • Syntheto
          • File-io-light
          • Cryptography
          • Number-theory
          • Lists-light
          • Axe
          • Builtins
          • Solidity
          • Helpers
          • Htclient
          • Typed-lists-light
          • Arithmetic-light
        • X86isa
        • Axe
        • Execloader
      • Math
      • Testing-utilities
    • Jvalue

    Jvaluep

    Recognizer for jvalue structures.

    Signature
    (jvaluep acl2::x) → *

    Definitions and Theorems

    Function: jvaluep

    (defun jvaluep (acl2::x)
      (declare (xargs :guard t))
      (let ((__function__ 'jvaluep))
        (declare (ignorable __function__))
        (cond ((primitive-valuep acl2::x)
               (b* ((get acl2::x))
                 (primitive-valuep get)))
              (t (b* ((get acl2::x))
                   (reference-valuep get))))))