• Top
    • Documentation
    • Books
    • Boolean-reasoning
    • Projects
    • Debugging
    • Std
    • Community
    • Proof-automation
      • Gl
      • Witness-cp
      • Ccg
      • Install-not-normalized
      • Rewrite$
      • 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-getting-bits-from-objects
          • Fgl-primitive-and-meta-rules
          • Fgl-counterexamples
          • Fgl-interpreter-overview
          • Fgl-correctness-of-binding-free-variables
          • Fgl-debugging
          • Fgl-testbenches
          • Def-fgl-boolean-constraint
          • Fgl-stack
          • Fgl-rewrite-tracing
          • Def-fgl-param-thm
          • Def-fgl-thm
          • Fgl-fast-alist-support
          • Fgl-array-support
          • Advanced-equivalence-checking-with-fgl
          • Fgl-fty-support
          • Fgl-internals
        • Removable-runes
        • Efficiency
        • Rewrite-bounds
        • Bash
        • Def-dag-measure
        • Bdd
        • Remove-hyps
        • Contextual-rewriting
        • Simp
        • Rewrite$-hyps
        • Bash-term-to-dnf
        • Use-trivial-ancestors-check
        • Minimal-runes
        • Clause-processor-tools
        • Fn-is-body
        • Without-subsumption
        • Rewrite-equiv-hint
        • Def-bounds
        • Rewrite$-context
        • Try-gl-concls
        • Hint-utils
      • Macro-libraries
      • ACL2
      • Interfacing-tools
      • Hardware-verification
      • 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)