Build the Java primitive type
(jtype-double) → type
Function:
(defun jtype-double nil (declare (xargs :guard t)) (let ((__function__ 'jtype-double)) (declare (ignorable __function__)) (jtype-prim (primitive-type-double))))
Theorem:
(defthm jtypep-of-jtype-double (b* ((type (jtype-double))) (jtypep type)) :rule-classes :rewrite)