Access fast property lists
General form: (getpropc symb key &optional default world-alist)
where
Macro:
(defmacro getpropc (symb key &optional default (world-alist '(w state))) (cons 'getprop (cons symb (cons key (cons default (cons ''current-acl2-world (cons world-alist 'nil)))))))