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