Filtering...

function-symbol-listp-tests

books/std/system/function-symbol-listp-tests

Included Books

function-symbol-listp assert-bang must-succeed-star
other
(in-package "ACL2")
include-book
(include-book "function-symbol-listp")
include-book
(include-book "std/testing/assert-bang" :dir :system)
include-book
(include-book "std/testing/must-succeed-star" :dir :system)
other
(assert! (function-symbol-listp nil (w state)))
other
(assert! (function-symbol-listp '(len cons atom) (w state)))
other
(assert! (not (function-symbol-listp '(len cons aaaaatom) (w state))))
other
(must-succeed* (defun f (x) x)
  (defun g (x) x)
  (assert! (function-symbol-listp '(f g g) (w state))))