• Top
    • Documentation
    • Books
    • Boolean-reasoning
    • Projects
    • Debugging
    • Std
      • Std/lists
      • Std/alists
      • Obags
      • Std/util
      • Std/strings
      • Std/osets
      • Std/io
      • Std/basic
      • Std/system
        • Fresh-logical-name-with-$s-suffix
        • Irrelevant-formals-info
        • Std/system/function-queries
        • Std/system/term-queries
        • Std/system/term-transformations
        • Std/system/enhanced-utilities
        • Install-not-normalized-event
        • Install-not-normalized-event-lst
        • Std/system/term-function-recognizers
        • Genvar$
        • Std/system/event-name-queries
        • Pseudo-tests-and-call-listp
        • Maybe-pseudo-event-formp
        • Add-suffix-to-fn-or-const
        • Chk-irrelevant-formals-ok
        • Table-alist+
        • Pseudo-tests-and-callp
        • Add-suffix-to-fn-or-const-lst
        • Known-packages+
        • Add-suffix-to-fn-lst
        • Unquote-term
        • Event-landmark-names
        • Add-suffix-lst
        • Std/system/theorem-queries
          • Thm-formula
            • Classes+
            • Thm-formula+
            • Guard-verified-p+
            • Guard-verified-p
            • Classes
          • Unquote-term-list
          • Std/system/macro-queries
          • Pseudo-command-landmark-listp
          • Install-not-normalized$
          • Pseudo-event-landmark-listp
          • Known-packages
          • Std/system/partition-rest-and-keyword-args
          • Rune-enabledp
          • Rune-disabledp
          • Included-books
          • Std/system/pseudo-event-formp
          • Std/system/plist-worldp-with-formals
          • Std/system/w
          • Std/system/geprops
          • Std/system/arglistp
          • Std/system/constant-queries
        • Std/typed-lists
        • Std/bitsets
        • Std/testing
        • Std/typed-alists
        • Std/stobjs
      • Community
      • Proof-automation
      • ACL2
      • Macro-libraries
      • Interfacing-tools
      • Hardware-verification
      • Software-verification
      • Math
      • Testing-utilities
    • Std/system/theorem-queries

    Thm-formula

    Formula of a named theorem.

    Signature
    (thm-formula thm wrld) → formula
    Arguments
    thm — Guard (symbolp thm).
    wrld — Guard (plist-worldp wrld).
    Returns
    formula — A pseudo-termp.

    This is a specialization of formula to named theorems, for which the second argument of formula is immaterial. Since formula is in program mode only because of the code that handles the cases in which the first argument is not the name of a theorem, we avoid calling formula and instead replicate the code that handles the case in which the first argument is the name of a theorem; thus, this utility is in logic mode and guard-verified.

    See thm-formula+ for an enhanced variant of this utility.

    Definitions and Theorems

    Function: thm-formula

    (defun thm-formula (thm wrld)
      (declare (xargs :guard (and (symbolp thm)
                                  (plist-worldp wrld))))
      (let ((__function__ 'thm-formula))
        (declare (ignorable __function__))
        (getpropc thm 'theorem nil wrld)))