• Top
    • Documentation
    • Books
    • Recursion-and-induction
    • Boolean-reasoning
      • Ipasir
        • Ipasir$a
          • Ipasir$a-p
          • Ipasir$a-fix
          • Ipasir-set-limit$a
          • Ipasir-add-lit$a
          • Ipasir-assume$a
          • Ipasir-init$a
          • Make-ipasir$a
          • Ipasir-finalize-clause$a
          • Ipasir-reinit$a
          • Ipasir$a-equiv
          • Ipasir-input$a
          • Ipasir-val$a
          • Ipasir-release$a
            • Ipasir$a->solved-assumption
            • Ipasir$a->new-clause
            • Ipasir$a->callback-count
            • Ipasir$a->assumption
            • Ipasir-failed$a
            • Change-ipasir$a
            • Ipasir$a->solution
            • Ipasir$a->formula
            • Ipasir$a->status
            • Ipasir$a->history
            • Ipasir-callback-count$a
            • Ipasir-solved-assumption$a
            • Ipasir-some-history$a
            • Ipasir-get-status$a
            • Ipasir-get-assumption$a
            • Ipasir-empty-new-clause$a
            • Create-ipasir$a
            • Ipasir-solve$a
          • Building-an-ipasir-solver-library
          • Ipasir-formula
          • 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$a

    Ipasir-release$a

    Logic form of ipasir-release. See ipasir for usage.

    Signature
    (ipasir-release$a solver) → new-solver
    Arguments
    solver — Guard (ipasir$a-p solver).
    Returns
    new-solver — Type (ipasir$a-p new-solver).

    Definitions and Theorems

    Function: ipasir-release$a

    (defun
     ipasir-release$a (solver)
     (declare (xargs :guard (ipasir$a-p solver)))
     (declare (xargs :guard (not (eq (ipasir-get-status$a solver)
                                     :undef))))
     (let
        ((__function__ 'ipasir-release$a))
        (declare (ignorable __function__))
        (b* (((ipasir$a solver)))
            (change-ipasir$a solver
                             :status :undef
                             :history (cons :release solver.history)))))

    Theorem: ipasir$a-p-of-ipasir-release$a

    (defthm ipasir$a-p-of-ipasir-release$a
            (b* ((new-solver (ipasir-release$a solver)))
                (ipasir$a-p new-solver))
            :rule-classes :rewrite)

    Theorem: ipasir-release$a-status

    (defthm ipasir-release$a-status
            (b* ((?new-solver (ipasir-release$a solver)))
                (equal (ipasir$a->status new-solver)
                       :undef)))

    Theorem: ipasir-release$a-history

    (defthm ipasir-release$a-history
            (b* ((?new-solver (ipasir-release$a solver)))
                (consp (ipasir$a->history new-solver))))

    Theorem: ipasir-release$a-of-ipasir$a-fix-solver

    (defthm ipasir-release$a-of-ipasir$a-fix-solver
            (equal (ipasir-release$a (ipasir$a-fix solver))
                   (ipasir-release$a solver)))

    Theorem: ipasir-release$a-ipasir$a-equiv-congruence-on-solver

    (defthm ipasir-release$a-ipasir$a-equiv-congruence-on-solver
            (implies (ipasir$a-equiv solver solver-equiv)
                     (equal (ipasir-release$a solver)
                            (ipasir-release$a solver-equiv)))
            :rule-classes :congruence)