• Top
  • Documentation
  • Books
  • Boolean-reasoning
  • Projects
  • Debugging
  • Std
  • Proof-automation
  • Macro-libraries
  • ACL2
  • Interfacing-tools
  • Hardware-verification
    • Gl
    • Esim
    • Vl2014
    • Sv
      • Svex-stvs
      • Svex-decomposition-methodology
      • Sv-versus-esim
      • Svex-decomp
      • Svex-compose-dfs
      • Svex-compilation
      • Moddb
        • Moddb.lisp
          • Moddb-add-modinst-to-last
          • Moddb-add-module1
          • Moddb-norm
          • Elab-modlist-norm
          • Moddb-ok
          • Elab-modinsts-rem-dups
          • Moddb-add-modinst
          • Elab-mod-initialize-aliases
          • Modinstlist-add-modinsts
          • Moddb-mod-ok
          • Wirelist-rem-dups
          • Moddb-norm-p
          • Elab-mod$a-fix
          • Moddb-mod-order-ok
          • Moddb-mod-insts-ok
          • Elab-mod-wire-find-inst-aux
          • Svex-alist->absindexed
          • Modscope-push-frame
          • Moddb-modinst-ok
          • Lhspairs->absindexed
          • Moddb-mod-inst-wireoffset
          • Moddb-find-bad-modinst-order
          • Constraintlist->absindexed
          • Wirelist-remove-names
          • Moddb-mod-inst-instoffset
          • Lhspairs-named->indexed
          • Elab-modinst-fix
          • Moddb-mod-totalwires
          • Svar-map->absindexed
          • Moddb-modinst-order-ok
          • Moddb-mod-totalinsts
          • Moddb-find-bad-modinst
          • Modscope
          • Constraintlist-named->indexed
          • Assigns->absindexed
          • Moddb-indices-ok
          • Lhs->absindexed
          • Svar-map-named->indexed
          • Module-named->indexed
          • Moddb-find-bad-index
          • Assigns-named->indexed
          • Svar-named->indexed
          • Lhs-named->indexed
          • Elab-mod$c-add-wire
          • Moddb-modname-get-index
          • Moddb-maybe-grow
          • Lhspairs-named->indexed-aux-nrev
          • Elab-modinst-list-names
          • Elab-mod-wire-find-inst
          • Svar->absindexed
          • Moddb-path->wiredecl
          • Modalist-named->indexed
          • Lhspairs->absindexed-nrev
          • Elab-mod$ap
          • Elab-modinst-remove-names
          • Moddb-wireidx->paths
          • Moddb-mods-ok
          • Moddb-find-bad-mod
          • Elab-mod$c-add-inst
          • Elab-mod$c-modinsts-ok
          • Elab-modinst-remove-name
          • Modscope->nth
          • Moddb-basics-ok
          • Svex->absindexed-memo-ok
          • Svex-named->indexed-memo-ok
          • Svarlist-idxaddr-okp
          • Elab-modlist-normp
          • Wirelist-remove-name
          • Modscope->top
          • Moddb-fix
          • Elab-mod$a-add-inst
          • Elab-mod-wiresearch-smartpivot
          • Elab-mod$c-wires-ok
          • Update-elab-mod$a->totalwires
          • Update-elab-mod$a->totalinsts
          • Update-elab-mod$a->orig-mod
          • Update-elab-mod$a->name
          • Moddb-modinst-order-badguy
          • Elab-mod$a-add-wire
          • Elab-mod$a-wiretablei
          • Elab-mod-wiresearch-pivot
          • Elab-mod-wireoffset
          • Elab-mod-instoffset
          • Svar-idxaddr-okp
          • Paths-add-scope
          • Moddb-modinst-badguy
          • Moddb-mod-nwires
          • Moddb-mod-ninsts
          • Modalist-all-idxaddr-okp
          • Elab-mod$a->instname
          • Elab-mods->names
          • Elab-modinst$c-copy
          • Elab-mod$a->inst-wireoffset
          • Elab-mod$a->inst-instoffset
          • Moddb-elab-mod-stats
          • Moddb-contains-modnames
          • Elab-mod$c-inst-abstraction
          • Elab-mod$a->inst-modidx
          • Elab-mod$a-wirename->idx
          • Elab-mod$a-instname->idx
          • Elab-mod-add-wires
          • Modscope-top-bound
          • Modscope-local-bound
          • Constraintlist-add-scope
          • Moddb-modidx-get-name
          • Moddb-add-module
          • Elab-mod-wiresearch-dumbpivot
          • Update-moddb->nmods
          • Elab-mod$c->inst-wireoffset
          • Elab-mod$c->inst-modidx
          • Elab-mod$c->inst-instoffset
          • Elab-mod$c-wire-abstraction
          • Moddb-clear
          • Elab-mod$c->instname
          • Svex-mod->flatten
          • Names->paths
          • Modscope->wireoffset
          • Modscope->instoffset
          • Moddb-mod-badguy
          • Elab-modinsts-nodups-p
          • Wirelist-nodups-p
          • Nat-list-max
          • Modscope->modidx
          • Elab-mod-wiresearch-next-smartp
          • Elab-mod$a->totalwires
          • Elab-mod$a->totalinsts
          • Elab-mod$a->orig-mod
          • Elab-mod$a->name
          • Elab-mod$a-nwires
          • Elab-mod$a-ninsts
          • Elab-modinst$c-fix
          • Elab-mod-fix
          • Create-elab-mod$a
          • Pathlist
          • Module->db
          • Elab-modlist
          • Elab-modinst-list
          • Nrec-list-mods
          • Moddb->nmods
          • Nrec-list
          • Nrec
        • Elab-mod
        • Moddb-path->wireidx/decl
        • Moddb-wireidx->path/decl
        • Moddb-path->wireidx
        • Moddb-address->wireidx
        • Moddb-address->wiredecl
        • Moddb-wireidx->path
        • Modscope-okp
      • Svmods
      • Svstmt
      • Sv-tutorial
      • Expressions
      • Symbolic-test-vector
      • Vl-to-svex
    • Vwsim
    • Fgl
    • Vl
    • X86isa
    • Svl
    • Rtl
  • Software-verification
  • Math
  • Testing-utilities

• Moddb.lisp

Moddb-add-module

Signature

(moddb-add-module elab-mod moddb) → (mv elab-mod moddb)

Arguments

moddb — Guard (moddbp moddb).

Definitions and Theorems

Function: moddb-add-module

(defun moddb-add-module (elab-mod moddb)
 (declare (xargs :stobjs (elab-mod moddb)))
 (declare (xargs :guard (moddbp moddb)))
 (declare
   (xargs
        :guard
        (and (moddb-ok moddb)
             (not (moddb-modname-get-index (elab-mod->name elab-mod)
                                           moddb)))))
 (let ((__function__ 'moddb-add-module))
   (declare (ignorable __function__))
   (b* ((moddb (moddb-maybe-grow moddb)))
     (moddb-add-module1 elab-mod moddb))))

Theorem: moddb-add-module-of-elab-mod$a-fix-elab-mod

(defthm moddb-add-module-of-elab-mod$a-fix-elab-mod
  (equal (moddb-add-module (elab-mod$a-fix elab-mod)
                           moddb)
         (moddb-add-module elab-mod moddb)))

Theorem: moddb-add-module-elab-mod$a-equiv-congruence-on-elab-mod

(defthm moddb-add-module-elab-mod$a-equiv-congruence-on-elab-mod
  (implies (elab-mod$a-equiv elab-mod elab-mod-equiv)
           (equal (moddb-add-module elab-mod moddb)
                  (moddb-add-module elab-mod-equiv moddb)))
  :rule-classes :congruence)

Theorem: moddb-add-module-of-moddb-fix-moddb

(defthm moddb-add-module-of-moddb-fix-moddb
  (equal (moddb-add-module elab-mod (moddb-fix moddb))
         (moddb-add-module elab-mod moddb)))

Theorem: moddb-add-module-moddb-equiv-congruence-on-moddb

(defthm moddb-add-module-moddb-equiv-congruence-on-moddb
  (implies (moddb-equiv moddb moddb-equiv)
           (equal (moddb-add-module elab-mod moddb)
                  (moddb-add-module elab-mod moddb-equiv)))
  :rule-classes :congruence)