Build a Java expression consisting of a floating-point literal.
Function:
(defun jexpr-literal-floating (value) (declare (xargs :guard (natp value))) (let ((__function__ 'jexpr-literal-floating)) (declare (ignorable __function__)) (jexpr-literal (jliteral-floating value))))
Theorem:
(defthm jexprp-of-jexpr-literal-floating (b* ((expr (jexpr-literal-floating value))) (jexprp expr)) :rule-classes :rewrite)