• Top
    • Documentation
    • Books
    • Recursion-and-induction
    • Boolean-reasoning
      • Ipasir
        • Ipasir$a
        • Building-an-ipasir-solver-library
        • Ipasir-formula
          • Ipasir-set-mux
          • Ipasir-cancel-new-clause
            • Ipasir-cancel-assumption
            • Ipasir-set-xor
            • Ipasir-set-and
            • Ipasir-add-4ary
            • Ipasir-set-or
            • Ipasir-set-iff
            • Ipasir-add-ternary
            • Ipasir-add-binary
            • Ipasir-set-buf
            • Ipasir-add-clauses
            • Ipasir-add-unary
            • Ipasir-add-list
            • Ipasir-add-clauses-ordered
            • Ipasir-add-list-ordered
            • Ipasir-add-empty
          • Ipasir-bump-activity-vars$a
          • Ipasir-set$a
          • Ipasir-bump-activity-vars$c
          • Ipasir-get$a
          • Ipasir-set-limit$c
          • Ipasir-set$c
          • Ipasir-failed$c
          • Ipasir-assume$c
          • Ipasir-add-lit$c
          • Ipasir-val$c
          • With-local-ipasir
          • Ipasir-solve$c
          • Ipasir-reinit$c
          • Ipasir-init$c
          • Ipasir-finalize-clause$c
          • Ipasir-some-history$c
          • Ipasir-solved-assumption$c
          • Ipasir-release$c
          • Ipasir-input$c
          • Ipasir-get$c
          • Ipasir-get-status$c
          • Ipasir-get-curr-stats$c
          • Ipasir-get-assumption$c
          • Ipasir-empty-new-clause$c
          • Ipasir-callback-count$c
          • Ipasir-val
          • Ipasir-solve
          • Ipasir-set-limit
          • Ipasir-reinit
          • Ipasir-failed
          • Ipasir-callback-count
          • Ipasir-release
          • Ipasir-input
          • Ipasir-init
          • Ipasir-finalize-clause
          • Ipasir-assume
          • Ipasir-add-lit
        • Aignet
        • Aig
        • Satlink
        • Truth
        • Ubdds
        • Bdd
        • Faig
        • Bed
        • 4v
      • Projects
      • Debugging
      • Std
      • Proof-automation
      • Macro-libraries
      • ACL2
      • Interfacing-tools
      • Hardware-verification
      • Software-verification
      • Testing-utilities
      • Math
    • Ipasir-formula

    Ipasir-cancel-new-clause

    Identity function in execution; in the logic, ensures that the new-clause field of the ipasir is empty, which it must be by the guard.

    Signature
    (ipasir-cancel-new-clause ipasir) → new-ipasir

    See ipasir-add-binary, particularly ipasir-add-binary-formula, for an example: if we didn't use this function at the beginning of ipasir-add-binary, then we'd need a hypothesis of (not (ipasir$a->new-clause ipasir)) in ipasir-add-binary-formula.

    Definitions and Theorems

    Function: ipasir-cancel-new-clause$inline

    (defun ipasir-cancel-new-clause$inline (ipasir)
           (declare (xargs :stobjs (ipasir)))
           (declare (xargs :guard (ipasir-empty-new-clause ipasir)))
           (let ((__function__ 'ipasir-cancel-new-clause))
                (declare (ignorable __function__))
                (mbe :logic (non-exec (change-ipasir$a ipasir
                                                       :new-clause nil))
                     :exec ipasir)))

    Theorem: ipasir-cancel-new-clause-status

    (defthm ipasir-cancel-new-clause-status
            (b* ((?new-ipasir (ipasir-cancel-new-clause$inline ipasir)))
                (equal (ipasir$a->status new-ipasir)
                       (ipasir$a->status ipasir))))

    Theorem: ipasir-cancel-new-clause-formula

    (defthm ipasir-cancel-new-clause-formula
            (b* ((?new-ipasir (ipasir-cancel-new-clause$inline ipasir)))
                (equal (ipasir$a->formula new-ipasir)
                       (ipasir$a->formula ipasir))))

    Theorem: ipasir-cancel-new-clause-new-clause

    (defthm ipasir-cancel-new-clause-new-clause
            (b* ((?new-ipasir (ipasir-cancel-new-clause$inline ipasir)))
                (not (ipasir$a->new-clause new-ipasir))))

    Theorem: ipasir-cancel-new-clause-assumption

    (defthm ipasir-cancel-new-clause-assumption
            (b* ((?new-ipasir (ipasir-cancel-new-clause$inline ipasir)))
                (equal (ipasir$a->assumption new-ipasir)
                       (ipasir$a->assumption ipasir))))