• Top
    • Documentation
    • Books
    • Boolean-reasoning
    • Projects
    • Debugging
    • Std
    • Proof-automation
    • Macro-libraries
    • ACL2
    • Interfacing-tools
    • Hardware-verification
      • Gl
      • Esim
      • Vl2014
      • Sv
      • Fgl
        • Fgl-rewrite-rules
        • Fgl-function-mode
        • 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
          • Symbolic-arithmetic
          • Bfr
            • Bfr-eval
            • Bfrstate
            • Bfr->aignet-lit
            • Bfr-p
            • Bounded-lit-fix
            • Bfr-list-fix
            • Aignet-lit->bfr
            • Variable-g-bindings
            • Bfr-listp$
            • Bfrstate>=
            • Bfr-listp-witness
            • Fgl-object-bindings-bfrlist
            • Bfr-set-var
            • Bfr-negate
            • Bfr-fix
            • Fgl-bfr-object-bindings-p
            • Bfr-mode
            • Bfr-mode-is
            • Lbfr-case
            • Bfrstate-case
            • Bfrstate-mode-is
            • Lbfr-mode-is
            • Bfr-mode-p
            • Fgl-interpreter-state
        • Vwsim
        • Vl
        • X86isa
        • Svl
        • Rtl
      • Software-verification
      • Math
      • Testing-utilities
    • Bfr

    Bfr-mode-p

    This is an ordinary defenum.

    Function: bfr-mode-p

    (defun bfr-mode-p (x)
      (declare (xargs :guard t))
      (or (eql x '0) (eql x '1) (eql x '2)))

    Theorem: type-when-bfr-mode-p

    (defthm type-when-bfr-mode-p
      (implies (bfr-mode-p x)
               (if (integerp x) (not (< x '0)) 'nil))
      :rule-classes :compound-recognizer)