• 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-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
            • Aabf-floor-ss-aux
            • Aabf-logapp-russ
            • Aabf-integer-length-s1
            • Aabf-mod-ss-aux
            • Aabf-ite-bss-fn-aux
            • Aabf-sign-abs-not-s
            • Aabf-ite-buu-fn-aux
            • Aabf-ash-ss
            • Aabf-<-=-ss
            • Aabf-+-ss
            • Aabf-truncate-ss
            • Aabf-rem-ss
            • Aabf-mod-ss
            • Aabf-logbitp-n2v
            • Aabf-ite-buu-fn
            • Aabf-ite-bss-fn
            • Aabf-expt-su
            • Aabf-*-ss
            • Aabf-logxor-ss
            • Aabf-logior-ss
            • Aabf-logeqv-ss
            • Aabf-logand-ss
            • Aabf-floor-ss
            • Aabf-logapp-nss-aux
            • Aabf-unary-minus-s
            • Aabf-signext-nss
            • Aabf-logapp-nss
            • Aabf-integer-length-s
            • Aabf-=-ss
            • Aabf-<-ss
            • Aabf-abs-s
            • Aabf-syntactically-zero-p
            • Aabf-scons
            • Aabf-logtail-ns
            • Aabf-loghead-ns
            • Aabf-logext-ns
            • Aabf-syntactically-false-p
            • Aabf-lognot-s
            • Int->aabflist
            • Aabf-ucons
            • Aabf-syntactically-true-p
              • Aabf-syntactically-signext-p
              • Aabf-syntactically-neg1-p
              • Aabf-sign-s
              • Aabf-integer-length-bound-s
              • Int-set-sign
              • Aabf-car
              • Aabf-first/rest/end
              • Non-int-fix
              • Maybe-integer
            • Bfr
            • Fgl-interpreter-state
        • 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
    • Symbolic-arithmetic

    Aabf-syntactically-true-p

    Signature
    (aabf-syntactically-true-p x man) → true-p
    Returns
    true-p — Type (booleanp true-p).

    Definitions and Theorems

    Function: aabf-syntactically-true-p

    (defun aabf-syntactically-true-p (x man)
      (declare (xargs :guard (and (aabf-p x man))))
      (let ((__function__ 'aabf-syntactically-true-p))
        (declare (ignorable __function__))
        (aabf-syntactically-equal x (aabf-true))))

    Theorem: booleanp-of-aabf-syntactically-true-p

    (defthm booleanp-of-aabf-syntactically-true-p
      (b* ((true-p (aabf-syntactically-true-p x man)))
        (booleanp true-p))
      :rule-classes :rewrite)

    Theorem: trivial-theorem-about-aabf-syntactically-true-p

    (defthm trivial-theorem-about-aabf-syntactically-true-p
      (b* nil
        (b* ((?ignore (aabf-syntactically-true-p x man)))
          t))
      :rule-classes nil)

    Theorem: aabf-syntactically-true-p-implies

    (defthm aabf-syntactically-true-p-implies
      (b* nil
        (implies (aabf-syntactically-true-p x man)
                 (equal (aabf-eval x env man) t))))

    Theorem: aabf-syntactically-true-p-rewrite

    (defthm aabf-syntactically-true-p-rewrite
      (b* nil
        (implies (and (acl2::rewriting-negative-literal
                           (cons 'aabf-syntactically-true-p
                                 (cons x (cons man 'nil))))
                      (bind-free '((env . env)) (env)))
                 (iff (aabf-syntactically-true-p x man)
                      (and (equal (aabf-eval x env man) t)
                           (hide (aabf-syntactically-true-p x man)))))))