• Top
    • Documentation
    • Books
    • Boolean-reasoning
    • Projects
    • Debugging
    • Std
    • Proof-automation
    • Macro-libraries
      • B*
      • Defunc
      • Fty
      • Apt
      • Std/util
      • Defdata
      • Defrstobj
      • Seq
      • Match-tree
      • Defrstobj
      • With-supporters
      • Def-partial-measure
      • Template-subst
      • Soft
        • Soft-future-work
        • Soft-macros
        • Updates-to-workshop-material
        • Soft-implementation
          • Soft-implementation-core
          • Gen-macro2-of-macro
          • Defun-inst-implementation
          • Defthm-inst-implementation
            • Defthm-inst-fn
            • Check-sothm-inst
              • Show-defthm-inst
              • Defthm-inst-macro-definition
            • Defsoft-implementation
            • Defunvar-implementation
            • Defund-sk2-implementation
            • Defun-sk2-implementation
            • Define-sk2-implementation
            • Defchoose2-implementation
            • Defund2-implementation
            • Defun2-implementation
            • Define2-implementation
          • Soft-notions
        • Defthm-domain
        • Event-macros
        • Def-universal-equiv
        • Def-saved-obligs
        • With-supporters-after
        • Definec
        • Sig
        • Outer-local
        • Data-structures
      • ACL2
      • Interfacing-tools
      • Hardware-verification
      • Software-verification
      • Math
      • Testing-utilities
    • Defthm-inst-implementation

    Check-sothm-inst

    Recognize designations of instances of second-order theorems.

    Signature
    (check-sothm-inst sothm-inst wrld) → yes/no
    Arguments
    wrld — Guard (plist-worldp wrld).
    Returns
    yes/no — A booleanp.

    A designation of an instance of a second-order theorem has the form (sothm (f1 . g1) ... (fM . gM)), where sothm is a second-order theorem and ((f1 . g1) ... (fM . gM)) is an instantiation. These designations are used in defthm-inst.

    Definitions and Theorems

    Function: check-sothm-inst

    (defun check-sothm-inst (sothm-inst wrld)
      (declare (xargs :guard (plist-worldp wrld)))
      (let ((__function__ 'check-sothm-inst))
        (declare (ignorable __function__))
        (and (true-listp sothm-inst)
             (>= (len sothm-inst) 2)
             (sothmp (car sothm-inst) wrld)
             (funvar-instp (cdr sothm-inst) wrld))))