An irrelevant file set.
(irr-fileset) → acl2::irr
This can be used as a dummy value of the type.
Function:
(defun irr-fileset nil (declare (xargs :guard t)) (let ((__function__ 'irr-fileset)) (declare (ignorable __function__)) (make-fileset :path-wo-ext "" :dot-h nil :dot-c (irr-file))))
Theorem:
(defthm filesetp-of-irr-fileset (b* ((acl2::irr (irr-fileset))) (filesetp acl2::irr)) :rule-classes :rewrite)