Recognize second-order theorems.
(sothmp sothm wrld) → yes/no
A theorem is second-order iff it depends on one or more function variables.
Function:
(defun sothmp (sothm wrld) (declare (xargs :guard (and (symbolp sothm) (plist-worldp wrld)))) (let ((__function__ 'sothmp)) (declare (ignorable __function__)) (not (null (funvars-of-thm sothm wrld)))))