Hiding an event in an encapsulation or book
Examples: (local (defthm hack1 (implies (and (acl2-numberp x) (acl2-numberp y) (equal (* x y) 1)) (equal y (/ x))))) (local (defun double-naturals-induction (a b) (cond ((and (integerp a) (integerp b) (< 0 a) (< 0 b)) (double-naturals-induction (1- a) (1- b))) (t (list a b))))) General Form: (local ev)
where
Note that events that change the default defun-mode, and in
fact any events that set the ACL2-defaults-table, are
disallowed inside the scope of