• Top
    • Documentation
    • Books
    • Boolean-reasoning
    • Projects
    • Debugging
    • Community
    • Std
    • Proof-automation
    • Macro-libraries
    • ACL2
    • Interfacing-tools
    • Hardware-verification
      • Gl
      • Esim
      • Vl2014
      • Sv
      • Fgl
        • Fgl-rewrite-rules
        • Fgl-function-mode
          • !fgl-function-mode->dont-rewrite-under-if-test
          • !fgl-function-mode->dont-primitive-exec
          • !fgl-function-mode->dont-concrete-exec
          • !fgl-function-mode->dont-expand-def
          • !fgl-function-mode->dont-rewrite
          • !fgl-function-mode->split-ifs
          • Fgl-function-mode->dont-rewrite-under-if-test
          • Fgl-function-mode->dont-primitive-exec
          • Fgl-function-mode->dont-expand-def
          • Fgl-function-mode->dont-concrete-exec
          • Fgl-function-mode-p
            • Fgl-function-mode->dont-rewrite
            • Fgl-function-mode->split-ifs
            • Fgl-function-mode-fix
          • Fgl-object
          • Fgl-solving
          • Fgl-handling-if-then-elses
          • Fgl-counterexamples
          • Fgl-getting-bits-from-objects
          • Fgl-primitive-and-meta-rules
          • Fgl-interpreter-overview
          • Fgl-correctness-of-binding-free-variables
          • Fgl-debugging
          • Fgl-testbenches
          • Def-fgl-boolean-constraint
          • Fgl-stack
          • Def-fgl-param-thm
          • Fgl-rewrite-tracing
          • Def-fgl-thm
          • Fgl-fast-alist-support
          • Fgl-array-support
          • Advanced-equivalence-checking-with-fgl
          • Fgl-fty-support
          • Fgl-internals
        • Vwsim
        • Vl
        • X86isa
        • Svl
        • Rtl
      • Software-verification
      • Math
      • Testing-utilities
    • Fgl-function-mode

    Fgl-function-mode-p

    Recognizer for fgl-function-mode bit structures.

    Signature
    (fgl-function-mode-p x) → *

    Definitions and Theorems

    Function: fgl-function-mode-p

    (defun fgl-function-mode-p (x)
      (declare (xargs :guard t))
      (let ((__function__ 'fgl-function-mode-p))
        (declare (ignorable __function__))
        (mbe :logic (unsigned-byte-p 6 x)
             :exec (and (natp x) (< x 64)))))

    Theorem: fgl-function-mode-p-when-unsigned-byte-p

    (defthm fgl-function-mode-p-when-unsigned-byte-p
      (implies (unsigned-byte-p 6 x)
               (fgl-function-mode-p x)))

    Theorem: unsigned-byte-p-when-fgl-function-mode-p

    (defthm unsigned-byte-p-when-fgl-function-mode-p
      (implies (fgl-function-mode-p x)
               (unsigned-byte-p 6 x)))

    Theorem: fgl-function-mode-p-compound-recognizer

    (defthm fgl-function-mode-p-compound-recognizer
      (implies (fgl-function-mode-p x)
               (natp x))
      :rule-classes :compound-recognizer)