• Top
  • Documentation
  • Books
  • Boolean-reasoning
    • Ipasir
    • Aignet
      • Base-api
      • Aignet-construction
      • Representation
      • Aignet-copy-init
      • Aignet-simplify-with-tracking
      • Aignet-simplify-marked-with-tracking
      • Aignet-cnf
      • Aignet-simplify-marked
      • Aignet-complete-copy
      • Aignet-transforms
        • Aignet-output-ranges
        • Aignet-comb-transforms
          • Fraig
          • Parametrize
          • Observability-fix
          • Constprop
          • Apply-m-assumption-n-output-output-transform-default
          • Balance
          • Apply-n-output-comb-transform-default
          • Apply-comb-transform-default
          • Obs-constprop
            • Obs-constprop-config
            • Obs-constprop!
          • Rewrite
          • Comb-transform
          • Abc-comb-simplify
          • Prune
          • Rewrite!
          • M-assumption-n-output-comb-transform->name
          • N-output-comb-transform->name
          • Comb-transform->name
          • N-output-comb-transformlist
          • M-assumption-n-output-comb-transformlist
          • Comb-transformlist
          • Apply-comb-transform
        • Aignet-m-assumption-n-output-transforms
        • Aignet-n-output-comb-transforms
      • Aignet-eval
      • Semantics
      • Aignet-read-aiger
      • Aignet-write-aiger
      • Aignet-abc-interface
      • Utilities
    • Aig
    • Satlink
    • Truth
    • Ubdds
    • Bdd
    • Faig
    • Bed
    • 4v
  • Projects
  • Debugging
  • Std
  • Proof-automation
  • Macro-libraries
  • ACL2
  • Interfacing-tools
  • Hardware-verification
  • Software-verification
  • Math
  • Testing-utilities

• Obs-constprop

Obs-constprop!

Like obs-constprop, but overwrites the original network instead of returning a new one.

Signature

(obs-constprop! aignet config state) 
  → 
(mv new-aignet new-state)

Arguments

aignet — Input aignet -- will be replaced with transformation result.

config — Guard (obs-constprop-config-p config).

Definitions and Theorems

Function: obs-constprop!

(defun obs-constprop! (aignet config state)
 (declare (xargs :stobjs (aignet state)))
 (declare (xargs :guard (obs-constprop-config-p config)))
 (let ((__function__ 'obs-constprop!))
  (declare (ignorable __function__))
  (b*
   (((local-stobjs aignet-tmp)
     (mv aignet state aignet-tmp))
    ((mv aignet-tmp state)
     (obs-constprop-core aignet aignet-tmp config state))
    (aignet
       (aignet-prune-comb aignet-tmp aignet
                          (obs-constprop-config->gatesimp config))))
   (mv aignet state aignet-tmp))))

Theorem: num-ins-of-obs-constprop!

(defthm num-ins-of-obs-constprop!
  (b* (((mv ?new-aignet ?new-state)
        (obs-constprop! aignet config state)))
    (equal (stype-count :pi new-aignet)
           (stype-count :pi aignet))))

Theorem: num-regs-of-obs-constprop!

(defthm num-regs-of-obs-constprop!
  (b* (((mv ?new-aignet ?new-state)
        (obs-constprop! aignet config state)))
    (equal (stype-count :reg new-aignet)
           (stype-count :reg aignet))))

Theorem: num-outs-of-obs-constprop!

(defthm num-outs-of-obs-constprop!
  (b* (((mv ?new-aignet ?new-state)
        (obs-constprop! aignet config state)))
    (equal (stype-count :po new-aignet)
           (stype-count :po aignet))))

Theorem: obs-constprop!-comb-equivalent

(defthm obs-constprop!-comb-equivalent
  (b* (((mv ?new-aignet ?new-state)
        (obs-constprop! aignet config state)))
    (comb-equiv new-aignet aignet)))

Theorem: w-state-of-obs-constprop!

(defthm w-state-of-obs-constprop!
  (b* (((mv ?new-aignet ?new-state)
        (obs-constprop! aignet config state)))
    (equal (w new-state) (w state))))

Theorem: obs-constprop!-of-node-list-fix-aignet

(defthm obs-constprop!-of-node-list-fix-aignet
  (equal (obs-constprop! (node-list-fix aignet)
                         config state)
         (obs-constprop! aignet config state)))

Theorem: obs-constprop!-node-list-equiv-congruence-on-aignet

(defthm obs-constprop!-node-list-equiv-congruence-on-aignet
  (implies (node-list-equiv aignet aignet-equiv)
           (equal (obs-constprop! aignet config state)
                  (obs-constprop! aignet-equiv config state)))
  :rule-classes :congruence)

Theorem: obs-constprop!-of-obs-constprop-config-fix-config

(defthm obs-constprop!-of-obs-constprop-config-fix-config
  (equal (obs-constprop! aignet (obs-constprop-config-fix config)
                         state)
         (obs-constprop! aignet config state)))

Theorem: obs-constprop!-obs-constprop-config-equiv-congruence-on-config

(defthm
     obs-constprop!-obs-constprop-config-equiv-congruence-on-config
  (implies (obs-constprop-config-equiv config config-equiv)
           (equal (obs-constprop! aignet config state)
                  (obs-constprop! aignet config-equiv state)))
  :rule-classes :congruence)