• Top
    • Documentation
    • Books
    • Boolean-reasoning
    • Projects
      • Apt
      • Zfc
      • Acre
      • Milawa
      • Smtlink
      • Abnf
      • Vwsim
      • Isar
      • Pfcs
      • Wp-gen
      • Dimacs-reader
      • Legacy-defrstobj
      • Proof-checker-array
      • Soft
      • C
      • Farray
      • Rp-rewriter
      • Instant-runoff-voting
      • Imp-language
      • Sidekick
      • Leftist-trees
      • Java
      • Taspi
      • Riscv
      • Bitcoin
      • Des
      • Ethereum
      • X86isa
      • Sha-2
      • Yul
        • Transformations
          • Renaming-variables
            • Statements/blocks/cases/fundefs-renamevar
            • Renaming-variables-execution
            • Expressions-renamevar
            • Add-var-to-var-renaming
            • Add-vars-to-var-renaming
            • Renaming-variables-safety
              • Renaming-variables-statements/blocks/cases/fundefs-safety
              • Renaming-variables-expression-safety
              • Theorems-about-function-tables-and-variable-renaming
              • Varset-old
                • Varset-new
                • Varset-old/new-of-add-var/vars-to-var-renaming
                • Check-safe-path/paths-when-path/paths-renamevar
                • Add-var/vars-not-error-when-add-var/vars-to-var-renaming
                • Check-var-when-var-renamevar
              • Fundef-list-renamevar
              • Expression-option-renamevar
              • Funcall-option-renamevar
              • Path-list-renamevar
              • Var-list-renamevar
              • Var-renamevar
              • Path-renamevar
            • Dead-code-eliminator
            • Renamings
            • Disambiguator
            • Unique-variables
            • Dead-code-eliminator-static-safety
            • No-function-definitions
            • Unique-functions
            • Renaming-functions
            • Dead-code-eliminator-no-loop-initializers
            • Dead-code-eliminator-no-function-definitions
            • No-loop-initializers
            • For-loop-init-rewriter
          • Language
          • Yul-json
        • Zcash
        • Proof-checker-itp13
        • Regex
        • ACL2-programming-language
        • Json
        • Jfkr
        • Equational
        • Cryptography
        • Poseidon
        • Where-do-i-place-my-book
        • Axe
        • Aleo
        • Bigmems
        • Builtins
        • Execloader
        • Solidity
        • Paco
        • Concurrent-programs
        • Bls12-377-curves
      • Debugging
      • Std
      • Community
      • Proof-automation
      • ACL2
      • Macro-libraries
      • Interfacing-tools
      • Hardware-verification
      • Software-verification
      • Math
      • Testing-utilities
    • Renaming-variables-safety

    Varset-old

    Variables in scope for the old code in variable renaming.

    Signature
    (varset-old ren) → varset
    Arguments
    ren — Guard (renamingp ren).
    Returns
    varset — Type (identifier-setp varset).

    This explicates the fact that, as mentioned in renaming-variables, the keys of a renaming alist are the variables in scope for the old code.

    Also see varset-new.

    Definitions and Theorems

    Function: varset-old

    (defun varset-old (ren)
      (declare (xargs :guard (renamingp ren)))
      (let ((__function__ 'varset-old))
        (declare (ignorable __function__))
        (mergesort (strip-cars (renaming->list ren)))))

    Theorem: identifier-setp-of-varset-old

    (defthm identifier-setp-of-varset-old
      (b* ((varset (varset-old ren)))
        (identifier-setp varset))
      :rule-classes :rewrite)

    Theorem: varset-old-of-renaming-fix-ren

    (defthm varset-old-of-renaming-fix-ren
      (equal (varset-old (renaming-fix ren))
             (varset-old ren)))

    Theorem: varset-old-renaming-equiv-congruence-on-ren

    (defthm varset-old-renaming-equiv-congruence-on-ren
      (implies (renaming-equiv ren ren-equiv)
               (equal (varset-old ren)
                      (varset-old ren-equiv)))
      :rule-classes :congruence)