oct-cvs
Threads by month
- ----- 2025 -----
- May
- April
- March
- February
- January
- ----- 2024 -----
- December
- November
- October
- September
- August
- July
- June
- May
- April
- March
- February
- January
- ----- 2023 -----
- December
- November
- October
- September
- August
- July
- June
- May
- April
- March
- February
- January
- ----- 2022 -----
- December
- November
- October
- September
- August
- July
- June
- May
- April
- March
- February
- January
- ----- 2021 -----
- December
- November
- October
- September
- August
- July
- June
- May
- April
- March
- February
- January
- ----- 2020 -----
- December
- November
- October
- September
- August
- July
- June
- May
- April
- March
- February
- January
- ----- 2019 -----
- December
- November
- October
- September
- August
- July
- June
- May
- April
- March
- February
- January
- ----- 2018 -----
- December
- November
- October
- September
- August
- July
- June
- May
- April
- March
- February
- January
- ----- 2017 -----
- December
- November
- October
- September
- August
- July
- June
- May
- April
- March
- February
- January
- ----- 2016 -----
- December
- November
- October
- September
- August
- July
- June
- May
- April
- March
- February
- January
- ----- 2015 -----
- December
- November
- October
- September
- August
- July
- June
- May
- April
- March
- February
- January
- ----- 2014 -----
- December
- November
- October
- September
- August
- July
- June
- May
- April
- March
- February
- January
- ----- 2013 -----
- December
- November
- October
- September
- August
- July
- June
- May
- April
- March
- February
- January
- ----- 2012 -----
- December
- November
- October
- September
- August
- July
- June
- May
- April
- March
- February
- January
- ----- 2011 -----
- December
- November
- October
- September
- August
- July
- June
- May
- April
- March
- February
- January
- ----- 2010 -----
- December
- November
- October
- September
- August
- July
- June
- May
- April
- March
- February
- January
- ----- 2009 -----
- December
- November
- October
- September
- August
- July
- June
- May
- April
- March
- February
- January
- ----- 2008 -----
- December
- November
- October
- September
- August
- July
- June
- May
- April
- March
- February
- January
- ----- 2007 -----
- December
- November
- October
- September
- August
- 202 discussions
[oct-git]OCT: A portable Lisp implementation for quad-double precision floats branch master updated. 94d15953c5116999ac15377515b6c7e5ae430ea7
by rtoy＠common-lisp.net 08 Apr '15
by rtoy＠common-lisp.net 08 Apr '15
08 Apr '15
This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "OCT: A portable Lisp implementation for quad-double precision floats".
The branch, master has been updated
via 94d15953c5116999ac15377515b6c7e5ae430ea7 (commit)
from de65a54b545af76b6df16f3de36e54763ce97235 (commit)
Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we list those
revisions in full, below.
- Log -----------------------------------------------------------------
commit 94d15953c5116999ac15377515b6c7e5ae430ea7
Author: Raymond Toy <toy.raymond(a)gmail.com>
Date: Thu Apr 25 20:11:27 2013 -0700
Add continued fractions for erf, erfc, w and Dawson's integral.
qd-gamma.lisp::
Add continued fractions
rt-tests.lisp::
Add a test for erfc
diff --git a/qd-gamma.lisp b/qd-gamma.lisp
index 40a45eb..11e9822 100644
--- a/qd-gamma.lisp
+++ b/qd-gamma.lisp
@@ -275,6 +275,107 @@
#'(lambda (n)
(* 4 n z2)))))))
+;; From Cuyt
+;;
+;; sqrt(%pi)*z*exp(z^2)*erf(z) = K
+;;
+;; where K is the continued fraction with terms F[m]*z^2/(1 + G[m]*z^2)
+;; with F[1] = 2 and F[m] = 4*(m-1)/(2*m-3)/(2*m-1) and G[m] = -2/(2*m-1)
+;;
+(defun cf-erf (z)
+ (let ((z2 (* z z)))
+ (* (/ (exp (- z2))
+ (sqrt (float-pi z))
+ z)
+ (lentz #'(lambda (n)
+ (if (zerop n)
+ (float 0 (realpart z))
+ (1+ (/ (* -2 z2)
+ (+ n n -1)))))
+ #'(lambda (n)
+ (if (= n 1)
+ (* 2 z2)
+ (/ (* z2 4 (- n 1))
+ (* (+ n n -3) (+ n n -1)))))))))
+
+;; From the above, we also have Dawson's integral:
+;;
+;; exp(-z^-2)*integrate(exp(t^2), t, 0, z) = %i*sqrt(%pi)/2*exp(-z^2)*erf(-%i*z);
+;;
+;; -2*z*exp(-z^2)*integrate(exp(t^2), t, 0, z) = K
+;;
+;; with K = -F[m)*z^2/(1 - G[m]*z^2), where F[m] and G[m] are as above.
+;;
+;; Also erf(-%i*z) = dawson(z) * 2*exp(-z^2)/(*%i*sqrt(%pi))
+(defun cf-dawson (z)
+ (let ((z2 (* z z)))
+ (/ (lentz #'(lambda (n)
+ (if (zerop n)
+ (float 0 (realpart z))
+ (- 1 (/ (* -2 z2)
+ (+ n n -1)))))
+ #'(lambda (n)
+ (if (= n 1)
+ (* -2 z2)
+ (/ (* z2 -4 (- n 1))
+ (* (+ n n -3) (+ n n -1))))))
+ (* -2 z))))
+
+;; erfc(z) = z/sqrt(%pi)*exp(-z^2)*K
+;;
+;; where K is the continued fraction with a[1] = 1, a[m] = (m-1)/2,
+;; for m >= 2 and b[0] = 0, b[2*m+1] = z^2, b[2*m] = 1.
+;;
+;; This is valid only if Re(z) > 0.
+
+(defun cf-erfc (z)
+ (let ((z2 (* z z))
+ (zero (float 0 (realpart z)))
+ (one (float 1 (realpart z))))
+ (* (exp (- z2))
+ z
+ (/ (sqrt (float-pi (realpart z))))
+ (lentz #'(lambda (n)
+ (if (zerop n)
+ zero
+ (if (evenp n)
+ one
+ z2)))
+ #'(lambda (n)
+ (if (= n 1)
+ one
+ (/ (- n 1) 2)))))))
+
+;; w(z) = exp(-z^2)*erfc(-%i*z)
+;;
+;; = -%i*z/sqrt(%pi)*K
+;;
+;; where K is the continued fraction with a[n] the same as for erfc
+;; and b[0] = 0, b[2*m+1] = -z^2, b[2*m] = 1.
+;;
+;; This is valid only if Im(z) > 0. We can use the following
+;; identities:
+;;
+;; w(-z) = 2*exp(-z^2) - w(z)
+;; w(conj(z)) = conj(w(-z))
+
+(defun cf-w (z)
+ (let ((z2 (* z z))
+ (zero (float 0 (realpart z)))
+ (one (float 1 (realpart z))))
+ (* #c(0 -1)
+ z
+ (/ (sqrt (float-pi (realpart z))))
+ (lentz #'(lambda (n)
+ (if (zerop n)
+ zero
+ (if (evenp n)
+ one
+ (- z2))))
+ #'(lambda (n)
+ (if (= n 1)
+ one
+ (/ (- n 1) 2)))))))
;; Tail of the incomplete gamma function:
;; integrate(x^(a-1)*exp(-x), x, z, inf)
;;
diff --git a/rt-tests.lisp b/rt-tests.lisp
index af1d00c..caf568f 100644
--- a/rt-tests.lisp
+++ b/rt-tests.lisp
@@ -1729,3 +1729,8 @@
when result
append (list (list (list k x) result)))
nil)
+
+(rt:deftest erfc
+ (check-accuracy 210 (erfc #q-4)
+ #q1.9999999845827420997199811478403265131159514278547464108088316570950057869589732)
+ nil)
-----------------------------------------------------------------------
Summary of changes:
qd-gamma.lisp | 101 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++
rt-tests.lisp | 5 +++
2 files changed, 106 insertions(+)
hooks/post-receive
--
OCT: A portable Lisp implementation for quad-double precision floats
1
0
[oct-git]OCT: A portable Lisp implementation for quad-double precision floats branch master updated. 6e6d810e0e1e9064dba180f758cad56a31877f1f
by rtoy＠common-lisp.net 08 Apr '15
by rtoy＠common-lisp.net 08 Apr '15
08 Apr '15
This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "OCT: A portable Lisp implementation for quad-double precision floats".
The branch, master has been updated
via 6e6d810e0e1e9064dba180f758cad56a31877f1f (commit)
from 6127a79e0d6300bc7ac7754190fbd559d00e7401 (commit)
Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we list those
revisions in full, below.
- Log -----------------------------------------------------------------
commit 6e6d810e0e1e9064dba180f758cad56a31877f1f
Author: Raymond Toy <rtoy(a)google.com>
Date: Sun Nov 24 20:11:29 2013 -0800
Update the version.
diff --git a/oct.asd b/oct.asd
index 10cf0f9..1611fa8 100644
--- a/oct.asd
+++ b/oct.asd
@@ -36,7 +36,7 @@
:author "Raymond Toy"
:maintainer "See <http://www.common-lisp.net/project/oct>"
:licence "MIT"
- :version "2011.12.05" ; Just use the date
+ :version "2013.11.24" ; Just use the date
:components
((:file "qd-package")
(:file "qd-rep" :depends-on ("qd-package"))
-----------------------------------------------------------------------
Summary of changes:
oct.asd | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
hooks/post-receive
--
OCT: A portable Lisp implementation for quad-double precision floats
1
0
[oct-git]OCT: A portable Lisp implementation for quad-double precision floats branch master updated. 0a607f3a6a6297597ae2a6c9896844803d42a6d9
by rtoy＠common-lisp.net 08 Apr '15
by rtoy＠common-lisp.net 08 Apr '15
08 Apr '15
This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "OCT: A portable Lisp implementation for quad-double precision floats".
The branch, master has been updated
via 0a607f3a6a6297597ae2a6c9896844803d42a6d9 (commit)
via 793166a087afffde87c6d12a509069316884fd44 (commit)
via 4d09f5a39889e782bef99e2dda6d0d38327fa9f4 (commit)
via b9a21f1f536aec53c186e4a8d40d75f9d6918bb1 (commit)
from 3c136f7ca5106ab99c95ffbc18a2b8c70d007342 (commit)
Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we list those
revisions in full, below.
- Log -----------------------------------------------------------------
commit 0a607f3a6a6297597ae2a6c9896844803d42a6d9
Author: Raymond Toy <toy.raymond(a)gmail.com>
Date: Tue Nov 26 09:55:46 2013 -0800
Switch to using atan-qd/taylor as the default atan implementation.
qd-fun.lisp:
o Use atan-qd/taylor and atan2-qd/taylor as the atan-qd and atan2-qd
implementation.
o Fix bug in atan-qd/taylor. We need a special case for x small where
we don't want to use the table. (Found by our rt-test. Yay!)
rt-tests.lisp:
o Add comment for oct.atan.4 for why it works.
diff --git a/qd-fun.lisp b/qd-fun.lisp
index 9564dcc..207a51b 100644
--- a/qd-fun.lisp
+++ b/qd-fun.lisp
@@ -1188,7 +1188,10 @@ is the cosine of A"
;; atan(x) = pi/2-atan(1/x), for x > 1
(sub-qd +qd-pi/2+
(atan-qd/taylor (div-qd +qd-one+ y))))
+ ((qd-<= y (aref octi::+qd-atan-partition+ 0))
+ (atan-taylor y))
(t
+ ;; The general case where the table is needed.
(let* ((i (find-atan-partition y))
(atan-xi (mul-qd +qd-pi/2+
(rational-to-qd (/ (1- (+ i 2))
@@ -1244,6 +1247,8 @@ is the cosine of A"
(neg-qd +qd-pi/4+))))
(let ((arg (atan-qd/taylor (div-qd y (abs-qd x)))))
+ ;; arg = atan2(y,|x|), so |arg| <= pi/2. Handle the case when x
+ ;; is negative.
(cond ((minusp-qd x)
(if (minusp-qd y)
(- (neg-qd +qd-pi+) arg)
@@ -1254,12 +1259,12 @@ is the cosine of A"
(defun atan2-qd (y x)
"atan2(y, x) = atan(y/x), but carefully handling the quadrant"
(declare (type %quad-double y x))
- (atan2-qd/newton y x))
+ (atan2-qd/taylor y x))
(defun atan-qd (y)
"Return the arc tangent of the %QUAD-DOUBLE number Y"
(declare (type %quad-double y))
- (atan-qd/newton y))
+ (atan-qd/taylor y))
(defun asin-qd (a)
"Return the arc sine of the %QUAD-DOUBLE number A"
diff --git a/rt-tests.lisp b/rt-tests.lisp
index 69f6ee7..289131e 100644
--- a/rt-tests.lisp
+++ b/rt-tests.lisp
@@ -222,6 +222,9 @@
nil)
(rt:deftest oct.atan.4
+ ;; We know atan(10^100) is pi/2 because atan(10^100) =
+ ;; pi/2-atan(10^-100) and atan(10^-100) is approx 10^-100, which
+ ;; is too small to affect pi/2.
(let* ((arg #q1q100)
(y (/ (atan arg) +pi+))
(true #q.5))
commit 793166a087afffde87c6d12a509069316884fd44
Author: Raymond Toy <toy.raymond(a)gmail.com>
Date: Tue Nov 26 09:36:02 2013 -0800
Reduce size of the atan partition and node tables by half.
qd-const.lisp:
o Update tables and generator to use tables with only half as many
entries as before. This is because atan-qd/taylor never needs to
compute directly for x > 1.
qd-fun.lisp:
o Use table length for binary search, so we're independent of other
constants.
o Remove FIXME.
diff --git a/qd-const.lisp b/qd-const.lisp
index 98c5ac9..f3a5bdc 100644
--- a/qd-const.lisp
+++ b/qd-const.lisp
@@ -3770,10 +3770,15 @@
;;
;; tan((2*k + 3)*pi/(4*s))
;;
-;; for k = 0, 1, ..., s, where s is the table size,
+;; for k = 0, 1, ..., s, where s is the partition size,
;; +qd-atan-partition-size+.
+;;
+;; This table, however only contains values up to k = s/2. The
+;; algorith for atan-qd/taylor uses the relationship atan(x) =
+;; pi/2-atan(1/x) for x > 1, so we never need to compute directly
+;; atan(x) for x > 1.
(defconstant +qd-atan-partition+
- (make-array +qd-atan-partition-size+ :initial-contents
+ (make-array (/ +qd-atan-partition-size+ 2) :initial-contents
(list
(multiple-value-bind (q0 q1 q2 q3)
(renorm-5 (scale-float (float 5305687677623182 1.0d0) -61)
@@ -7358,10766 +7363,3601 @@
(scale-float (float -8606500254519528 1.0d0) -165)
(scale-float (float -6855951617059037 1.0d0) -223)
(scale-float (float 7929633697693696 1.0d0) -277))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4524372768344304 1.0d0) -52)
- (scale-float (float 8317904890851914 1.0d0) -107)
- (scale-float (float 8594750619195149 1.0d0) -166)
- (scale-float (float -7306789725115964 1.0d0) -220)
- (scale-float (float -8574773586034688 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4538274952087405 1.0d0) -52)
- (scale-float (float 8326257921126996 1.0d0) -106)
- (scale-float (float -6022210771707739 1.0d0) -162)
- (scale-float (float -4520561563519313 1.0d0) -216)
- (scale-float (float 7859974008373248 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
+ (%make-qd-d q0 q1 q2 q3)))))
+
+;; This is the set of evaluation nodes for the atan table. The table contains
+;;
+;; tan((2*k + 2)*pi/(4*s))
+;;
+;; for k = 0, 1, ..., s, where s is the partition size,
+;; +qd-atan-partition-size+.
+;;
+;; As explained in +qd-atan-partition+, we only store values up to k =
+;; s/2.
+(defconstant +qd-atan-nodes+
+ (make-array (/ +qd-atan-partition-size+ 2) :initial-contents
+ (list
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4552220182163332 1.0d0) -52)
- (scale-float (float -7688418407588221 1.0d0) -113)
- (scale-float (float 6056179036562030 1.0d0) -167)
- (scale-float (float 4940221467301023 1.0d0) -222)
- (scale-float (float -4749127669776384 1.0d0) -276))
+ (renorm-5 (scale-float (float 7074243300823009 1.0d0) -62)
+ (scale-float (float 6767281937885683 1.0d0) -116)
+ (scale-float (float 6495058557496386 1.0d0) -172)
+ (scale-float (float 5247049684764422 1.0d0) -226)
+ (scale-float (float -5541122207547392 1.0d0) -280))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4566208724748110 1.0d0) -52)
- (scale-float (float 6076277320393968 1.0d0) -108)
- (scale-float (float 7876705740801642 1.0d0) -162)
- (scale-float (float -6201281096292325 1.0d0) -218)
- (scale-float (float 6268449461895168 1.0d0) -272))
+ (renorm-5 (scale-float (float 7074259947269390 1.0d0) -61)
+ (scale-float (float -7016692485563189 1.0d0) -116)
+ (scale-float (float 7360987505494805 1.0d0) -170)
+ (scale-float (float 7711403976890054 1.0d0) -224)
+ (scale-float (float 7755379282149376 1.0d0) -278))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4580240848082718 1.0d0) -52)
- (scale-float (float 8179344656213134 1.0d0) -106)
- (scale-float (float 8263941875504708 1.0d0) -160)
- (scale-float (float -4889725374845191 1.0d0) -214)
- (scale-float (float -8473860704370688 1.0d0) -271))
+ (renorm-5 (scale-float (float 5305715768666702 1.0d0) -60)
+ (scale-float (float 8471749856458935 1.0d0) -117)
+ (scale-float (float -8118241448508008 1.0d0) -173)
+ (scale-float (float 5553785129213244 1.0d0) -228)
+ (scale-float (float 7351462873006080 1.0d0) -282))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4594316822493616 1.0d0) -52)
- (scale-float (float 7021650685021080 1.0d0) -107)
- (scale-float (float 5593581328329166 1.0d0) -161)
- (scale-float (float -4904011921719053 1.0d0) -217)
- (scale-float (float -5241820563505152 1.0d0) -272))
+ (renorm-5 (scale-float (float 7074326533995023 1.0d0) -60)
+ (scale-float (float -7254034420744410 1.0d0) -115)
+ (scale-float (float 6401434372892788 1.0d0) -170)
+ (scale-float (float -7987115629600412 1.0d0) -231)
+ (scale-float (float 7048491884871680 1.0d0) -285))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4608436920413514 1.0d0) -52)
- (scale-float (float 6181796558444830 1.0d0) -106)
- (scale-float (float 7403778107152819 1.0d0) -160)
- (scale-float (float -8414786340930895 1.0d0) -215)
- (scale-float (float -5307068381282304 1.0d0) -269))
+ (renorm-5 (scale-float (float 8842970593782984 1.0d0) -60)
+ (scale-float (float -5691728595114215 1.0d0) -114)
+ (scale-float (float 8352032547859414 1.0d0) -177)
+ (scale-float (float 8515194392491862 1.0d0) -232)
+ (scale-float (float -8285511068155904 1.0d0) -288))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4622601416402395 1.0d0) -52)
- (scale-float (float -7834869622036172 1.0d0) -106)
- (scale-float (float -7307397629585693 1.0d0) -163)
- (scale-float (float -6569063674381729 1.0d0) -217)
- (scale-float (float 6809893652660224 1.0d0) -275))
+ (renorm-5 (scale-float (float 5305828136410355 1.0d0) -59)
+ (scale-float (float 5670480622612706 1.0d0) -113)
+ (scale-float (float 8424458586146156 1.0d0) -167)
+ (scale-float (float 7325110716144970 1.0d0) -221)
+ (scale-float (float 7901715692986368 1.0d0) -275))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4636810587168778 1.0d0) -52)
- (scale-float (float 6830096924257010 1.0d0) -106)
- (scale-float (float -5427308353430949 1.0d0) -161)
- (scale-float (float -7802984689345102 1.0d0) -215)
- (scale-float (float -8927666695487488 1.0d0) -269))
+ (renorm-5 (scale-float (float 6190195948340938 1.0d0) -59)
+ (scale-float (float -8802172611714431 1.0d0) -115)
+ (scale-float (float 5293066366625524 1.0d0) -169)
+ (scale-float (float -4725513813851070 1.0d0) -226)
+ (scale-float (float -6881914124238848 1.0d0) -282))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4651064711591250 1.0d0) -52)
- (scale-float (float 7512911659394497 1.0d0) -106)
- (scale-float (float -7385896910854919 1.0d0) -160)
- (scale-float (float 8925595323455295 1.0d0) -215)
- (scale-float (float -6393790348148736 1.0d0) -269))
+ (renorm-5 (scale-float (float 7074592895940238 1.0d0) -59)
+ (scale-float (float -7386148682932407 1.0d0) -114)
+ (scale-float (float 8663989822896143 1.0d0) -168)
+ (scale-float (float 5638497460170841 1.0d0) -222)
+ (scale-float (float -7881181893361664 1.0d0) -276))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4665364070740239 1.0d0) -52)
- (scale-float (float 5007334232109639 1.0d0) -106)
- (scale-float (float -8840477727548287 1.0d0) -161)
- (scale-float (float 4629730203101687 1.0d0) -215)
- (scale-float (float 5853079094755328 1.0d0) -269))
+ (renorm-5 (scale-float (float 7959023143013823 1.0d0) -59)
+ (scale-float (float 8019805402879802 1.0d0) -113)
+ (scale-float (float -6336817275823725 1.0d0) -167)
+ (scale-float (float -7504315909577047 1.0d0) -222)
+ (scale-float (float -7001531428110336 1.0d0) -276))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4679708947900060 1.0d0) -52)
- (scale-float (float -7421817048839393 1.0d0) -106)
- (scale-float (float 8881478316442419 1.0d0) -160)
- (scale-float (float -7295139224947122 1.0d0) -219)
- (scale-float (float 5839318421602304 1.0d0) -274))
+ (renorm-5 (scale-float (float 8843490853994263 1.0d0) -59)
+ (scale-float (float 6627398283965989 1.0d0) -114)
+ (scale-float (float 6401954222096561 1.0d0) -172)
+ (scale-float (float -8277716072595469 1.0d0) -228)
+ (scale-float (float -6893131865784320 1.0d0) -282))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4694099628591219 1.0d0) -52)
- (scale-float (float -4714668244017924 1.0d0) -108)
- (scale-float (float -7160785211617394 1.0d0) -163)
- (scale-float (float -7124080371647673 1.0d0) -218)
- (scale-float (float 5944547016572928 1.0d0) -272))
+ (renorm-5 (scale-float (float 4864000097009790 1.0d0) -58)
+ (scale-float (float 5300827232027539 1.0d0) -113)
+ (scale-float (float -8233515723229764 1.0d0) -167)
+ (scale-float (float -5661310994722713 1.0d0) -223)
+ (scale-float (float 6190628432248832 1.0d0) -279))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4708536400592993 1.0d0) -52)
- (scale-float (float 7281476218263343 1.0d0) -106)
- (scale-float (float -7567298247391942 1.0d0) -163)
- (scale-float (float 8192080464660650 1.0d0) -219)
- (scale-float (float 5875747071721472 1.0d0) -278))
+ (renorm-5 (scale-float (float 5306277664505868 1.0d0) -58)
+ (scale-float (float 6080680969503448 1.0d0) -114)
+ (scale-float (float 8673453011664433 1.0d0) -168)
+ (scale-float (float 6958169807750707 1.0d0) -225)
+ (scale-float (float -6223760163340288 1.0d0) -279))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4723019553966276 1.0d0) -52)
- (scale-float (float -8775791375353805 1.0d0) -106)
- (scale-float (float 7583102150147494 1.0d0) -160)
- (scale-float (float 8815003366817974 1.0d0) -216)
- (scale-float (float 7267072469368832 1.0d0) -272))
+ (renorm-5 (scale-float (float 5748580212877572 1.0d0) -58)
+ (scale-float (float 7808786237303012 1.0d0) -112)
+ (scale-float (float 4562732201975772 1.0d0) -166)
+ (scale-float (float 7911073594757806 1.0d0) -220)
+ (scale-float (float 7571566118043648 1.0d0) -275))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4737549381076698 1.0d0) -52)
- (scale-float (float 6816018358827065 1.0d0) -106)
- (scale-float (float 6569463977966645 1.0d0) -161)
- (scale-float (float -4595288463441023 1.0d0) -215)
- (scale-float (float 6818627725983744 1.0d0) -270))
+ (renorm-5 (scale-float (float 6190909825987611 1.0d0) -58)
+ (scale-float (float 6947339417361781 1.0d0) -114)
+ (scale-float (float -6195385482223894 1.0d0) -168)
+ (scale-float (float 8660328297735924 1.0d0) -222)
+ (scale-float (float 6834525100834816 1.0d0) -278))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4752126176618040 1.0d0) -52)
- (scale-float (float 6857704915056138 1.0d0) -109)
- (scale-float (float -5972272852499703 1.0d0) -168)
- (scale-float (float -4918156448418907 1.0d0) -222)
- (scale-float (float -8552616313225216 1.0d0) -276))
+ (renorm-5 (scale-float (float 6633268588208486 1.0d0) -58)
+ (scale-float (float 7956908201130860 1.0d0) -113)
+ (scale-float (float 8639872984662784 1.0d0) -168)
+ (scale-float (float 4555947475504659 1.0d0) -222)
+ (scale-float (float 6747999155978240 1.0d0) -277))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4766750237635912 1.0d0) -52)
- (scale-float (float -6708499437719188 1.0d0) -109)
- (scale-float (float 5404138731523196 1.0d0) -165)
- (scale-float (float 7150130184829864 1.0d0) -219)
- (scale-float (float 8731047611072512 1.0d0) -273))
+ (renorm-5 (scale-float (float 7075658584461808 1.0d0) -58)
+ (scale-float (float -4850328405598998 1.0d0) -116)
+ (scale-float (float -8337902916519844 1.0d0) -173)
+ (scale-float (float 7753457006800198 1.0d0) -227)
+ (scale-float (float 8205843736559616 1.0d0) -285))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4781421863551736 1.0d0) -52)
- (scale-float (float -8241281382353791 1.0d0) -106)
- (scale-float (float -5452977649518454 1.0d0) -160)
- (scale-float (float -5311098437373721 1.0d0) -215)
- (scale-float (float -6851081815506944 1.0d0) -269))
+ (renorm-5 (scale-float (float 7518081900257630 1.0d0) -58)
+ (scale-float (float 6453105589292401 1.0d0) -112)
+ (scale-float (float -8397542814379849 1.0d0) -166)
+ (scale-float (float -8199698099635664 1.0d0) -222)
+ (scale-float (float 7114045743267840 1.0d0) -276))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4796141356187011 1.0d0) -52)
- (scale-float (float 6438705586616948 1.0d0) -107)
- (scale-float (float -8740596883780232 1.0d0) -163)
- (scale-float (float 4668321052107958 1.0d0) -217)
- (scale-float (float 8956197122080768 1.0d0) -277))
+ (renorm-5 (scale-float (float 7960540621733810 1.0d0) -58)
+ (scale-float (float 8175303293584134 1.0d0) -112)
+ (scale-float (float -5301580419193644 1.0d0) -167)
+ (scale-float (float 6699977611910940 1.0d0) -222)
+ (scale-float (float 7547565291601920 1.0d0) -277))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4810909019787883 1.0d0) -52)
- (scale-float (float 8939827386391622 1.0d0) -106)
- (scale-float (float -4927081605746216 1.0d0) -160)
- (scale-float (float -5796206272465988 1.0d0) -217)
- (scale-float (float 7410701441171456 1.0d0) -275))
+ (renorm-5 (scale-float (float 8403036835695393 1.0d0) -58)
+ (scale-float (float -5697268423089438 1.0d0) -117)
+ (scale-float (float -6473687143763747 1.0d0) -171)
+ (scale-float (float -8274683920528728 1.0d0) -226)
+ (scale-float (float -5560296672329728 1.0d0) -280))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4825725161050007 1.0d0) -52)
- (scale-float (float 7978699904595670 1.0d0) -106)
- (scale-float (float 5043056517264442 1.0d0) -166)
- (scale-float (float 5944486897923303 1.0d0) -220)
- (scale-float (float 8648547797827584 1.0d0) -275))
+ (renorm-5 (scale-float (float 8845572629654022 1.0d0) -58)
+ (scale-float (float -8912156205912812 1.0d0) -112)
+ (scale-float (float 5882165538473509 1.0d0) -169)
+ (scale-float (float 5764844608194588 1.0d0) -223)
+ (scale-float (float -7830218316185600 1.0d0) -281))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4840590089143719 1.0d0) -52)
- (scale-float (float 5835026127202296 1.0d0) -106)
- (scale-float (float -6090775331742930 1.0d0) -160)
- (scale-float (float 5434019500109520 1.0d0) -214)
- (scale-float (float -7511032646074368 1.0d0) -268))
+ (renorm-5 (scale-float (float 4644075045933689 1.0d0) -57)
+ (scale-float (float -4644840313601368 1.0d0) -113)
+ (scale-float (float 5890558395426862 1.0d0) -169)
+ (scale-float (float 5704484041220075 1.0d0) -223)
+ (scale-float (float 6758937831800832 1.0d0) -277))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4855504115739517 1.0d0) -52)
- (scale-float (float 8219229379643238 1.0d0) -107)
- (scale-float (float -8280528309578644 1.0d0) -165)
- (scale-float (float 6955752537067324 1.0d0) -224)
- (scale-float (float 6973762423488512 1.0d0) -282))
+ (renorm-5 (scale-float (float 4865385655689326 1.0d0) -57)
+ (scale-float (float -5335765408447300 1.0d0) -112)
+ (scale-float (float -7739937159330576 1.0d0) -166)
+ (scale-float (float 5524190817389561 1.0d0) -220)
+ (scale-float (float 8038054959251456 1.0d0) -274))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4870467555033855 1.0d0) -52)
- (scale-float (float 5215081086506637 1.0d0) -106)
- (scale-float (float -8754660302215727 1.0d0) -160)
- (scale-float (float -8665700668756015 1.0d0) -215)
- (scale-float (float 5221191974584320 1.0d0) -270))
+ (renorm-5 (scale-float (float 5086719189028021 1.0d0) -57)
+ (scale-float (float -6684440902714514 1.0d0) -111)
+ (scale-float (float -6219586612898500 1.0d0) -165)
+ (scale-float (float 7622402756168006 1.0d0) -219)
+ (scale-float (float 8609496160927744 1.0d0) -275))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4885480723775256 1.0d0) -52)
- (scale-float (float 5593621396445884 1.0d0) -106)
- (scale-float (float 7000918906137663 1.0d0) -161)
- (scale-float (float 8021672180640724 1.0d0) -215)
- (scale-float (float -6007330252292096 1.0d0) -269))
+ (renorm-5 (scale-float (float 5308076691316144 1.0d0) -57)
+ (scale-float (float -5476938618039988 1.0d0) -111)
+ (scale-float (float -8651596065846501 1.0d0) -165)
+ (scale-float (float -7238720175984380 1.0d0) -219)
+ (scale-float (float 8112961094213632 1.0d0) -273))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4900543941290747 1.0d0) -52)
- (scale-float (float 6290919489352317 1.0d0) -106)
- (scale-float (float 6334905453979755 1.0d0) -160)
- (scale-float (float 6944550348266955 1.0d0) -215)
- (scale-float (float -6469421670465536 1.0d0) -270))
+ (renorm-5 (scale-float (float 5529459208372121 1.0d0) -57)
+ (scale-float (float 7178586049594761 1.0d0) -113)
+ (scale-float (float -6270880689972360 1.0d0) -167)
+ (scale-float (float 7224178711345510 1.0d0) -225)
+ (scale-float (float -8249539170926592 1.0d0) -279))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4915657529512623 1.0d0) -52)
- (scale-float (float -7613066849359035 1.0d0) -109)
- (scale-float (float -5136397204029515 1.0d0) -164)
- (scale-float (float 5560007453778495 1.0d0) -219)
- (scale-float (float -5153490908741632 1.0d0) -273))
+ (renorm-5 (scale-float (float 5750867786486237 1.0d0) -57)
+ (scale-float (float -7441067489181542 1.0d0) -114)
+ (scale-float (float 8230325703168640 1.0d0) -168)
+ (scale-float (float 8318179187665325 1.0d0) -222)
+ (scale-float (float -6836870166085632 1.0d0) -281))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4930821813005541 1.0d0) -52)
- (scale-float (float -8881793026676418 1.0d0) -107)
- (scale-float (float 5504735906988997 1.0d0) -161)
- (scale-float (float 6777093210908856 1.0d0) -215)
- (scale-float (float 6411579100626944 1.0d0) -270))
+ (renorm-5 (scale-float (float 5972303472440455 1.0d0) -57)
+ (scale-float (float -7755066370248110 1.0d0) -112)
+ (scale-float (float 6073039335117040 1.0d0) -166)
+ (scale-float (float 6598469129749717 1.0d0) -220)
+ (scale-float (float 8182194626101248 1.0d0) -275))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4946037118993954 1.0d0) -52)
- (scale-float (float 6826859455969554 1.0d0) -106)
- (scale-float (float -6968865100220813 1.0d0) -161)
- (scale-float (float 5447120854281151 1.0d0) -215)
- (scale-float (float -8912054969221120 1.0d0) -269))
+ (renorm-5 (scale-float (float 6193767313528259 1.0d0) -57)
+ (scale-float (float -5672692450672928 1.0d0) -111)
+ (scale-float (float 7035368426510867 1.0d0) -166)
+ (scale-float (float -5483850293455672 1.0d0) -221)
+ (scale-float (float 6750672895082496 1.0d0) -276))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4961303777389888 1.0d0) -52)
- (scale-float (float 7117061828607587 1.0d0) -106)
- (scale-float (float -5086957522406139 1.0d0) -163)
- (scale-float (float 6059636259898474 1.0d0) -217)
- (scale-float (float -8743060072562688 1.0d0) -274))
+ (renorm-5 (scale-float (float 6415260357574515 1.0d0) -57)
+ (scale-float (float -8093349648279617 1.0d0) -113)
+ (scale-float (float -5567043568932739 1.0d0) -167)
+ (scale-float (float 8262593683581652 1.0d0) -222)
+ (scale-float (float 5987877854511104 1.0d0) -277))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4976622120821060 1.0d0) -52)
- (scale-float (float 8538597454922991 1.0d0) -106)
- (scale-float (float -8991967489309672 1.0d0) -160)
- (scale-float (float 8783978521154163 1.0d0) -215)
- (scale-float (float -8760871855390720 1.0d0) -271))
+ (renorm-5 (scale-float (float 6636783652955355 1.0d0) -57)
+ (scale-float (float -8939754503571771 1.0d0) -112)
+ (scale-float (float 6763825055570294 1.0d0) -173)
+ (scale-float (float 7370014801905638 1.0d0) -228)
+ (scale-float (float -6571133415456768 1.0d0) -282))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4991992484659356 1.0d0) -52)
- (scale-float (float -9006119685025844 1.0d0) -107)
- (scale-float (float 4723688273641999 1.0d0) -163)
- (scale-float (float -6541017641516469 1.0d0) -218)
- (scale-float (float 7075834761838592 1.0d0) -274))
+ (renorm-5 (scale-float (float 6858338248618080 1.0d0) -57)
+ (scale-float (float -5323165169093825 1.0d0) -112)
+ (scale-float (float -6625710419580159 1.0d0) -167)
+ (scale-float (float 7321993919642445 1.0d0) -221)
+ (scale-float (float 6593750164275200 1.0d0) -275))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5007415207049659 1.0d0) -52)
- (scale-float (float -7790026231594742 1.0d0) -106)
- (scale-float (float -5881571118215087 1.0d0) -160)
- (scale-float (float 4704498823319804 1.0d0) -216)
- (scale-float (float 7579919313305600 1.0d0) -270))
+ (renorm-5 (scale-float (float 7079925194101090 1.0d0) -57)
+ (scale-float (float 7558128005262237 1.0d0) -116)
+ (scale-float (float -7104258077067318 1.0d0) -170)
+ (scale-float (float 7325476905488468 1.0d0) -224)
+ (scale-float (float 8620106703699968 1.0d0) -284))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5022890628939047 1.0d0) -52)
- (scale-float (float -4784194655338363 1.0d0) -107)
- (scale-float (float -6722340729519126 1.0d0) -161)
- (scale-float (float 8864327283596236 1.0d0) -215)
- (scale-float (float 7305967402942464 1.0d0) -271))
+ (renorm-5 (scale-float (float 7301545539553835 1.0d0) -57)
+ (scale-float (float 6515484429926459 1.0d0) -113)
+ (scale-float (float -5077845315897347 1.0d0) -170)
+ (scale-float (float -8059832583379898 1.0d0) -224)
+ (scale-float (float -4518954019586048 1.0d0) -279))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5038419094106355 1.0d0) -52)
- (scale-float (float -8095413947525302 1.0d0) -106)
- (scale-float (float 5973898770254795 1.0d0) -161)
- (scale-float (float -8175371115065459 1.0d0) -215)
- (scale-float (float -6448894573412352 1.0d0) -271))
+ (renorm-5 (scale-float (float 7523200335756791 1.0d0) -57)
+ (scale-float (float 5584296786164265 1.0d0) -111)
+ (scale-float (float -6409831813512552 1.0d0) -166)
+ (scale-float (float 8194437483307359 1.0d0) -220)
+ (scale-float (float 7147137294073856 1.0d0) -274))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5054000949192107 1.0d0) -52)
- (scale-float (float 4576622003551932 1.0d0) -106)
- (scale-float (float -6280920038839795 1.0d0) -163)
- (scale-float (float -5964351723445421 1.0d0) -217)
- (scale-float (float -8789617640800256 1.0d0) -271))
+ (renorm-5 (scale-float (float 7744890634141463 1.0d0) -57)
+ (scale-float (float -8013636483429749 1.0d0) -115)
+ (scale-float (float -7102086122091697 1.0d0) -169)
+ (scale-float (float 5858371330382497 1.0d0) -229)
+ (scale-float (float 7437432983126016 1.0d0) -283))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5069636543728837 1.0d0) -52)
- (scale-float (float 7615405559326406 1.0d0) -109)
- (scale-float (float 8915089175933485 1.0d0) -163)
- (scale-float (float -6845584439143439 1.0d0) -218)
- (scale-float (float 6881245024223232 1.0d0) -272))
+ (renorm-5 (scale-float (float 7966617486810410 1.0d0) -57)
+ (scale-float (float 6042537330451191 1.0d0) -111)
+ (scale-float (float 7861008112428726 1.0d0) -165)
+ (scale-float (float -7227916145034998 1.0d0) -224)
+ (scale-float (float 4815727049572352 1.0d0) -281))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5085326230171782 1.0d0) -52)
- (scale-float (float -5188030278619813 1.0d0) -106)
- (scale-float (float -7670667270949476 1.0d0) -160)
- (scale-float (float 5927839957767808 1.0d0) -214)
- (scale-float (float 5047352890245120 1.0d0) -268))
+ (renorm-5 (scale-float (float 8188381946557304 1.0d0) -57)
+ (scale-float (float 8866977047648128 1.0d0) -111)
+ (scale-float (float 7123246995488489 1.0d0) -165)
+ (scale-float (float 7773570145364191 1.0d0) -219)
+ (scale-float (float -6140525153304576 1.0d0) -273))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5101070363929974 1.0d0) -52)
- (scale-float (float 6989089148026713 1.0d0) -107)
- (scale-float (float -7049420810638702 1.0d0) -161)
- (scale-float (float 8297412754210179 1.0d0) -216)
- (scale-float (float 5867720828157952 1.0d0) -270))
+ (renorm-5 (scale-float (float 8410185066887010 1.0d0) -57)
+ (scale-float (float 7763884187722252 1.0d0) -114)
+ (scale-float (float 5307508571918846 1.0d0) -169)
+ (scale-float (float -8886326560828790 1.0d0) -223)
+ (scale-float (float -6979660302254080 1.0d0) -279))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5116869303397728 1.0d0) -52)
- (scale-float (float 8329812992574599 1.0d0) -107)
- (scale-float (float 6377283168321324 1.0d0) -161)
- (scale-float (float 7984586113876115 1.0d0) -215)
- (scale-float (float 5181206205054976 1.0d0) -269))
+ (renorm-5 (scale-float (float 8632027902035696 1.0d0) -57)
+ (scale-float (float 8311501563013986 1.0d0) -111)
+ (scale-float (float -7695719767127804 1.0d0) -167)
+ (scale-float (float 6238683558805043 1.0d0) -221)
+ (scale-float (float -6011991889608704 1.0d0) -276))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5132723409986526 1.0d0) -52)
- (scale-float (float -4674864813782685 1.0d0) -107)
- (scale-float (float -7077980832873344 1.0d0) -161)
- (scale-float (float 5844928677959085 1.0d0) -215)
- (scale-float (float -6429472025395200 1.0d0) -269))
+ (renorm-5 (scale-float (float 8853911506990979 1.0d0) -57)
+ (scale-float (float -4642863164583854 1.0d0) -111)
+ (scale-float (float -5547633297239252 1.0d0) -167)
+ (scale-float (float 7567050221678446 1.0d0) -221)
+ (scale-float (float 8157986184626176 1.0d0) -277))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5148633048157313 1.0d0) -52)
- (scale-float (float -5284173815860955 1.0d0) -112)
- (scale-float (float -6020281412596533 1.0d0) -166)
- (scale-float (float -6243343542943099 1.0d0) -221)
- (scale-float (float -6774776310792192 1.0d0) -275))
+ (renorm-5 (scale-float (float 4537918468756044 1.0d0) -56)
+ (scale-float (float 4820993643217819 1.0d0) -110)
+ (scale-float (float 8930629000360507 1.0d0) -165)
+ (scale-float (float 7087222971126707 1.0d0) -219)
+ (scale-float (float -6627888560996352 1.0d0) -276))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5164598585453209 1.0d0) -52)
- (scale-float (float -8371268565646575 1.0d0) -109)
- (scale-float (float -5928699848938293 1.0d0) -166)
- (scale-float (float -5577546956928573 1.0d0) -220)
- (scale-float (float -5557818044186624 1.0d0) -275))
+ (renorm-5 (scale-float (float 4648902625075038 1.0d0) -56)
+ (scale-float (float 7436320100222489 1.0d0) -112)
+ (scale-float (float -8245691058659380 1.0d0) -168)
+ (scale-float (float 5253602438545476 1.0d0) -222)
+ (scale-float (float 8638593337655296 1.0d0) -280))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5180620392532636 1.0d0) -52)
- (scale-float (float 7458540146606520 1.0d0) -106)
- (scale-float (float -5065483521296945 1.0d0) -165)
- (scale-float (float -6619629262341034 1.0d0) -219)
- (scale-float (float -4634909328539648 1.0d0) -273))
+ (renorm-5 (scale-float (float 4759908751134022 1.0d0) -56)
+ (scale-float (float 7954738707622512 1.0d0) -110)
+ (scale-float (float -6845900842570269 1.0d0) -164)
+ (scale-float (float -5048866407860981 1.0d0) -218)
+ (scale-float (float 5960081798856704 1.0d0) -276))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5196698843202878 1.0d0) -52)
- (scale-float (float 8738885124257553 1.0d0) -110)
- (scale-float (float 7338651146732341 1.0d0) -165)
- (scale-float (float -6809790515043482 1.0d0) -221)
- (scale-float (float 8512275809828864 1.0d0) -275))
+ (renorm-5 (scale-float (float 4870937376030709 1.0d0) -56)
+ (scale-float (float -6900203436031769 1.0d0) -110)
+ (scale-float (float -6557111036885254 1.0d0) -164)
+ (scale-float (float -5242430116227422 1.0d0) -218)
+ (scale-float (float -5246739418636288 1.0d0) -272))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5212834314454066 1.0d0) -52)
- (scale-float (float -5290152464726882 1.0d0) -108)
- (scale-float (float 4644401085980292 1.0d0) -164)
- (scale-float (float -6250563093646647 1.0d0) -220)
- (scale-float (float 7049956235935744 1.0d0) -275))
+ (renorm-5 (scale-float (float 4981989029289118 1.0d0) -56)
+ (scale-float (float -6331714672912233 1.0d0) -112)
+ (scale-float (float 7157065018318002 1.0d0) -166)
+ (scale-float (float 7757486424918243 1.0d0) -222)
+ (scale-float (float -8944385858994176 1.0d0) -277))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5229027186493611 1.0d0) -52)
- (scale-float (float -5954443973126675 1.0d0) -109)
- (scale-float (float -6822110243961435 1.0d0) -163)
- (scale-float (float -8110606359604683 1.0d0) -218)
- (scale-float (float -4629257773907968 1.0d0) -273))
+ (renorm-5 (scale-float (float 5093064240869749 1.0d0) -56)
+ (scale-float (float -8492951271419131 1.0d0) -113)
+ (scale-float (float 8515595824100765 1.0d0) -167)
+ (scale-float (float -5716193829650164 1.0d0) -221)
+ (scale-float (float -5426545241620480 1.0d0) -277))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5245277842781078 1.0d0) -52)
- (scale-float (float 5767491684932488 1.0d0) -107)
- (scale-float (float -7737754426130316 1.0d0) -162)
- (scale-float (float 7499508915059979 1.0d0) -219)
- (scale-float (float 5221957255036928 1.0d0) -273))
+ (renorm-5 (scale-float (float 5204163541179763 1.0d0) -56)
+ (scale-float (float -6235957113790399 1.0d0) -110)
+ (scale-float (float -5174166007511410 1.0d0) -165)
+ (scale-float (float 8611185154120911 1.0d0) -225)
+ (scale-float (float 7736045533659136 1.0d0) -282))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5261586670063515 1.0d0) -52)
- (scale-float (float 8092088342324354 1.0d0) -107)
- (scale-float (float -8078867331127163 1.0d0) -161)
- (scale-float (float -8005642369698191 1.0d0) -215)
- (scale-float (float 8929082156384256 1.0d0) -270))
+ (renorm-5 (scale-float (float 5315287461083185 1.0d0) -56)
+ (scale-float (float 6889731800400172 1.0d0) -110)
+ (scale-float (float -7080341772942908 1.0d0) -164)
+ (scale-float (float 8905936866277614 1.0d0) -218)
+ (scale-float (float -4711175575453696 1.0d0) -273))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5277954058411241 1.0d0) -52)
- (scale-float (float -7036199311826221 1.0d0) -108)
- (scale-float (float 7117690108558109 1.0d0) -162)
- (scale-float (float 6207200172835691 1.0d0) -216)
- (scale-float (float -7277808465117184 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5294380401254100 1.0d0) -52)
- (scale-float (float 5706029853483685 1.0d0) -106)
- (scale-float (float -5815604514362005 1.0d0) -160)
- (scale-float (float 8521653366576726 1.0d0) -214)
- (scale-float (float 6786336136888320 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5310866095418194 1.0d0) -52)
- (scale-float (float 5994935175650606 1.0d0) -106)
- (scale-float (float 7126614214549771 1.0d0) -160)
- (scale-float (float 5474583295283949 1.0d0) -214)
- (scale-float (float 5441015082524672 1.0d0) -268))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5327411541163090 1.0d0) -52)
- (scale-float (float 8339335851452668 1.0d0) -107)
- (scale-float (float -8505483720564920 1.0d0) -161)
- (scale-float (float -7197230750372089 1.0d0) -215)
- (scale-float (float -4656659777912832 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5344017142219521 1.0d0) -52)
- (scale-float (float 5208858328734713 1.0d0) -108)
- (scale-float (float 8137524158548272 1.0d0) -162)
- (scale-float (float -7253520036064748 1.0d0) -217)
- (scale-float (float 8684576010665984 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5360683305827581 1.0d0) -52)
- (scale-float (float 4602936313837160 1.0d0) -106)
- (scale-float (float 6415285630475648 1.0d0) -160)
- (scale-float (float 5562752314641467 1.0d0) -214)
- (scale-float (float -5267158257303552 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5377410442775426 1.0d0) -52)
- (scale-float (float -5192042960740330 1.0d0) -108)
- (scale-float (float 5166126632519932 1.0d0) -163)
- (scale-float (float 6927823736692903 1.0d0) -222)
- (scale-float (float 5782847046549504 1.0d0) -286))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5394198967438482 1.0d0) -52)
- (scale-float (float 6315956000158604 1.0d0) -111)
- (scale-float (float 5966144786559365 1.0d0) -165)
- (scale-float (float -8203894255240486 1.0d0) -219)
- (scale-float (float 8004101172363264 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5411049297819179 1.0d0) -52)
- (scale-float (float -8397424058330032 1.0d0) -107)
- (scale-float (float -8159858214369219 1.0d0) -162)
- (scale-float (float -7909686408741444 1.0d0) -216)
- (scale-float (float 5263630784266240 1.0d0) -275))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5427961855587206 1.0d0) -52)
- (scale-float (float -5690707459234180 1.0d0) -109)
- (scale-float (float 6835025015348311 1.0d0) -163)
- (scale-float (float 7942519163738825 1.0d0) -218)
- (scale-float (float -4953815436623872 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5444937066120308 1.0d0) -52)
- (scale-float (float -6691027865349732 1.0d0) -107)
- (scale-float (float -6409317624735656 1.0d0) -161)
- (scale-float (float 8374494464257080 1.0d0) -218)
- (scale-float (float -5531596394856448 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5461975358545621 1.0d0) -52)
- (scale-float (float 7500961901156157 1.0d0) -108)
- (scale-float (float -4636008327268895 1.0d0) -165)
- (scale-float (float -8555632135998677 1.0d0) -219)
- (scale-float (float -8208324901208064 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5479077165781566 1.0d0) -52)
- (scale-float (float -8035194041030797 1.0d0) -108)
- (scale-float (float -5962231852151354 1.0d0) -165)
- (scale-float (float 7929597504189371 1.0d0) -222)
- (scale-float (float 5827583677562880 1.0d0) -278))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5496242924580298 1.0d0) -52)
- (scale-float (float -8678215523185610 1.0d0) -106)
- (scale-float (float 6949749475682773 1.0d0) -161)
- (scale-float (float -5441816062852521 1.0d0) -218)
- (scale-float (float 7849732370595840 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5513473075570729 1.0d0) -52)
- (scale-float (float -4914577453872905 1.0d0) -106)
- (scale-float (float 5287889611523812 1.0d0) -162)
- (scale-float (float -8682246605406829 1.0d0) -218)
- (scale-float (float -4623466191519744 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5530768063302131 1.0d0) -52)
- (scale-float (float -8540850324370053 1.0d0) -107)
- (scale-float (float 5352058853624586 1.0d0) -163)
- (scale-float (float -5899803125205499 1.0d0) -219)
- (scale-float (float -6102539598036992 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5548128336288323 1.0d0) -52)
- (scale-float (float -5790201446462966 1.0d0) -106)
- (scale-float (float 5014731876302398 1.0d0) -164)
- (scale-float (float 8044648793444329 1.0d0) -219)
- (scale-float (float 6502522436976640 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5565554347052458 1.0d0) -52)
- (scale-float (float 4990106669279342 1.0d0) -108)
- (scale-float (float 4609278271169318 1.0d0) -162)
- (scale-float (float 5494028895009767 1.0d0) -217)
- (scale-float (float 5497404612018176 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5583046552172419 1.0d0) -52)
- (scale-float (float -5279252507732072 1.0d0) -106)
- (scale-float (float 7505024773670359 1.0d0) -160)
- (scale-float (float -5476728672433502 1.0d0) -214)
- (scale-float (float -6396501575327744 1.0d0) -268))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5600605412326825 1.0d0) -52)
- (scale-float (float -5457624583692494 1.0d0) -106)
- (scale-float (float 6336563765071964 1.0d0) -160)
- (scale-float (float 5213718407137512 1.0d0) -214)
- (scale-float (float 7165577912451072 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5618231392341671 1.0d0) -52)
- (scale-float (float -6412950612034594 1.0d0) -109)
- (scale-float (float 6364069957984329 1.0d0) -166)
- (scale-float (float -5737836969701466 1.0d0) -221)
- (scale-float (float -7861948491235328 1.0d0) -275))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5635924961237600 1.0d0) -52)
- (scale-float (float -4719518540539413 1.0d0) -110)
- (scale-float (float -5059147957561951 1.0d0) -164)
- (scale-float (float 5316979180165650 1.0d0) -218)
- (scale-float (float -4673256824897536 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5653686592277821 1.0d0) -52)
- (scale-float (float 7172255247592050 1.0d0) -108)
- (scale-float (float -7359911268552394 1.0d0) -162)
- (scale-float (float -7053345504866867 1.0d0) -218)
- (scale-float (float 7758518823157760 1.0d0) -275))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5671516763016686 1.0d0) -52)
- (scale-float (float 8487374385387579 1.0d0) -106)
- (scale-float (float 5873942733899488 1.0d0) -163)
- (scale-float (float 8805059241745009 1.0d0) -218)
- (scale-float (float 5927199432507392 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5689415955348934 1.0d0) -52)
- (scale-float (float 8738024021307785 1.0d0) -106)
- (scale-float (float 7510259923252762 1.0d0) -160)
- (scale-float (float 5520099911876322 1.0d0) -214)
- (scale-float (float -7309762608463872 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5707384655559611 1.0d0) -52)
- (scale-float (float 6459916791599166 1.0d0) -107)
- (scale-float (float 6223860923451742 1.0d0) -161)
- (scale-float (float -8716185646546994 1.0d0) -215)
- (scale-float (float -7732385065992192 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5725423354374681 1.0d0) -52)
- (scale-float (float -6029530846362609 1.0d0) -106)
- (scale-float (float -4625752521263551 1.0d0) -160)
- (scale-float (float 6098689829632159 1.0d0) -215)
- (scale-float (float 5847830143434752 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5743532547012336 1.0d0) -52)
- (scale-float (float -6013779054881446 1.0d0) -106)
- (scale-float (float 7122622630003096 1.0d0) -161)
- (scale-float (float 5669642311466823 1.0d0) -216)
- (scale-float (float 7404549888016384 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5761712733235020 1.0d0) -52)
- (scale-float (float -8931581765904744 1.0d0) -106)
- (scale-float (float -5013853585609784 1.0d0) -160)
- (scale-float (float -7143313514817958 1.0d0) -214)
- (scale-float (float 7255070610489344 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5779964417402171 1.0d0) -52)
- (scale-float (float 5791804225797192 1.0d0) -108)
- (scale-float (float 6708084643792698 1.0d0) -162)
- (scale-float (float -8753804200262557 1.0d0) -220)
- (scale-float (float 4750231165992960 1.0d0) -276))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5798288108523705 1.0d0) -52)
- (scale-float (float -7141603768493522 1.0d0) -106)
- (scale-float (float 5205999419054766 1.0d0) -161)
- (scale-float (float -8592293713979073 1.0d0) -216)
- (scale-float (float 5481657350750208 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5816684320314236 1.0d0) -52)
- (scale-float (float 6573462437317069 1.0d0) -109)
- (scale-float (float 4792592445373436 1.0d0) -164)
- (scale-float (float -7631628124441599 1.0d0) -218)
- (scale-float (float -5681490784419840 1.0d0) -282))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5835153571248069 1.0d0) -52)
- (scale-float (float -8600069340415753 1.0d0) -106)
- (scale-float (float -6934992260155357 1.0d0) -161)
- (scale-float (float -7284932739931237 1.0d0) -215)
- (scale-float (float 7921473233092608 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5853696384614949 1.0d0) -52)
- (scale-float (float 8753985821878505 1.0d0) -110)
- (scale-float (float 7588763546987094 1.0d0) -166)
- (scale-float (float -4822814022461911 1.0d0) -220)
- (scale-float (float -5098205003907072 1.0d0) -276))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5872313288576609 1.0d0) -52)
- (scale-float (float 7059581222146147 1.0d0) -107)
- (scale-float (float 6495908225136828 1.0d0) -163)
- (scale-float (float -4800808499275605 1.0d0) -217)
- (scale-float (float 5131309679050752 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5891004816224103 1.0d0) -52)
- (scale-float (float -8041490862869318 1.0d0) -109)
- (scale-float (float 4584573142867331 1.0d0) -164)
- (scale-float (float -6014319477349891 1.0d0) -219)
- (scale-float (float 6630773803974656 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5909771505635954 1.0d0) -52)
- (scale-float (float 8016272326855618 1.0d0) -107)
- (scale-float (float -5373590184064874 1.0d0) -162)
- (scale-float (float 7109789654252430 1.0d0) -217)
- (scale-float (float -4771493424529408 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5928613899937128 1.0d0) -52)
- (scale-float (float 6267816781867526 1.0d0) -107)
- (scale-float (float -8630517228603178 1.0d0) -162)
- (scale-float (float 8851222611199826 1.0d0) -217)
- (scale-float (float 6589868740182016 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5947532547358839 1.0d0) -52)
- (scale-float (float 7277517922925136 1.0d0) -106)
- (scale-float (float 6346112563729487 1.0d0) -161)
- (scale-float (float -8741185442950528 1.0d0) -218)
- (scale-float (float 6969978271039488 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5966528001299211 1.0d0) -52)
- (scale-float (float 8757183460747464 1.0d0) -107)
- (scale-float (float -8410599300272382 1.0d0) -164)
- (scale-float (float 5292846953000673 1.0d0) -218)
- (scale-float (float 4932172707397632 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5985600820384800 1.0d0) -52)
- (scale-float (float 6272184283852451 1.0d0) -107)
- (scale-float (float 4668335067410742 1.0d0) -163)
- (scale-float (float 4706453372433253 1.0d0) -217)
- (scale-float (float 5109096012840960 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6004751568533000 1.0d0) -52)
- (scale-float (float -4975292337006020 1.0d0) -107)
- (scale-float (float 7851618381824783 1.0d0) -162)
- (scale-float (float -6139515456651951 1.0d0) -216)
- (scale-float (float 6832920489394176 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6023980815015339 1.0d0) -52)
- (scale-float (float 8993844967752448 1.0d0) -106)
- (scale-float (float 7401505998919928 1.0d0) -163)
- (scale-float (float -6224493420691051 1.0d0) -218)
- (scale-float (float 4861583549267968 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6043289134521691 1.0d0) -52)
- (scale-float (float 8377404922548014 1.0d0) -106)
- (scale-float (float 6035662126969883 1.0d0) -160)
- (scale-float (float 7017822045852159 1.0d0) -215)
- (scale-float (float -5406069888663552 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6062677107225404 1.0d0) -52)
- (scale-float (float -7586238684211779 1.0d0) -106)
- (scale-float (float -5077135864344308 1.0d0) -161)
- (scale-float (float -4927713954038121 1.0d0) -217)
- (scale-float (float -8357402780893184 1.0d0) -281))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6082145318849372 1.0d0) -52)
- (scale-float (float -8461948866653765 1.0d0) -106)
- (scale-float (float -6004474504194072 1.0d0) -166)
- (scale-float (float 8133368293449913 1.0d0) -221)
- (scale-float (float -6403734876717056 1.0d0) -275))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6101694360733067 1.0d0) -52)
- (scale-float (float 6506035565326645 1.0d0) -106)
- (scale-float (float -7920306083919709 1.0d0) -160)
- (scale-float (float -7282338225209605 1.0d0) -217)
- (scale-float (float -8494527724191744 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6121324829900540 1.0d0) -52)
- (scale-float (float 6779113520304759 1.0d0) -107)
- (scale-float (float 8345818896409513 1.0d0) -167)
- (scale-float (float 7537522447287433 1.0d0) -221)
- (scale-float (float 8763676585623552 1.0d0) -275))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6141037329129406 1.0d0) -52)
- (scale-float (float -6046793357693206 1.0d0) -106)
- (scale-float (float 6476781133268162 1.0d0) -160)
- (scale-float (float 8054550865298174 1.0d0) -214)
- (scale-float (float -5634747365982208 1.0d0) -268))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6160832467020841 1.0d0) -52)
- (scale-float (float 6525079494891090 1.0d0) -114)
- (scale-float (float 6668863838306178 1.0d0) -169)
- (scale-float (float -7013244843573090 1.0d0) -223)
- (scale-float (float -7747321374703616 1.0d0) -277))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6180710858070603 1.0d0) -52)
- (scale-float (float -5386688662936188 1.0d0) -106)
- (scale-float (float -8722383211191819 1.0d0) -160)
- (scale-float (float 8238315842088120 1.0d0) -214)
- (scale-float (float -5669210505543680 1.0d0) -268))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6200673122741084 1.0d0) -52)
- (scale-float (float 8615614287833476 1.0d0) -106)
- (scale-float (float -4583197203175174 1.0d0) -160)
- (scale-float (float 7699463666822583 1.0d0) -215)
- (scale-float (float 4573364962066432 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6220719887534433 1.0d0) -52)
- (scale-float (float 7369404154056336 1.0d0) -107)
- (scale-float (float 5181777001559422 1.0d0) -161)
- (scale-float (float 8260880733251165 1.0d0) -215)
- (scale-float (float 7807180307415040 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6240851785066741 1.0d0) -52)
- (scale-float (float 6348378407384716 1.0d0) -109)
- (scale-float (float 7511671646668410 1.0d0) -164)
- (scale-float (float -5572446876538636 1.0d0) -219)
- (scale-float (float 8377341413425152 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6261069454143332 1.0d0) -52)
- (scale-float (float 5747929756161303 1.0d0) -106)
- (scale-float (float -6677627263003850 1.0d0) -160)
- (scale-float (float -6087124692506903 1.0d0) -214)
- (scale-float (float -5317388961480704 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6281373539835164 1.0d0) -52)
- (scale-float (float 5756069487280759 1.0d0) -113)
- (scale-float (float 8304859187052268 1.0d0) -168)
- (scale-float (float -5939878643484909 1.0d0) -222)
- (scale-float (float 6878925414203392 1.0d0) -276))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6301764693556359 1.0d0) -52)
- (scale-float (float 7987736006957214 1.0d0) -108)
- (scale-float (float -5572446676996546 1.0d0) -162)
- (scale-float (float 4898987619554823 1.0d0) -216)
- (scale-float (float 5230535808712704 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6322243573142893 1.0d0) -52)
- (scale-float (float -6250088559429980 1.0d0) -106)
- (scale-float (float 8214082164433534 1.0d0) -160)
- (scale-float (float -4575537593711052 1.0d0) -214)
- (scale-float (float -8340865070530560 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6342810842932450 1.0d0) -52)
- (scale-float (float 6506191290004624 1.0d0) -107)
- (scale-float (float 7538309343941042 1.0d0) -169)
- (scale-float (float -8070490757490432 1.0d0) -224)
- (scale-float (float -4993531739373568 1.0d0) -278))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6363467173845479 1.0d0) -52)
- (scale-float (float 6925650850841739 1.0d0) -106)
- (scale-float (float 5108965269756902 1.0d0) -160)
- (scale-float (float -8629508249266946 1.0d0) -214)
- (scale-float (float 4953499151360000 1.0d0) -268))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6384213243467456 1.0d0) -52)
- (scale-float (float -7342296707473874 1.0d0) -106)
- (scale-float (float 6038926499762338 1.0d0) -161)
- (scale-float (float 7685790639120757 1.0d0) -215)
- (scale-float (float -8848979685736448 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6405049736132382 1.0d0) -52)
- (scale-float (float 7887038119644342 1.0d0) -106)
- (scale-float (float 6835732962519886 1.0d0) -162)
- (scale-float (float 5220068172814735 1.0d0) -216)
- (scale-float (float 7637110284353536 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6425977343007549 1.0d0) -52)
- (scale-float (float 7171158296027162 1.0d0) -106)
- (scale-float (float 6508422249345121 1.0d0) -160)
- (scale-float (float 6685325118486165 1.0d0) -214)
- (scale-float (float -6687511699652608 1.0d0) -268))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6446996762179568 1.0d0) -52)
- (scale-float (float 6088154024111339 1.0d0) -106)
- (scale-float (float -7454841177630762 1.0d0) -161)
- (scale-float (float 5817067961732498 1.0d0) -216)
- (scale-float (float -5777234774065152 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6468108698741712 1.0d0) -52)
- (scale-float (float -6504469837046684 1.0d0) -106)
- (scale-float (float -7517687439391069 1.0d0) -160)
- (scale-float (float 5970146526803503 1.0d0) -215)
- (scale-float (float -7723609005948928 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6489313864882575 1.0d0) -52)
- (scale-float (float -6774799132907203 1.0d0) -109)
- (scale-float (float -8315742042881489 1.0d0) -164)
- (scale-float (float 6112336297364101 1.0d0) -219)
- (scale-float (float -7987040040779776 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6510612979976088 1.0d0) -52)
- (scale-float (float 6226083990960552 1.0d0) -108)
- (scale-float (float 7341374943629366 1.0d0) -164)
- (scale-float (float -6530116627673930 1.0d0) -218)
- (scale-float (float -8401182632968192 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6532006770672898 1.0d0) -52)
- (scale-float (float -7796678970447868 1.0d0) -113)
- (scale-float (float -8658218327003408 1.0d0) -167)
- (scale-float (float -5795595477529954 1.0d0) -224)
- (scale-float (float -8925892940136448 1.0d0) -278))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6553495970993148 1.0d0) -52)
- (scale-float (float 6747345131888698 1.0d0) -106)
- (scale-float (float 5103927603270423 1.0d0) -160)
- (scale-float (float -4700944483650471 1.0d0) -214)
- (scale-float (float -5307894413082624 1.0d0) -268))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6575081322420681 1.0d0) -52)
- (scale-float (float -7766283014252395 1.0d0) -107)
- (scale-float (float -4770464226344590 1.0d0) -161)
- (scale-float (float 5154386876010200 1.0d0) -215)
- (scale-float (float 6802411293868032 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6596763573998683 1.0d0) -52)
- (scale-float (float -5583094043640132 1.0d0) -107)
- (scale-float (float -7156474088532523 1.0d0) -161)
- (scale-float (float -7226294897288106 1.0d0) -215)
- (scale-float (float 7618534444236800 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6618543482426809 1.0d0) -52)
- (scale-float (float 8275116950050689 1.0d0) -106)
- (scale-float (float 5836691759444780 1.0d0) -160)
- (scale-float (float -5813124647742540 1.0d0) -214)
- (scale-float (float 6667275556569088 1.0d0) -268))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6640421812159804 1.0d0) -52)
- (scale-float (float -6561721455047894 1.0d0) -106)
- (scale-float (float 8806804288909803 1.0d0) -160)
- (scale-float (float -7340991492336673 1.0d0) -214)
- (scale-float (float 6867019602067456 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6662399335507644 1.0d0) -52)
- (scale-float (float -5238284397741824 1.0d0) -111)
- (scale-float (float 8052692811667187 1.0d0) -165)
- (scale-float (float 7972819986943405 1.0d0) -223)
- (scale-float (float -6700908117229568 1.0d0) -283))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6684476832737247 1.0d0) -52)
- (scale-float (float -7450639657259925 1.0d0) -106)
- (scale-float (float 5439660369532272 1.0d0) -161)
- (scale-float (float -7119626218695057 1.0d0) -215)
- (scale-float (float -8656258223161344 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6706655092175749 1.0d0) -52)
- (scale-float (float 5833795028591143 1.0d0) -106)
- (scale-float (float 7324366237328699 1.0d0) -160)
- (scale-float (float -6869513400425664 1.0d0) -214)
- (scale-float (float 4892074833190912 1.0d0) -268))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6728934910315408 1.0d0) -52)
- (scale-float (float -5200892477964869 1.0d0) -106)
- (scale-float (float 5576996548553061 1.0d0) -161)
- (scale-float (float 5619447164581062 1.0d0) -215)
- (scale-float (float 7351499394121728 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6751317091920131 1.0d0) -52)
- (scale-float (float 7467026548779001 1.0d0) -106)
- (scale-float (float -6178942986382428 1.0d0) -160)
- (scale-float (float 7692144611413038 1.0d0) -218)
- (scale-float (float -5580126894686208 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6773802450133692 1.0d0) -52)
- (scale-float (float -6816832241503857 1.0d0) -106)
- (scale-float (float 8260178159117390 1.0d0) -160)
- (scale-float (float -6551512745169617 1.0d0) -214)
- (scale-float (float 4883039946211328 1.0d0) -268))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6796391806589630 1.0d0) -52)
- (scale-float (float -8668990636265864 1.0d0) -108)
- (scale-float (float 8397506793143135 1.0d0) -164)
- (scale-float (float 5718287097465055 1.0d0) -218)
- (scale-float (float 4812293576851456 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6819085991522900 1.0d0) -52)
- (scale-float (float -5285788322252561 1.0d0) -106)
- (scale-float (float -7351450710905316 1.0d0) -160)
- (scale-float (float 4946109326684738 1.0d0) -215)
- (scale-float (float 7741481556918272 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6841885843883273 1.0d0) -52)
- (scale-float (float -8636872191266454 1.0d0) -109)
- (scale-float (float 6939692820059570 1.0d0) -163)
- (scale-float (float 8267368046853228 1.0d0) -220)
- (scale-float (float -6533860717232128 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6864792211450543 1.0d0) -52)
- (scale-float (float 8354214851379978 1.0d0) -106)
- (scale-float (float -8249099892746736 1.0d0) -161)
- (scale-float (float -8360809668092333 1.0d0) -216)
- (scale-float (float -5235150416904192 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6887805950951562 1.0d0) -52)
- (scale-float (float -6501576794659794 1.0d0) -106)
- (scale-float (float -7742084937739441 1.0d0) -160)
- (scale-float (float -7392327108699901 1.0d0) -215)
- (scale-float (float -6262293079818240 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6910927928179133 1.0d0) -52)
- (scale-float (float 8687248921953122 1.0d0) -106)
- (scale-float (float 7034012859521834 1.0d0) -162)
- (scale-float (float -7908001720275377 1.0d0) -216)
- (scale-float (float -6416580544036864 1.0d0) -278))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6934159018112819 1.0d0) -52)
- (scale-float (float 6288381700438587 1.0d0) -106)
- (scale-float (float -6060408457304216 1.0d0) -160)
- (scale-float (float 5873323538885371 1.0d0) -214)
- (scale-float (float -5146780495060992 1.0d0) -268))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6957500105041668 1.0d0) -52)
- (scale-float (float -6583746692347551 1.0d0) -106)
- (scale-float (float -8486074429733762 1.0d0) -160)
- (scale-float (float -7180404084121772 1.0d0) -214)
- (scale-float (float -7221627621801984 1.0d0) -268))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6980952082688920 1.0d0) -52)
- (scale-float (float -8905385616289737 1.0d0) -107)
- (scale-float (float 7640976598311277 1.0d0) -164)
- (scale-float (float 8161224665381221 1.0d0) -219)
- (scale-float (float -6721040647192576 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7004515854338723 1.0d0) -52)
- (scale-float (float 8000392164923254 1.0d0) -106)
- (scale-float (float 7722991884981353 1.0d0) -160)
- (scale-float (float 7646998333594993 1.0d0) -215)
- (scale-float (float -8531580850438144 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7028192332964892 1.0d0) -52)
- (scale-float (float 4515480771177063 1.0d0) -106)
- (scale-float (float 4904288642245017 1.0d0) -161)
- (scale-float (float -7238020353858612 1.0d0) -217)
- (scale-float (float 8119658144464896 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7051982441361750 1.0d0) -52)
- (scale-float (float -6376278041806644 1.0d0) -107)
- (scale-float (float -4550649320529980 1.0d0) -161)
- (scale-float (float -8383745255731473 1.0d0) -217)
- (scale-float (float 5137393694932992 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7075887112277099 1.0d0) -52)
- (scale-float (float -8044158469028999 1.0d0) -106)
- (scale-float (float 8219820830511956 1.0d0) -161)
- (scale-float (float 8824995761199473 1.0d0) -215)
- (scale-float (float -6955216711057408 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7099907288547353 1.0d0) -52)
- (scale-float (float -7819467642589553 1.0d0) -108)
- (scale-float (float -7537052374028336 1.0d0) -162)
- (scale-float (float 8351454283533806 1.0d0) -216)
- (scale-float (float 5816491862654976 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7124043923234879 1.0d0) -52)
- (scale-float (float -7659477916393316 1.0d0) -106)
- (scale-float (float 8579150223223901 1.0d0) -164)
- (scale-float (float -8420355484116036 1.0d0) -218)
- (scale-float (float 8952810691362816 1.0d0) -279))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7148297979767580 1.0d0) -52)
- (scale-float (float -6552479776343909 1.0d0) -108)
- (scale-float (float -7908601887231407 1.0d0) -162)
- (scale-float (float 4523484557435432 1.0d0) -218)
- (scale-float (float 8969533245095936 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7172670432080778 1.0d0) -52)
- (scale-float (float 5465746047268065 1.0d0) -107)
- (scale-float (float -7589308106397731 1.0d0) -161)
- (scale-float (float -8670147957950623 1.0d0) -217)
- (scale-float (float 7337509779931136 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7197162264761425 1.0d0) -52)
- (scale-float (float 7051217613783884 1.0d0) -115)
- (scale-float (float -5918159213175868 1.0d0) -169)
- (scale-float (float -4964773714017637 1.0d0) -226)
- (scale-float (float 8184825894666240 1.0d0) -280))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7221774473194696 1.0d0) -52)
- (scale-float (float 5663929995290417 1.0d0) -107)
- (scale-float (float 8192791094983764 1.0d0) -162)
- (scale-float (float -6895747937922063 1.0d0) -223)
- (scale-float (float 6161309452206080 1.0d0) -277))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7246508063713011 1.0d0) -52)
- (scale-float (float -5607075886301902 1.0d0) -108)
- (scale-float (float 5295475845913378 1.0d0) -162)
- (scale-float (float 5094595004503787 1.0d0) -216)
- (scale-float (float 8544810988404736 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7271364053747525 1.0d0) -52)
- (scale-float (float -6930449084885358 1.0d0) -107)
- (scale-float (float -7738310043986010 1.0d0) -161)
- (scale-float (float -5820997457322006 1.0d0) -216)
- (scale-float (float 6462652592422912 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7296343471982143 1.0d0) -52)
- (scale-float (float 6524098474463173 1.0d0) -107)
- (scale-float (float -6611863837141324 1.0d0) -161)
- (scale-float (float -4691185552056161 1.0d0) -215)
- (scale-float (float -5945686706995200 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7321447358510105 1.0d0) -52)
- (scale-float (float 4915999262946911 1.0d0) -109)
- (scale-float (float -5634512347330806 1.0d0) -163)
- (scale-float (float 7560272692792706 1.0d0) -219)
- (scale-float (float -7625361640390656 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7346676764993187 1.0d0) -52)
- (scale-float (float 8597020209551177 1.0d0) -109)
- (scale-float (float 5327684078683971 1.0d0) -164)
- (scale-float (float -6541739214290562 1.0d0) -221)
- (scale-float (float -5728886669180928 1.0d0) -276))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7372032754823579 1.0d0) -52)
- (scale-float (float 6229152596919430 1.0d0) -106)
- (scale-float (float -7828718708088660 1.0d0) -161)
- (scale-float (float -5312559619272123 1.0d0) -218)
- (scale-float (float -7215659148509184 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7397516403288485 1.0d0) -52)
- (scale-float (float 5245235763543538 1.0d0) -107)
- (scale-float (float 8249183213479079 1.0d0) -163)
- (scale-float (float 5683491486088472 1.0d0) -219)
- (scale-float (float -8326405532155904 1.0d0) -276))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7423128797737498 1.0d0) -52)
- (scale-float (float 6534789125887563 1.0d0) -106)
- (scale-float (float -5416343419560325 1.0d0) -162)
- (scale-float (float -7897115342906696 1.0d0) -218)
- (scale-float (float 7923576875253760 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7448871037752814 1.0d0) -52)
- (scale-float (float -7144027731086266 1.0d0) -106)
- (scale-float (float -6372697590546829 1.0d0) -160)
- (scale-float (float 5170058560926944 1.0d0) -214)
- (scale-float (float -6449806776803328 1.0d0) -268))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7474744235322325 1.0d0) -52)
- (scale-float (float -8235027695704343 1.0d0) -108)
- (scale-float (float 8351406254756054 1.0d0) -162)
- (scale-float (float 5457294044055005 1.0d0) -216)
- (scale-float (float -6871998316544000 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7500749515015670 1.0d0) -52)
- (scale-float (float 6695285130942172 1.0d0) -106)
- (scale-float (float 6796561291551790 1.0d0) -160)
- (scale-float (float -8407223091930427 1.0d0) -218)
- (scale-float (float -8964850462359552 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7526888014163282 1.0d0) -52)
- (scale-float (float -7501433522090210 1.0d0) -107)
- (scale-float (float 8896885186748969 1.0d0) -161)
- (scale-float (float 7778774552930541 1.0d0) -215)
- (scale-float (float -4765951651020800 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7553160883038499 1.0d0) -52)
- (scale-float (float -7717301072954270 1.0d0) -106)
- (scale-float (float -4736066215208579 1.0d0) -160)
- (scale-float (float 6167583482750279 1.0d0) -214)
- (scale-float (float -4887683722108928 1.0d0) -268))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7579569285042808 1.0d0) -52)
- (scale-float (float 6183147635439386 1.0d0) -109)
- (scale-float (float -8813002412175406 1.0d0) -163)
- (scale-float (float 5400591826237277 1.0d0) -217)
- (scale-float (float -6596357257560064 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7606114396894275 1.0d0) -52)
- (scale-float (float -8430495514121248 1.0d0) -106)
- (scale-float (float -5257730309726180 1.0d0) -160)
- (scale-float (float -6797878334323030 1.0d0) -214)
- (scale-float (float 6705517761331200 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7632797408819222 1.0d0) -52)
- (scale-float (float -7883724294294040 1.0d0) -106)
- (scale-float (float 7790123274327648 1.0d0) -163)
- (scale-float (float 6652158382482046 1.0d0) -217)
- (scale-float (float -5084508566585344 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7659619524747233 1.0d0) -52)
- (scale-float (float -7767836673805280 1.0d0) -108)
- (scale-float (float 6818006961459375 1.0d0) -162)
- (scale-float (float 8474320068246006 1.0d0) -217)
- (scale-float (float 5921933685882880 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7686581962509540 1.0d0) -52)
- (scale-float (float -6669745040010299 1.0d0) -106)
- (scale-float (float 7647642713755227 1.0d0) -162)
- (scale-float (float 7719520442751879 1.0d0) -218)
- (scale-float (float 5610811217018880 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7713685954040862 1.0d0) -52)
- (scale-float (float 8282411342758270 1.0d0) -107)
- (scale-float (float 5351595586394364 1.0d0) -161)
- (scale-float (float 4968620750082420 1.0d0) -215)
- (scale-float (float -8794130094555136 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7740932745584778 1.0d0) -52)
- (scale-float (float -7983253716465345 1.0d0) -107)
- (scale-float (float -6191366840246599 1.0d0) -163)
- (scale-float (float -5937368954491445 1.0d0) -217)
- (scale-float (float -7175676447555584 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7768323597902685 1.0d0) -52)
- (scale-float (float -6932574340848239 1.0d0) -106)
- (scale-float (float -8922024896109103 1.0d0) -160)
- (scale-float (float 7317260498562562 1.0d0) -214)
- (scale-float (float -5494842149044224 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7795859786486438 1.0d0) -52)
- (scale-float (float 4926530016014015 1.0d0) -109)
- (scale-float (float 6677817833809299 1.0d0) -166)
- (scale-float (float 7063476649184661 1.0d0) -224)
- (scale-float (float -4846339795976192 1.0d0) -279))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7823542601774733 1.0d0) -52)
- (scale-float (float -8419218412396898 1.0d0) -106)
- (scale-float (float -6739987301542550 1.0d0) -161)
- (scale-float (float -6132721933945695 1.0d0) -215)
- (scale-float (float 4560492812746752 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7851373349373308 1.0d0) -52)
- (scale-float (float -5126389915225982 1.0d0) -107)
- (scale-float (float 5388704434706194 1.0d0) -163)
- (scale-float (float 8906887707616199 1.0d0) -221)
- (scale-float (float 5654274299133952 1.0d0) -275))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7879353350279058 1.0d0) -52)
- (scale-float (float -5264522129973202 1.0d0) -108)
- (scale-float (float 8552676307083459 1.0d0) -162)
- (scale-float (float -8067891896217601 1.0d0) -216)
- (scale-float (float -6300549562892288 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7907483941108124 1.0d0) -52)
- (scale-float (float -7718165431409574 1.0d0) -106)
- (scale-float (float -5012972602409400 1.0d0) -161)
- (scale-float (float 5384985500885942 1.0d0) -215)
- (scale-float (float 4846701156630528 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7935766474328052 1.0d0) -52)
- (scale-float (float -6613046675471234 1.0d0) -110)
- (scale-float (float -7998668785658521 1.0d0) -165)
- (scale-float (float -8081984933026363 1.0d0) -220)
- (scale-float (float -8538456164663296 1.0d0) -276))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7964202318494108 1.0d0) -52)
- (scale-float (float -5922853960098892 1.0d0) -106)
- (scale-float (float -6989445158679706 1.0d0) -160)
- (scale-float (float -5138375199156798 1.0d0) -216)
- (scale-float (float -7227344691593216 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7992792858489822 1.0d0) -52)
- (scale-float (float -8768480214781638 1.0d0) -109)
- (scale-float (float 7844372482637495 1.0d0) -163)
- (scale-float (float 7588451423670197 1.0d0) -217)
- (scale-float (float -5991539517292544 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8021539495771870 1.0d0) -52)
- (scale-float (float -6681294409622045 1.0d0) -106)
- (scale-float (float 8096854178246647 1.0d0) -160)
- (scale-float (float 5418560818338247 1.0d0) -215)
- (scale-float (float -8372603276656640 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8050443648619364 1.0d0) -52)
- (scale-float (float 8160498528136282 1.0d0) -106)
- (scale-float (float 6595987209952523 1.0d0) -162)
- (scale-float (float 8913285169724375 1.0d0) -217)
- (scale-float (float 6566292738408448 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8079506752387666 1.0d0) -52)
- (scale-float (float 6086478506215249 1.0d0) -108)
- (scale-float (float 6943915041499786 1.0d0) -163)
- (scale-float (float 7726225471978347 1.0d0) -218)
- (scale-float (float 6857460569079808 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8108730259766795 1.0d0) -52)
- (scale-float (float -6924020594629539 1.0d0) -106)
- (scale-float (float 7039599443349448 1.0d0) -160)
- (scale-float (float 6636542293060408 1.0d0) -219)
- (scale-float (float -8248062889426944 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8138115641044550 1.0d0) -52)
- (scale-float (float 4571670723019047 1.0d0) -106)
- (scale-float (float -8675626971024832 1.0d0) -165)
- (scale-float (float -7135813161318007 1.0d0) -219)
- (scale-float (float -5345958708117504 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8167664384374439 1.0d0) -52)
- (scale-float (float -8594344220421759 1.0d0) -106)
- (scale-float (float 6225470882867097 1.0d0) -162)
- (scale-float (float -7345519967758384 1.0d0) -216)
- (scale-float (float 5861875726876672 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8197377996048504 1.0d0) -52)
- (scale-float (float -5680382695110323 1.0d0) -106)
- (scale-float (float 6838449163819191 1.0d0) -161)
- (scale-float (float 4967392806520383 1.0d0) -215)
- (scale-float (float 5273246981521408 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8227258000775176 1.0d0) -52)
- (scale-float (float -7040163401690535 1.0d0) -106)
- (scale-float (float -6666536014285352 1.0d0) -161)
- (scale-float (float 5792720759523620 1.0d0) -215)
- (scale-float (float 7489611402264576 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8257305941962238 1.0d0) -52)
- (scale-float (float -6235229666522037 1.0d0) -108)
- (scale-float (float 4886700734167849 1.0d0) -162)
- (scale-float (float -8770431451309683 1.0d0) -217)
- (scale-float (float -6563036633497600 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8287523382005028 1.0d0) -52)
- (scale-float (float -5678060077809221 1.0d0) -107)
- (scale-float (float -5668834439524685 1.0d0) -162)
- (scale-float (float 6576156667945915 1.0d0) -216)
- (scale-float (float -5809058938880000 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8317911902579981 1.0d0) -52)
- (scale-float (float 7194286263118379 1.0d0) -108)
- (scale-float (float 5473490977664520 1.0d0) -165)
- (scale-float (float 6742601015555680 1.0d0) -220)
- (scale-float (float 5056301815562240 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8348473104943638 1.0d0) -52)
- (scale-float (float -6391621016681863 1.0d0) -106)
- (scale-float (float -7626545638484088 1.0d0) -160)
- (scale-float (float 7339375963687856 1.0d0) -215)
- (scale-float (float -8892024670191616 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8379208610237227 1.0d0) -52)
- (scale-float (float 6449046509943769 1.0d0) -106)
- (scale-float (float 6254439204059236 1.0d0) -161)
- (scale-float (float -7597582828738449 1.0d0) -218)
- (scale-float (float 5647662500806656 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8410120059796957 1.0d0) -52)
- (scale-float (float 7939398310619298 1.0d0) -106)
- (scale-float (float -7794544180520912 1.0d0) -160)
- (scale-float (float 8583629970279667 1.0d0) -214)
- (scale-float (float -6928989817044992 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8441209115470126 1.0d0) -52)
- (scale-float (float 8678333495882426 1.0d0) -106)
- (scale-float (float -6472637329889902 1.0d0) -167)
- (scale-float (float -6995649561992337 1.0d0) -221)
- (scale-float (float 5802169899941888 1.0d0) -275))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8472477459937193 1.0d0) -52)
- (scale-float (float 8570521679063611 1.0d0) -107)
- (scale-float (float -5936880060582285 1.0d0) -162)
- (scale-float (float 7777084781837767 1.0d0) -216)
- (scale-float (float -4878182560661504 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8503926797039931 1.0d0) -52)
- (scale-float (float 7619653518793156 1.0d0) -106)
- (scale-float (float -8638980237674381 1.0d0) -162)
- (scale-float (float 5695617643824624 1.0d0) -216)
- (scale-float (float -5256575696240640 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8535558852115805 1.0d0) -52)
- (scale-float (float 7717483963968495 1.0d0) -108)
- (scale-float (float -4946550152273178 1.0d0) -166)
- (scale-float (float -7543815510835142 1.0d0) -220)
- (scale-float (float 8182459373977600 1.0d0) -275))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8567375372338703 1.0d0) -52)
- (scale-float (float -4607123785883404 1.0d0) -106)
- (scale-float (float 6615374890321791 1.0d0) -160)
- (scale-float (float -7913190996117973 1.0d0) -219)
- (scale-float (float -4539914053484544 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8599378127066171 1.0d0) -52)
- (scale-float (float 6433926300689068 1.0d0) -106)
- (scale-float (float 6337489561898200 1.0d0) -160)
- (scale-float (float -7162187518913546 1.0d0) -217)
- (scale-float (float -7719566845542400 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8631568908193296 1.0d0) -52)
- (scale-float (float 5573684129894211 1.0d0) -110)
- (scale-float (float 4697922104472433 1.0d0) -164)
- (scale-float (float 8332790213185398 1.0d0) -218)
- (scale-float (float 8799754147332096 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8663949530513373 1.0d0) -52)
- (scale-float (float 8831742268778019 1.0d0) -106)
- (scale-float (float -6588195514106582 1.0d0) -160)
- (scale-float (float 8642684274769891 1.0d0) -214)
- (scale-float (float -6113857327710208 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8696521832085533 1.0d0) -52)
- (scale-float (float -5725705447987637 1.0d0) -106)
- (scale-float (float -5578988538519052 1.0d0) -161)
- (scale-float (float -5454464946830045 1.0d0) -215)
- (scale-float (float 8479328624017408 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8729287674609459 1.0d0) -52)
- (scale-float (float -7726755428081233 1.0d0) -106)
- (scale-float (float -7169128636578129 1.0d0) -160)
- (scale-float (float -6117985949368032 1.0d0) -215)
- (scale-float (float -7484662462382080 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8762248943807380 1.0d0) -52)
- (scale-float (float 7661335807960245 1.0d0) -107)
- (scale-float (float 8164699070030703 1.0d0) -161)
- (scale-float (float -4953426430901129 1.0d0) -215)
- (scale-float (float 6326202891730944 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8795407549813488 1.0d0) -52)
- (scale-float (float -5595262607081735 1.0d0) -106)
- (scale-float (float 6899825784168106 1.0d0) -162)
- (scale-float (float -6384797474881585 1.0d0) -217)
- (scale-float (float 6749614365736960 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8828765427570947 1.0d0) -52)
- (scale-float (float 7542763819981613 1.0d0) -108)
- (scale-float (float -5280373115681684 1.0d0) -162)
- (scale-float (float 7965342904929630 1.0d0) -216)
- (scale-float (float -5138888297742336 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8862324537236687 1.0d0) -52)
- (scale-float (float 5478740957742512 1.0d0) -107)
- (scale-float (float -8688011568025747 1.0d0) -161)
- (scale-float (float -6347940529072431 1.0d0) -216)
- (scale-float (float 7918870876717056 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8896086864594135 1.0d0) -52)
- (scale-float (float 6011240247440891 1.0d0) -106)
- (scale-float (float -7904570401654965 1.0d0) -160)
- (scale-float (float 5109940160585919 1.0d0) -215)
- (scale-float (float 7277104927342592 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8930054421474087 1.0d0) -52)
- (scale-float (float -7585717744927642 1.0d0) -106)
- (scale-float (float 6426909277625247 1.0d0) -161)
- (scale-float (float 6454109566985921 1.0d0) -215)
- (scale-float (float 6846354419548160 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8964229246183892 1.0d0) -52)
- (scale-float (float -6044505343434685 1.0d0) -107)
- (scale-float (float -8843438673200297 1.0d0) -162)
- (scale-float (float -6740266892894322 1.0d0) -216)
- (scale-float (float 6612994665807872 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8998613403945159 1.0d0) -52)
- (scale-float (float 5036138781958602 1.0d0) -107)
- (scale-float (float 6307340486192282 1.0d0) -161)
- (scale-float (float 8264728164523381 1.0d0) -216)
- (scale-float (float -8863674547503104 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4516604493670082 1.0d0) -51)
- (scale-float (float 7855269771490288 1.0d0) -105)
- (scale-float (float -8517128085935100 1.0d0) -160)
- (scale-float (float -7525493275887105 1.0d0) -214)
- (scale-float (float 8847437596540928 1.0d0) -268))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4534009058383589 1.0d0) -51)
- (scale-float (float -4947501464113715 1.0d0) -110)
- (scale-float (float 7017443131106966 1.0d0) -165)
- (scale-float (float -5971498470999696 1.0d0) -219)
- (scale-float (float 6345468010299392 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4551521470452453 1.0d0) -51)
- (scale-float (float -6806333081011709 1.0d0) -106)
- (scale-float (float -7596521103898869 1.0d0) -160)
- (scale-float (float -7954691276532210 1.0d0) -214)
- (scale-float (float 4699163648704512 1.0d0) -268))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4569142818593137 1.0d0) -51)
- (scale-float (float 8737340629906869 1.0d0) -112)
- (scale-float (float 6683145983175485 1.0d0) -166)
- (scale-float (float 6585002720071419 1.0d0) -223)
- (scale-float (float 8792138431070208 1.0d0) -279))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4586874206140882 1.0d0) -51)
- (scale-float (float 7409519956751576 1.0d0) -107)
- (scale-float (float 8482593100011898 1.0d0) -161)
- (scale-float (float 6682587412044156 1.0d0) -220)
- (scale-float (float 4897098872913920 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4604716751296264 1.0d0) -51)
- (scale-float (float 7315591678768290 1.0d0) -106)
- (scale-float (float -6478307761602943 1.0d0) -160)
- (scale-float (float 7390627878378408 1.0d0) -214)
- (scale-float (float -4980006345588736 1.0d0) -268))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4622671587376759 1.0d0) -51)
- (scale-float (float 6764505505310787 1.0d0) -106)
- (scale-float (float 5651713447799281 1.0d0) -163)
- (scale-float (float -5595386708242591 1.0d0) -217)
- (scale-float (float -8817533386752000 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4640739863073432 1.0d0) -51)
- (scale-float (float 5235586652355695 1.0d0) -108)
- (scale-float (float -6774633309161685 1.0d0) -164)
- (scale-float (float 6292936258452966 1.0d0) -218)
- (scale-float (float 7402532084908032 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4658922742712873 1.0d0) -51)
- (scale-float (float 8047926806184342 1.0d0) -105)
- (scale-float (float 8665597744908349 1.0d0) -161)
- (scale-float (float 5884825387558272 1.0d0) -215)
- (scale-float (float -7854888618328064 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4677221406524509 1.0d0) -51)
- (scale-float (float 6309071459272219 1.0d0) -105)
- (scale-float (float -5861678673822895 1.0d0) -160)
- (scale-float (float 6481463496541750 1.0d0) -215)
- (scale-float (float -5883100386852864 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4695637050913412 1.0d0) -51)
- (scale-float (float 6155122819224400 1.0d0) -105)
- (scale-float (float -6900683102254314 1.0d0) -163)
- (scale-float (float 6663900883485306 1.0d0) -217)
- (scale-float (float 7332552562180096 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4714170888738748 1.0d0) -51)
- (scale-float (float -7154050573951264 1.0d0) -105)
- (scale-float (float -5228176980015465 1.0d0) -159)
- (scale-float (float 8322218519568072 1.0d0) -213)
- (scale-float (float 5453215976521728 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4732824149597990 1.0d0) -51)
- (scale-float (float -7952293513954034 1.0d0) -105)
- (scale-float (float 5313971258372717 1.0d0) -159)
- (scale-float (float -6373220212301441 1.0d0) -213)
- (scale-float (float 8038061422133248 1.0d0) -267))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4751598080117049 1.0d0) -51)
- (scale-float (float 5116657367694205 1.0d0) -105)
- (scale-float (float 5002113055115020 1.0d0) -160)
- (scale-float (float 6122924223721361 1.0d0) -214)
- (scale-float (float 7794473060352000 1.0d0) -268))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4770493944246457 1.0d0) -51)
- (scale-float (float -7593639115449901 1.0d0) -105)
- (scale-float (float 8288324301389426 1.0d0) -159)
- (scale-float (float 8471126431613674 1.0d0) -216)
- (scale-float (float 8496158537089024 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4789513023563745 1.0d0) -51)
- (scale-float (float -6536375340057158 1.0d0) -105)
- (scale-float (float 7154047310973683 1.0d0) -160)
- (scale-float (float -8282736304647735 1.0d0) -216)
- (scale-float (float -7997052826550272 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4808656617582189 1.0d0) -51)
- (scale-float (float 7220506481736491 1.0d0) -105)
- (scale-float (float -5763496948405995 1.0d0) -159)
- (scale-float (float 8855283341820409 1.0d0) -214)
- (scale-float (float -6641182903107584 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4827926044066060 1.0d0) -51)
- (scale-float (float -4566027902376150 1.0d0) -107)
- (scale-float (float -5660018282286580 1.0d0) -164)
- (scale-float (float -6525492458400559 1.0d0) -220)
- (scale-float (float 7352562499977216 1.0d0) -277))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4847322639352541 1.0d0) -51)
- (scale-float (float -6886081033979822 1.0d0) -105)
- (scale-float (float -4965782539411056 1.0d0) -159)
- (scale-float (float -6530044887954106 1.0d0) -213)
- (scale-float (float -7579985518395392 1.0d0) -268))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4866847758680490 1.0d0) -51)
- (scale-float (float 7577167154580700 1.0d0) -105)
- (scale-float (float -8097090336510504 1.0d0) -161)
- (scale-float (float -5125334469688733 1.0d0) -218)
- (scale-float (float -7005706487070720 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4886502776526209 1.0d0) -51)
- (scale-float (float 6447728718743388 1.0d0) -105)
- (scale-float (float 6352685077616183 1.0d0) -160)
- (scale-float (float -4847490480269497 1.0d0) -214)
- (scale-float (float 6826529376108544 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4906289086946387 1.0d0) -51)
- (scale-float (float -6225707041977363 1.0d0) -107)
- (scale-float (float 6937474968385968 1.0d0) -165)
- (scale-float (float -5485182190259269 1.0d0) -219)
- (scale-float (float -6120096300793856 1.0d0) -275))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4926208103928412 1.0d0) -51)
- (scale-float (float 6338830329417148 1.0d0) -105)
- (scale-float (float 6188917082250096 1.0d0) -162)
- (scale-float (float 5149131390511145 1.0d0) -216)
- (scale-float (float -7852795551285248 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4946261261748232 1.0d0) -51)
- (scale-float (float -8817433990373634 1.0d0) -108)
- (scale-float (float 8891587898717767 1.0d0) -166)
- (scale-float (float -7337766033399816 1.0d0) -223)
- (scale-float (float 7572261796052992 1.0d0) -277))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4966450015335943 1.0d0) -51)
- (scale-float (float 8099079459031819 1.0d0) -105)
- (scale-float (float 7092920388820914 1.0d0) -159)
- (scale-float (float 8634126330575689 1.0d0) -214)
- (scale-float (float -5327712688128000 1.0d0) -268))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4986775840649324 1.0d0) -51)
- (scale-float (float -5673983972559754 1.0d0) -106)
- (scale-float (float -5124322753939530 1.0d0) -160)
- (scale-float (float -6561473523479162 1.0d0) -215)
- (scale-float (float 8354510084243456 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5007240235055492 1.0d0) -51)
- (scale-float (float -5960282226209081 1.0d0) -105)
- (scale-float (float -7839983841639876 1.0d0) -160)
- (scale-float (float 6275246444950574 1.0d0) -214)
- (scale-float (float 5085487136473088 1.0d0) -268))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5027844717720912 1.0d0) -51)
- (scale-float (float -6053340750866915 1.0d0) -105)
- (scale-float (float -8882396232419406 1.0d0) -162)
- (scale-float (float 8415922436627511 1.0d0) -217)
- (scale-float (float -8167642716962816 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5048590830009955 1.0d0) -51)
- (scale-float (float 7335918697772098 1.0d0) -109)
- (scale-float (float 7423528817062502 1.0d0) -163)
- (scale-float (float -4886998882716538 1.0d0) -219)
- (scale-float (float 8753680899637248 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5069480135892235 1.0d0) -51)
- (scale-float (float 6045661561354841 1.0d0) -106)
- (scale-float (float 8363566791655380 1.0d0) -161)
- (scale-float (float 6845974533746061 1.0d0) -215)
- (scale-float (float -4509504156139520 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5090514222358945 1.0d0) -51)
- (scale-float (float 7190510340535113 1.0d0) -106)
- (scale-float (float 5890419486080867 1.0d0) -167)
- (scale-float (float -7122745049242660 1.0d0) -224)
- (scale-float (float 7310302068604928 1.0d0) -278))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5111694699848430 1.0d0) -51)
- (scale-float (float 5483748244787137 1.0d0) -107)
- (scale-float (float -5020254488207729 1.0d0) -161)
- (scale-float (float 6670570467928192 1.0d0) -215)
- (scale-float (float 6912704542277632 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5133023202681233 1.0d0) -51)
- (scale-float (float 5187364127395310 1.0d0) -105)
- (scale-float (float 8300646378869403 1.0d0) -159)
- (scale-float (float -5221669431796945 1.0d0) -215)
- (scale-float (float 4714004968767488 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5154501389504865 1.0d0) -51)
- (scale-float (float 6803343744872140 1.0d0) -107)
- (scale-float (float -5203608947079411 1.0d0) -162)
- (scale-float (float 4522094436765395 1.0d0) -216)
- (scale-float (float 8611772949594112 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5176130943748547 1.0d0) -51)
- (scale-float (float -5441889602618156 1.0d0) -105)
- (scale-float (float 6259432116541894 1.0d0) -161)
- (scale-float (float 4941127140625123 1.0d0) -217)
- (scale-float (float -8637838431092736 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5197913574088192 1.0d0) -51)
- (scale-float (float 7066328729374402 1.0d0) -105)
- (scale-float (float -6287158470809953 1.0d0) -159)
- (scale-float (float 6935368526095743 1.0d0) -213)
- (scale-float (float -7711666968453120 1.0d0) -267))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5219851014921900 1.0d0) -51)
- (scale-float (float -6974571225775474 1.0d0) -105)
- (scale-float (float -4901240255402509 1.0d0) -159)
- (scale-float (float -4786990831072783 1.0d0) -213)
- (scale-float (float 6575470324473856 1.0d0) -267))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5241945026856225 1.0d0) -51)
- (scale-float (float -5414371478039603 1.0d0) -109)
- (scale-float (float -7736602184165943 1.0d0) -164)
- (scale-float (float -7046188211546697 1.0d0) -218)
- (scale-float (float 8888955994636288 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5264197397203533 1.0d0) -51)
- (scale-float (float -8669752661318607 1.0d0) -107)
- (scale-float (float 8366992181009039 1.0d0) -163)
- (scale-float (float 7423499375372000 1.0d0) -218)
- (scale-float (float 8767186408570880 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5286609940490712 1.0d0) -51)
- (scale-float (float -6357280574964786 1.0d0) -106)
- (scale-float (float 7127335893195073 1.0d0) -160)
- (scale-float (float 7981588227270946 1.0d0) -216)
- (scale-float (float 7131279199830016 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5309184498979563 1.0d0) -51)
- (scale-float (float -4874544659022375 1.0d0) -107)
- (scale-float (float 6677772519316173 1.0d0) -163)
- (scale-float (float -8282309486460135 1.0d0) -217)
- (scale-float (float -7243769177440256 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5331922943199174 1.0d0) -51)
- (scale-float (float 5261513758043363 1.0d0) -106)
- (scale-float (float -5884317562049580 1.0d0) -160)
- (scale-float (float -7923704492742146 1.0d0) -214)
- (scale-float (float -7631285629173760 1.0d0) -268))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5354827172490604 1.0d0) -51)
- (scale-float (float -8979476452914960 1.0d0) -105)
- (scale-float (float 4529659095750735 1.0d0) -159)
- (scale-float (float -8055194514632460 1.0d0) -213)
- (scale-float (float 7736670310006784 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5377899115564205 1.0d0) -51)
- (scale-float (float -7528830301329629 1.0d0) -106)
- (scale-float (float -8294784902659568 1.0d0) -160)
- (scale-float (float -6672711106583245 1.0d0) -214)
- (scale-float (float -6428203355668480 1.0d0) -268))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5401140731069939 1.0d0) -51)
- (scale-float (float 5021258835161679 1.0d0) -105)
- (scale-float (float -8475377105953127 1.0d0) -159)
- (scale-float (float -6465153705599298 1.0d0) -213)
- (scale-float (float 7212519501856768 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5424554008181028 1.0d0) -51)
- (scale-float (float -4607004270222649 1.0d0) -106)
- (scale-float (float 5204639725983234 1.0d0) -160)
- (scale-float (float 8705251709549022 1.0d0) -214)
- (scale-float (float 7133914591756288 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5448140967191309 1.0d0) -51)
- (scale-float (float 8646614564653609 1.0d0) -106)
- (scale-float (float -5712905332475541 1.0d0) -162)
- (scale-float (float 6938154409421564 1.0d0) -216)
- (scale-float (float -5754158783922176 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5471903660126681 1.0d0) -51)
- (scale-float (float -5095312074389999 1.0d0) -106)
- (scale-float (float 7931656830074564 1.0d0) -161)
- (scale-float (float -5830558179139865 1.0d0) -218)
- (scale-float (float -5744915649658880 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5495844171371012 1.0d0) -51)
- (scale-float (float -4894476073017885 1.0d0) -106)
- (scale-float (float 6807544078025369 1.0d0) -160)
- (scale-float (float -7133279682058488 1.0d0) -218)
- (scale-float (float 7054428971204608 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5519964618306929 1.0d0) -51)
- (scale-float (float -6416462666131916 1.0d0) -107)
- (scale-float (float 7863359652854172 1.0d0) -161)
- (scale-float (float -7838341582992422 1.0d0) -215)
- (scale-float (float -8228378776305664 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5544267151971889 1.0d0) -51)
- (scale-float (float -5226213724553011 1.0d0) -111)
- (scale-float (float 8046249584213555 1.0d0) -165)
- (scale-float (float 6563760929495511 1.0d0) -219)
- (scale-float (float 8097551255339008 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5568753957729966 1.0d0) -51)
- (scale-float (float 7713400854565827 1.0d0) -105)
- (scale-float (float 6795642500519700 1.0d0) -159)
- (scale-float (float -7106626022303940 1.0d0) -215)
- (scale-float (float 5941329437065216 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5593427255959795 1.0d0) -51)
- (scale-float (float -6081037327893907 1.0d0) -106)
- (scale-float (float 7970762074757326 1.0d0) -162)
- (scale-float (float -6749885305048105 1.0d0) -216)
- (scale-float (float -7206150177030144 1.0d0) -276))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5618289302759119 1.0d0) -51)
- (scale-float (float 8411841686874487 1.0d0) -106)
- (scale-float (float 6755054143227277 1.0d0) -160)
- (scale-float (float -4938978473436258 1.0d0) -215)
- (scale-float (float -7889371068432384 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5643342390666428 1.0d0) -51)
- (scale-float (float 6381605915332618 1.0d0) -108)
- (scale-float (float 5442530084911321 1.0d0) -162)
- (scale-float (float 7512696284912952 1.0d0) -217)
- (scale-float (float -7465305593217024 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5668588849400150 1.0d0) -51)
- (scale-float (float -4824898652263998 1.0d0) -107)
- (scale-float (float -7441524904278837 1.0d0) -162)
- (scale-float (float 4647007709531591 1.0d0) -217)
- (scale-float (float -7303187868418048 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5694031046615916 1.0d0) -51)
- (scale-float (float 8065260404872413 1.0d0) -105)
- (scale-float (float -6952816197282389 1.0d0) -159)
- (scale-float (float 7343186202974057 1.0d0) -213)
- (scale-float (float 7392816730210304 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5719671388682408 1.0d0) -51)
- (scale-float (float -7348161466087215 1.0d0) -105)
- (scale-float (float -7879178996262785 1.0d0) -160)
- (scale-float (float -7711612515492415 1.0d0) -215)
- (scale-float (float 6975023881781248 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5745512321476315 1.0d0) -51)
- (scale-float (float -7659638510672767 1.0d0) -105)
- (scale-float (float 6720014610390876 1.0d0) -160)
- (scale-float (float -8073794397910470 1.0d0) -214)
- (scale-float (float 8255404920537088 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5771556331196972 1.0d0) -51)
- (scale-float (float -7813292155535222 1.0d0) -105)
- (scale-float (float 5009221391627732 1.0d0) -161)
- (scale-float (float -6456552747873212 1.0d0) -215)
- (scale-float (float -6149339523448832 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5797805945201227 1.0d0) -51)
- (scale-float (float -7557645550883749 1.0d0) -105)
- (scale-float (float -7915090557340896 1.0d0) -159)
- (scale-float (float -7018273162534285 1.0d0) -213)
- (scale-float (float 5344075355799552 1.0d0) -267))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5824263732859141 1.0d0) -51)
- (scale-float (float -7884952149805945 1.0d0) -105)
- (scale-float (float -5159967214455188 1.0d0) -159)
- (scale-float (float 7172972689937679 1.0d0) -214)
- (scale-float (float 8157315371204608 1.0d0) -268))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5850932306431123 1.0d0) -51)
- (scale-float (float 7905935284742383 1.0d0) -105)
- (scale-float (float -6414526615471992 1.0d0) -160)
- (scale-float (float 4929929863576799 1.0d0) -216)
- (scale-float (float 6126455935991808 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5877814321967136 1.0d0) -51)
- (scale-float (float 5621961757749764 1.0d0) -105)
- (scale-float (float -5016585245184256 1.0d0) -160)
- (scale-float (float 6010357510970292 1.0d0) -214)
- (scale-float (float -5624580296278016 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5904912480228610 1.0d0) -51)
- (scale-float (float 5895526721070294 1.0d0) -106)
- (scale-float (float 5444106544055628 1.0d0) -162)
- (scale-float (float -7325514389665266 1.0d0) -217)
- (scale-float (float 5112038770606080 1.0d0) -275))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5932229527633753 1.0d0) -51)
- (scale-float (float 7983624999651672 1.0d0) -105)
- (scale-float (float -5459533031057239 1.0d0) -159)
- (scale-float (float -4550563774532357 1.0d0) -213)
- (scale-float (float 5859507380076544 1.0d0) -267))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5959768257226944 1.0d0) -51)
- (scale-float (float -8966231485159654 1.0d0) -106)
- (scale-float (float -8496750378350004 1.0d0) -163)
- (scale-float (float -8228487213979660 1.0d0) -219)
- (scale-float (float 8693995341348864 1.0d0) -276))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5987531509672923 1.0d0) -51)
- (scale-float (float -8200523790316435 1.0d0) -105)
- (scale-float (float -6139567409839826 1.0d0) -159)
- (scale-float (float 7752101045204105 1.0d0) -213)
- (scale-float (float 8322997041922048 1.0d0) -267))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6015522174276536 1.0d0) -51)
- (scale-float (float 7704789553074064 1.0d0) -105)
- (scale-float (float 8433852368244117 1.0d0) -160)
- (scale-float (float -5880951381872453 1.0d0) -216)
- (scale-float (float -8171171564093440 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6043743190028794 1.0d0) -51)
- (scale-float (float 6036921086851920 1.0d0) -106)
- (scale-float (float 8234051011137247 1.0d0) -160)
- (scale-float (float 7961946375210463 1.0d0) -216)
- (scale-float (float 8171679322865664 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6072197546680035 1.0d0) -51)
- (scale-float (float 5999656390687878 1.0d0) -106)
- (scale-float (float -7514478823367291 1.0d0) -160)
- (scale-float (float 6342307269558875 1.0d0) -214)
- (scale-float (float 8069490120851456 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6100888285841033 1.0d0) -51)
- (scale-float (float -4931531872331797 1.0d0) -105)
- (scale-float (float 8176120358632703 1.0d0) -162)
- (scale-float (float 6767487229773799 1.0d0) -218)
- (scale-float (float 5146916243898368 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6129818502112884 1.0d0) -51)
- (scale-float (float 5383189178707556 1.0d0) -106)
- (scale-float (float 6675907096834086 1.0d0) -160)
- (scale-float (float 7978880489338739 1.0d0) -215)
- (scale-float (float 7638307093086208 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6158991344246570 1.0d0) -51)
- (scale-float (float -8090362650898998 1.0d0) -105)
- (scale-float (float 5369267238238968 1.0d0) -162)
- (scale-float (float -6523759782169303 1.0d0) -217)
- (scale-float (float 6051015543357440 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6188410016333092 1.0d0) -51)
- (scale-float (float 4724236536359861 1.0d0) -105)
- (scale-float (float 7059357165123802 1.0d0) -159)
- (scale-float (float 5221739416005693 1.0d0) -216)
- (scale-float (float 6826684288073728 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6218077779025146 1.0d0) -51)
- (scale-float (float -6251944745414709 1.0d0) -108)
- (scale-float (float 5123854585938166 1.0d0) -165)
- (scale-float (float 7116456554960860 1.0d0) -219)
- (scale-float (float 4530221452099584 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6247997950791287 1.0d0) -51)
- (scale-float (float 5439552468708916 1.0d0) -106)
- (scale-float (float -8882280559834756 1.0d0) -162)
- (scale-float (float -8272987149381948 1.0d0) -217)
- (scale-float (float 6571692570181632 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6278173909203627 1.0d0) -51)
- (scale-float (float -6901727922723381 1.0d0) -105)
- (scale-float (float -4986394678511562 1.0d0) -161)
- (scale-float (float 6547555955038370 1.0d0) -218)
- (scale-float (float -6640540286976000 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6308609092260090 1.0d0) -51)
- (scale-float (float -8837928786541953 1.0d0) -105)
- (scale-float (float -6613274258861481 1.0d0) -162)
- (scale-float (float 8688491329006199 1.0d0) -217)
- (scale-float (float 4504378864697344 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6339306999742332 1.0d0) -51)
- (scale-float (float -8288843741059024 1.0d0) -106)
- (scale-float (float 6350533170553388 1.0d0) -161)
- (scale-float (float -8360560479621588 1.0d0) -218)
- (scale-float (float 8364079593816064 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6370271194610440 1.0d0) -51)
- (scale-float (float -6518155099083777 1.0d0) -105)
- (scale-float (float -6038417189504289 1.0d0) -160)
- (scale-float (float -7128785879668580 1.0d0) -216)
- (scale-float (float 8412241397809152 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6401505304435580 1.0d0) -51)
- (scale-float (float -4999195251707746 1.0d0) -110)
- (scale-float (float 8038539748005316 1.0d0) -165)
- (scale-float (float -8036607354636888 1.0d0) -220)
- (scale-float (float -5376154848460800 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6433013022871812 1.0d0) -51)
- (scale-float (float -7626852145047280 1.0d0) -106)
- (scale-float (float 7459985134696886 1.0d0) -160)
- (scale-float (float -5159078215081610 1.0d0) -216)
- (scale-float (float 8560462123237376 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6464798111168313 1.0d0) -51)
- (scale-float (float 7501040285603475 1.0d0) -106)
- (scale-float (float 8018324288738598 1.0d0) -162)
- (scale-float (float -6342949296724604 1.0d0) -216)
- (scale-float (float -5096051963068416 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6496864399723325 1.0d0) -51)
- (scale-float (float 7876185139232344 1.0d0) -106)
- (scale-float (float -7609778355197976 1.0d0) -160)
- (scale-float (float 5093494223218626 1.0d0) -214)
- (scale-float (float 7184254992711680 1.0d0) -268))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6529215789681160 1.0d0) -51)
- (scale-float (float 6729802859343160 1.0d0) -105)
- (scale-float (float 7796110258450682 1.0d0) -159)
- (scale-float (float -5202284202884131 1.0d0) -214)
- (scale-float (float 8914430446239744 1.0d0) -268))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6561856254573676 1.0d0) -51)
- (scale-float (float -5190654407787621 1.0d0) -105)
- (scale-float (float -7263540477816891 1.0d0) -160)
- (scale-float (float 7779826172741251 1.0d0) -215)
- (scale-float (float 7870240966180864 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6594789842007661 1.0d0) -51)
- (scale-float (float -7238221634569465 1.0d0) -106)
- (scale-float (float -5053155242950983 1.0d0) -160)
- (scale-float (float -5036373716517053 1.0d0) -215)
- (scale-float (float -6671479789518848 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6628020675399646 1.0d0) -51)
- (scale-float (float 5924348315271874 1.0d0) -105)
- (scale-float (float 8366492207957549 1.0d0) -160)
- (scale-float (float -5646892803276892 1.0d0) -215)
- (scale-float (float 5359968125452288 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6661552955759695 1.0d0) -51)
- (scale-float (float 6701751515766405 1.0d0) -105)
- (scale-float (float -7926847899386801 1.0d0) -159)
- (scale-float (float 5978713910654175 1.0d0) -213)
- (scale-float (float 8874255562604544 1.0d0) -267))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6695390963525798 1.0d0) -51)
- (scale-float (float 8105704162424153 1.0d0) -105)
- (scale-float (float 8988375981610543 1.0d0) -160)
- (scale-float (float 6383754624949512 1.0d0) -216)
- (scale-float (float 6485553458053120 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6729539060450555 1.0d0) -51)
- (scale-float (float 7916080741383838 1.0d0) -106)
- (scale-float (float -7752970711675811 1.0d0) -161)
- (scale-float (float 5901656818334949 1.0d0) -216)
- (scale-float (float 7648927773884416 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6764001691541890 1.0d0) -51)
- (scale-float (float -6553353190768230 1.0d0) -106)
- (scale-float (float -5081751237339140 1.0d0) -162)
- (scale-float (float 8176295913786153 1.0d0) -218)
- (scale-float (float 8613530542538752 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6798783387059614 1.0d0) -51)
- (scale-float (float -7929472031966393 1.0d0) -108)
- (scale-float (float -4911422655204277 1.0d0) -162)
- (scale-float (float 8955618777007174 1.0d0) -218)
- (scale-float (float 7706521824133120 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6833888764569722 1.0d0) -51)
- (scale-float (float -5292870815099165 1.0d0) -105)
- (scale-float (float -5836714772574762 1.0d0) -159)
- (scale-float (float -8180593236381880 1.0d0) -215)
- (scale-float (float -6553879517200384 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6869322531058373 1.0d0) -51)
- (scale-float (float 8127118399568990 1.0d0) -106)
- (scale-float (float 5676352161425082 1.0d0) -160)
- (scale-float (float -4514481077430716 1.0d0) -215)
- (scale-float (float 6990784986873856 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6905089485107600 1.0d0) -51)
- (scale-float (float 7941854388440301 1.0d0) -106)
- (scale-float (float -6274378359705686 1.0d0) -163)
- (scale-float (float -7730400902250684 1.0d0) -217)
- (scale-float (float 5701128951169024 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6941194519134846 1.0d0) -51)
- (scale-float (float 4921493231476445 1.0d0) -105)
- (scale-float (float -7743466396743664 1.0d0) -159)
- (scale-float (float 7307110042968542 1.0d0) -213)
- (scale-float (float 8389575235633152 1.0d0) -268))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6977642621698538 1.0d0) -51)
- (scale-float (float -7423923522575052 1.0d0) -105)
- (scale-float (float 7641940602421304 1.0d0) -159)
- (scale-float (float 4629250081403575 1.0d0) -213)
- (scale-float (float 6675849887367168 1.0d0) -268))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7014438879871967 1.0d0) -51)
- (scale-float (float -8394404652697775 1.0d0) -106)
- (scale-float (float 7157644467169002 1.0d0) -160)
- (scale-float (float -5820640180691281 1.0d0) -215)
- (scale-float (float -8467445117943808 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7051588481687863 1.0d0) -51)
- (scale-float (float -8415612935486841 1.0d0) -106)
- (scale-float (float 5862178941276274 1.0d0) -161)
- (scale-float (float 4530747012453627 1.0d0) -216)
- (scale-float (float 8957285770461184 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7089096718656115 1.0d0) -51)
- (scale-float (float -8988623810541504 1.0d0) -107)
- (scale-float (float -6357074361166835 1.0d0) -162)
- (scale-float (float 6154496251865445 1.0d0) -218)
- (scale-float (float 6200049233035264 1.0d0) -275))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7126968988357218 1.0d0) -51)
- (scale-float (float -8480961676313264 1.0d0) -105)
- (scale-float (float -7712442745791269 1.0d0) -159)
- (scale-float (float -5239543786013774 1.0d0) -214)
- (scale-float (float 7045658681016320 1.0d0) -268))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7165210797114106 1.0d0) -51)
- (scale-float (float 7700568231823572 1.0d0) -106)
- (scale-float (float -7406054564472367 1.0d0) -160)
- (scale-float (float -7358469173914418 1.0d0) -216)
- (scale-float (float -7519544786288640 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7203827762745163 1.0d0) -51)
- (scale-float (float -8935949083937952 1.0d0) -107)
- (scale-float (float -8153920744736936 1.0d0) -161)
- (scale-float (float 8688621902745907 1.0d0) -215)
- (scale-float (float 4583263766577152 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7242825617401282 1.0d0) -51)
- (scale-float (float 6857587878618236 1.0d0) -105)
- (scale-float (float -4981355659199376 1.0d0) -160)
- (scale-float (float 6874045785122838 1.0d0) -215)
- (scale-float (float -6376800195051520 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7282210210490010 1.0d0) -51)
- (scale-float (float -4738430057508652 1.0d0) -106)
- (scale-float (float 8833475258022985 1.0d0) -161)
- (scale-float (float 4981030870780250 1.0d0) -215)
- (scale-float (float -5347870285758464 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7321987511689883 1.0d0) -51)
- (scale-float (float -5857178150935811 1.0d0) -105)
- (scale-float (float -6265551417104925 1.0d0) -161)
- (scale-float (float 6844897857731275 1.0d0) -216)
- (scale-float (float -5694651358314496 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7362163614058240 1.0d0) -51)
- (scale-float (float 6783085541279102 1.0d0) -109)
- (scale-float (float 7859549562576587 1.0d0) -166)
- (scale-float (float -6321137675554510 1.0d0) -220)
- (scale-float (float 6151580868935680 1.0d0) -276))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7402744737235899 1.0d0) -51)
- (scale-float (float 5826661825513513 1.0d0) -105)
- (scale-float (float 4722787450303004 1.0d0) -159)
- (scale-float (float 8889379743214574 1.0d0) -213)
- (scale-float (float -5671615219236864 1.0d0) -268))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7443737230752240 1.0d0) -51)
- (scale-float (float -8261179564339104 1.0d0) -107)
- (scale-float (float -5210150822761837 1.0d0) -162)
- (scale-float (float 8435610505367672 1.0d0) -217)
- (scale-float (float -6921801066479616 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7485147577434384 1.0d0) -51)
- (scale-float (float -7746235839321906 1.0d0) -105)
- (scale-float (float 8921070586273898 1.0d0) -159)
- (scale-float (float -6923883465895084 1.0d0) -217)
- (scale-float (float -7992444014297088 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7526982396924318 1.0d0) -51)
- (scale-float (float -6529692868560719 1.0d0) -105)
- (scale-float (float -8023969424071208 1.0d0) -159)
- (scale-float (float 8466342476385449 1.0d0) -213)
- (scale-float (float -7626166008889344 1.0d0) -268))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7569248449307968 1.0d0) -51)
- (scale-float (float 4726279542391038 1.0d0) -105)
- (scale-float (float 6890139958585708 1.0d0) -159)
- (scale-float (float -8999936867929505 1.0d0) -215)
- (scale-float (float -4868498977882112 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7611952638860404 1.0d0) -51)
- (scale-float (float 7399915739935990 1.0d0) -106)
- (scale-float (float 8589714836764690 1.0d0) -161)
- (scale-float (float 5977285365407618 1.0d0) -215)
- (scale-float (float -7428450855813120 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7655102017911529 1.0d0) -51)
- (scale-float (float 7506410393561631 1.0d0) -105)
- (scale-float (float -5394245790627243 1.0d0) -159)
- (scale-float (float -8242751787003902 1.0d0) -213)
- (scale-float (float 6910160299589632 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7698703790836811 1.0d0) -51)
- (scale-float (float 5786896408814132 1.0d0) -105)
- (scale-float (float -4609369708837267 1.0d0) -159)
- (scale-float (float -4540077709761017 1.0d0) -213)
- (scale-float (float 8548340121714688 1.0d0) -267))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7742765318177789 1.0d0) -51)
- (scale-float (float -5596500424293238 1.0d0) -105)
- (scale-float (float -8063416793361335 1.0d0) -160)
- (scale-float (float -7995889815279433 1.0d0) -215)
- (scale-float (float 7770624799277056 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7787294120897310 1.0d0) -51)
- (scale-float (float -6772199196047746 1.0d0) -106)
- (scale-float (float -6731960923186983 1.0d0) -160)
- (scale-float (float 4674597293263062 1.0d0) -215)
- (scale-float (float 7139922087641088 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7832297884774669 1.0d0) -51)
- (scale-float (float -5048038496396898 1.0d0) -105)
- (scale-float (float 8940524654060071 1.0d0) -161)
- (scale-float (float -6783618196883706 1.0d0) -215)
- (scale-float (float 6637776996073472 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7877784464946035 1.0d0) -51)
- (scale-float (float -5559913482652101 1.0d0) -108)
- (scale-float (float 4867247987272535 1.0d0) -164)
- (scale-float (float -6631941685441833 1.0d0) -220)
- (scale-float (float -5317690890649600 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7923761890595812 1.0d0) -51)
- (scale-float (float -7251158095886052 1.0d0) -105)
- (scale-float (float -8753078656369743 1.0d0) -159)
- (scale-float (float 5967633169533952 1.0d0) -213)
- (scale-float (float -6325817437396992 1.0d0) -267))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7970238369804807 1.0d0) -51)
- (scale-float (float 6771427195132246 1.0d0) -106)
- (scale-float (float -7472855250253256 1.0d0) -160)
- (scale-float (float -6261510490372424 1.0d0) -216)
- (scale-float (float -7294060512280576 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8017222294561371 1.0d0) -51)
- (scale-float (float 6188152956309083 1.0d0) -105)
- (scale-float (float 8264282418128883 1.0d0) -161)
- (scale-float (float 7128645473169422 1.0d0) -215)
- (scale-float (float -5771677092806656 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8064722245941921 1.0d0) -51)
- (scale-float (float -7696383312935042 1.0d0) -105)
- (scale-float (float 7360946333214011 1.0d0) -160)
- (scale-float (float 7285082360734910 1.0d0) -215)
- (scale-float (float 8542445019725824 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8112746999467572 1.0d0) -51)
- (scale-float (float 8187173324919323 1.0d0) -105)
- (scale-float (float -8256765008873559 1.0d0) -159)
- (scale-float (float -5849118320319961 1.0d0) -215)
- (scale-float (float -5713132093308928 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8161305530643912 1.0d0) -51)
- (scale-float (float 7190559810930833 1.0d0) -105)
- (scale-float (float 8945174339794752 1.0d0) -160)
- (scale-float (float -7822736574898218 1.0d0) -215)
- (scale-float (float 6714336152485888 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8210407020691239 1.0d0) -51)
- (scale-float (float 5282090276356495 1.0d0) -105)
- (scale-float (float -8017162570747744 1.0d0) -159)
- (scale-float (float -7255588291118389 1.0d0) -215)
- (scale-float (float 7181169832034304 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8260060862472975 1.0d0) -51)
- (scale-float (float 7672975741940125 1.0d0) -108)
- (scale-float (float 4654982596957853 1.0d0) -163)
- (scale-float (float 8458457888958846 1.0d0) -218)
- (scale-float (float -7397705978478592 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8310276666630280 1.0d0) -51)
- (scale-float (float -8561057823978051 1.0d0) -105)
- (scale-float (float 8987823333616882 1.0d0) -159)
- (scale-float (float 8483536639603670 1.0d0) -213)
- (scale-float (float -6640518556999680 1.0d0) -267))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8361064267931287 1.0d0) -51)
- (scale-float (float 4875936485634582 1.0d0) -105)
- (scale-float (float 6474614473850059 1.0d0) -164)
- (scale-float (float 5402310386390347 1.0d0) -218)
- (scale-float (float -7259309102596096 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8412433731843778 1.0d0) -51)
- (scale-float (float -5304292491435615 1.0d0) -105)
- (scale-float (float 5222297456002257 1.0d0) -160)
- (scale-float (float -4626527544205458 1.0d0) -215)
- (scale-float (float 7731223709941760 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8464395361340506 1.0d0) -51)
- (scale-float (float -6318490403494006 1.0d0) -107)
- (scale-float (float -4947313154358635 1.0d0) -163)
- (scale-float (float -8365986417657694 1.0d0) -217)
- (scale-float (float 9003226564132864 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8516959703946860 1.0d0) -51)
- (scale-float (float -7740837529246338 1.0d0) -105)
- (scale-float (float -7327369189732175 1.0d0) -159)
- (scale-float (float 8456165783067005 1.0d0) -213)
- (scale-float (float -7576792096268288 1.0d0) -267))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8570137559040969 1.0d0) -51)
- (scale-float (float 8192976842046790 1.0d0) -108)
- (scale-float (float -7518639525906179 1.0d0) -162)
- (scale-float (float -8976617533136752 1.0d0) -216)
- (scale-float (float -4574964295925760 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8623939985416884 1.0d0) -51)
- (scale-float (float 6658592239328841 1.0d0) -105)
- (scale-float (float -5419939435203819 1.0d0) -160)
- (scale-float (float -7495812436628397 1.0d0) -216)
- (scale-float (float 5834452430880768 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8678378309121946 1.0d0) -51)
- (scale-float (float -7864870860087257 1.0d0) -105)
- (scale-float (float -4803742861282819 1.0d0) -159)
- (scale-float (float -5120356770415822 1.0d0) -220)
- (scale-float (float 6396238970748928 1.0d0) -275))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8733464131580015 1.0d0) -51)
- (scale-float (float -8808454025372720 1.0d0) -105)
- (scale-float (float -4904442800084773 1.0d0) -162)
- (scale-float (float 6143491931581079 1.0d0) -218)
- (scale-float (float 8919004198469632 1.0d0) -278))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8789209338012807 1.0d0) -51)
- (scale-float (float -5406296489369190 1.0d0) -105)
- (scale-float (float 6460375952085455 1.0d0) -163)
- (scale-float (float 7672604456401427 1.0d0) -219)
- (scale-float (float 8577878639771648 1.0d0) -275))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8845626106172164 1.0d0) -51)
- (scale-float (float 5348045675097815 1.0d0) -105)
- (scale-float (float -7345645369964838 1.0d0) -164)
- (scale-float (float -4531525080663575 1.0d0) -219)
- (scale-float (float 7010501968003072 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8902726915396748 1.0d0) -51)
- (scale-float (float -6751675042412244 1.0d0) -106)
- (scale-float (float 6500058370502824 1.0d0) -161)
- (scale-float (float -4845843510975655 1.0d0) -215)
- (scale-float (float -8677911690870784 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8960524556007295 1.0d0) -51)
- (scale-float (float 8343960778596904 1.0d0) -105)
- (scale-float (float 6251044459645375 1.0d0) -159)
- (scale-float (float -6706021169010735 1.0d0) -213)
- (scale-float (float 5632266774601728 1.0d0) -267))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4509516069527655 1.0d0) -50)
- (scale-float (float -9003604755548678 1.0d0) -104)
- (scale-float (float 7945002462861670 1.0d0) -158)
- (scale-float (float -7137880400680410 1.0d0) -213)
- (scale-float (float 5016893773414400 1.0d0) -267))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4539131553220387 1.0d0) -50)
- (scale-float (float 6761206752834757 1.0d0) -104)
- (scale-float (float 5133846886632951 1.0d0) -158)
- (scale-float (float 8962299467741687 1.0d0) -214)
- (scale-float (float 4621111823237120 1.0d0) -268))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4569115620707661 1.0d0) -50)
- (scale-float (float -5153202329852192 1.0d0) -104)
- (scale-float (float -6471403712483476 1.0d0) -164)
- (scale-float (float -7023121165220965 1.0d0) -218)
- (scale-float (float -8756051585794048 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4599475339744027 1.0d0) -50)
- (scale-float (float 6345979468902371 1.0d0) -104)
- (scale-float (float -6867564541453276 1.0d0) -159)
- (scale-float (float 6432872785199118 1.0d0) -213)
- (scale-float (float 7581670466650112 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4630217959876098 1.0d0) -50)
- (scale-float (float -4783933892416316 1.0d0) -104)
- (scale-float (float -5954579217658060 1.0d0) -158)
- (scale-float (float -7711445062385882 1.0d0) -212)
- (scale-float (float -6352239898648576 1.0d0) -266))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4661350918325794 1.0d0) -50)
- (scale-float (float -6230918561515408 1.0d0) -104)
- (scale-float (float -8789780586633317 1.0d0) -161)
- (scale-float (float 6462073266128705 1.0d0) -218)
- (scale-float (float -7636234883563520 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4692881846103566 1.0d0) -50)
- (scale-float (float 7238083593817055 1.0d0) -105)
- (scale-float (float 8349670734560448 1.0d0) -159)
- (scale-float (float 5733681666817907 1.0d0) -213)
- (scale-float (float -7346060120997888 1.0d0) -267))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4724818574362134 1.0d0) -50)
- (scale-float (float -6385143788279820 1.0d0) -104)
- (scale-float (float 5022122131678795 1.0d0) -160)
- (scale-float (float 8740656214833543 1.0d0) -215)
- (scale-float (float 6341627965997056 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4757169141001852 1.0d0) -50)
- (scale-float (float 7149429343620709 1.0d0) -104)
- (scale-float (float -6616931038813688 1.0d0) -159)
- (scale-float (float -7254808900455180 1.0d0) -214)
- (scale-float (float 5191649247428608 1.0d0) -268))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4789941797539425 1.0d0) -50)
- (scale-float (float -7628787545294423 1.0d0) -106)
- (scale-float (float 6455017983769130 1.0d0) -161)
- (scale-float (float 6358316267805699 1.0d0) -215)
- (scale-float (float -9002454314319872 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4823145016252275 1.0d0) -50)
- (scale-float (float -7334035373116727 1.0d0) -104)
- (scale-float (float 5099180732128586 1.0d0) -160)
- (scale-float (float -5173345489809667 1.0d0) -215)
- (scale-float (float -6540352120684544 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4856787497611582 1.0d0) -50)
- (scale-float (float 8156218527095231 1.0d0) -104)
- (scale-float (float -8332260027347510 1.0d0) -158)
- (scale-float (float -7129580887322615 1.0d0) -213)
- (scale-float (float 5952686945517568 1.0d0) -267))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4890878178017684 1.0d0) -50)
- (scale-float (float 8461317837993017 1.0d0) -106)
- (scale-float (float 8701936458636591 1.0d0) -163)
- (scale-float (float -8356379822678236 1.0d0) -218)
- (scale-float (float 7422021349146624 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4925426237852275 1.0d0) -50)
- (scale-float (float 7980128087192890 1.0d0) -107)
- (scale-float (float 4545289477488823 1.0d0) -161)
- (scale-float (float -6750115855405710 1.0d0) -215)
- (scale-float (float 6646581618802688 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4960441109862665 1.0d0) -50)
- (scale-float (float 5080919491685400 1.0d0) -104)
- (scale-float (float -8010274743627501 1.0d0) -159)
- (scale-float (float -7423464212987668 1.0d0) -213)
- (scale-float (float 5294298645381120 1.0d0) -267))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4995932487894169 1.0d0) -50)
- (scale-float (float 7940559207040706 1.0d0) -106)
- (scale-float (float -8788563659638543 1.0d0) -160)
- (scale-float (float 5010624414890243 1.0d0) -215)
- (scale-float (float 8018235342585856 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5031910335987612 1.0d0) -50)
- (scale-float (float 4513077542546340 1.0d0) -105)
- (scale-float (float -6401484556862434 1.0d0) -159)
- (scale-float (float -6359957998872694 1.0d0) -218)
- (scale-float (float -6959123998441472 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5068384897859891 1.0d0) -50)
- (scale-float (float -8946762494427943 1.0d0) -108)
- (scale-float (float 8559804099710120 1.0d0) -163)
- (scale-float (float -6400264802268333 1.0d0) -218)
- (scale-float (float 6703336401141760 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5105366706786536 1.0d0) -50)
- (scale-float (float -8283733376201077 1.0d0) -104)
- (scale-float (float -8807764976477015 1.0d0) -158)
- (scale-float (float 8803214751938296 1.0d0) -212)
- (scale-float (float 4599362420514816 1.0d0) -266))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5142866595906302 1.0d0) -50)
- (scale-float (float 7331094116337834 1.0d0) -105)
- (scale-float (float 4863000065712877 1.0d0) -159)
- (scale-float (float -5277204497363467 1.0d0) -213)
- (scale-float (float 8031190002630656 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5180895708968975 1.0d0) -50)
- (scale-float (float 6807362163125418 1.0d0) -105)
- (scale-float (float -6119748019175263 1.0d0) -159)
- (scale-float (float -7378083528827103 1.0d0) -217)
- (scale-float (float -4588861610786816 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5219465511548777 1.0d0) -50)
- (scale-float (float -7260518796981983 1.0d0) -104)
- (scale-float (float 6598583475956675 1.0d0) -159)
- (scale-float (float 6173825293514267 1.0d0) -213)
- (scale-float (float -6262313850830848 1.0d0) -267))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5258587802747089 1.0d0) -50)
- (scale-float (float -5051042201835522 1.0d0) -104)
- (scale-float (float 8025745141563703 1.0d0) -159)
- (scale-float (float 7729194583210239 1.0d0) -213)
- (scale-float (float -4703692156764160 1.0d0) -267))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5298274727409582 1.0d0) -50)
- (scale-float (float -6885866100053312 1.0d0) -104)
- (scale-float (float 4912213142221467 1.0d0) -161)
- (scale-float (float 5995405784532706 1.0d0) -215)
- (scale-float (float 7609428393852928 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5338538788884320 1.0d0) -50)
- (scale-float (float 7124106248024052 1.0d0) -104)
- (scale-float (float 8533119225005958 1.0d0) -158)
- (scale-float (float -7645730062438869 1.0d0) -214)
- (scale-float (float 5138065259790336 1.0d0) -268))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5379392862349007 1.0d0) -50)
- (scale-float (float 8975559828220188 1.0d0) -105)
- (scale-float (float -8000242586721298 1.0d0) -161)
- (scale-float (float 5320081746222626 1.0d0) -215)
- (scale-float (float -5970429177888768 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5420850208737201 1.0d0) -50)
- (scale-float (float -7849481048430194 1.0d0) -104)
- (scale-float (float -6921638314359172 1.0d0) -161)
- (scale-float (float 5596441475613145 1.0d0) -216)
- (scale-float (float 8471223942381568 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5462924489295155 1.0d0) -50)
- (scale-float (float 4714356898291527 1.0d0) -105)
- (scale-float (float 4603898149283534 1.0d0) -160)
- (scale-float (float 4597813234259312 1.0d0) -215)
- (scale-float (float 8365094230687744 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5505629780802853 1.0d0) -50)
- (scale-float (float -6087459928275142 1.0d0) -104)
- (scale-float (float 6592072064442311 1.0d0) -160)
- (scale-float (float -8897432989678575 1.0d0) -214)
- (scale-float (float 5101552066691072 1.0d0) -268))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5548980591494850 1.0d0) -50)
- (scale-float (float -5707243334247258 1.0d0) -104)
- (scale-float (float -6995571206380477 1.0d0) -158)
- (scale-float (float 5461085508687361 1.0d0) -212)
- (scale-float (float 7354597165162496 1.0d0) -266))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5592991877718771 1.0d0) -50)
- (scale-float (float -8781430034791285 1.0d0) -105)
- (scale-float (float 5983742883036689 1.0d0) -159)
- (scale-float (float 7644662357765321 1.0d0) -213)
- (scale-float (float -8799358646222848 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5637679061371630 1.0d0) -50)
- (scale-float (float 8044421629298322 1.0d0) -107)
- (scale-float (float -5673000887721991 1.0d0) -161)
- (scale-float (float -6237881232938835 1.0d0) -215)
- (scale-float (float -6198817329119232 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5683058048156686 1.0d0) -50)
- (scale-float (float -7263779146785172 1.0d0) -104)
- (scale-float (float 4686896085329360 1.0d0) -159)
- (scale-float (float 5956979900333602 1.0d0) -216)
- (scale-float (float -8659439195258880 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5729145246706231 1.0d0) -50)
- (scale-float (float 6067197939783819 1.0d0) -106)
- (scale-float (float -6113275667853501 1.0d0) -160)
- (scale-float (float -5475133526099289 1.0d0) -214)
- (scale-float (float -4581406569594880 1.0d0) -268))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5775957588618625 1.0d0) -50)
- (scale-float (float -5506212132642368 1.0d0) -104)
- (scale-float (float 5647829469965162 1.0d0) -158)
- (scale-float (float -6190962042647805 1.0d0) -212)
- (scale-float (float -7408511503663104 1.0d0) -266))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5823512549460958 1.0d0) -50)
- (scale-float (float -5997253237019681 1.0d0) -104)
- (scale-float (float 7273679319786539 1.0d0) -158)
- (scale-float (float 5228415801281666 1.0d0) -213)
- (scale-float (float -8711245226049536 1.0d0) -267))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5871828170792095 1.0d0) -50)
- (scale-float (float 5957350573535159 1.0d0) -104)
- (scale-float (float 5272555883617502 1.0d0) -158)
- (scale-float (float -8363853222647010 1.0d0) -212)
- (scale-float (float -8565541235777536 1.0d0) -266))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5920923083264398 1.0d0) -50)
- (scale-float (float -8009226060728125 1.0d0) -104)
- (scale-float (float -7453956738005395 1.0d0) -166)
- (scale-float (float -7653415127803146 1.0d0) -226)
- (scale-float (float 6961805905625088 1.0d0) -283))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5970816530866265 1.0d0) -50)
- (scale-float (float -8079446856470941 1.0d0) -105)
- (scale-float (float -6273627393943648 1.0d0) -159)
- (scale-float (float -7616333708680386 1.0d0) -216)
- (scale-float (float -6013067124015104 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6021528396371782 1.0d0) -50)
- (scale-float (float -7080995246730005 1.0d0) -104)
- (scale-float (float -8945924732893443 1.0d0) -158)
- (scale-float (float -6211653151853270 1.0d0) -212)
- (scale-float (float 7811789019471872 1.0d0) -266))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6073079228068167 1.0d0) -50)
- (scale-float (float -5392427594304996 1.0d0) -104)
- (scale-float (float 5300757067870857 1.0d0) -159)
- (scale-float (float 5793395962721063 1.0d0) -214)
- (scale-float (float 8162820920999936 1.0d0) -268))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6125490267836511 1.0d0) -50)
- (scale-float (float 4774401947932446 1.0d0) -106)
- (scale-float (float -7129275439372922 1.0d0) -160)
- (scale-float (float -7494642291848786 1.0d0) -214)
- (scale-float (float -8499571061948416 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6178783480666426 1.0d0) -50)
- (scale-float (float 5356169124908533 1.0d0) -104)
- (scale-float (float 7028323928064296 1.0d0) -160)
- (scale-float (float 6693444124674697 1.0d0) -214)
- (scale-float (float -5709036984860672 1.0d0) -268))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6232981585690760 1.0d0) -50)
- (scale-float (float 6866781914069713 1.0d0) -104)
- (scale-float (float -7587503791107757 1.0d0) -160)
- (scale-float (float -4673145581771572 1.0d0) -214)
- (scale-float (float 8934278971195392 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6288108088832506 1.0d0) -50)
- (scale-float (float 7190963457537114 1.0d0) -104)
- (scale-float (float -4562520295210538 1.0d0) -159)
- (scale-float (float -8051267711570381 1.0d0) -214)
- (scale-float (float 7222608746577920 1.0d0) -268))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6344187317162466 1.0d0) -50)
- (scale-float (float 4646334939076787 1.0d0) -105)
- (scale-float (float 8517674821997212 1.0d0) -159)
- (scale-float (float -7718028008612148 1.0d0) -214)
- (scale-float (float 8095968110837760 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6401244455073178 1.0d0) -50)
- (scale-float (float -6093139364364458 1.0d0) -104)
- (scale-float (float 7976235787957864 1.0d0) -159)
- (scale-float (float -8305904134587898 1.0d0) -214)
- (scale-float (float 8019880670724096 1.0d0) -268))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6459305582382119 1.0d0) -50)
- (scale-float (float 5211484139752645 1.0d0) -108)
- (scale-float (float -8516312389442720 1.0d0) -162)
- (scale-float (float -5565127845070822 1.0d0) -217)
- (scale-float (float 5023425659142144 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6518397714485308 1.0d0) -50)
- (scale-float (float 8223187886465529 1.0d0) -105)
- (scale-float (float -7795333996363344 1.0d0) -159)
- (scale-float (float 6662723477951573 1.0d0) -216)
- (scale-float (float 5201082628177920 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6578548844691189 1.0d0) -50)
- (scale-float (float 8893169591734547 1.0d0) -105)
- (scale-float (float -7031360776797826 1.0d0) -160)
- (scale-float (float 5922695038479521 1.0d0) -215)
- (scale-float (float -7470986667032576 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6639787988874183 1.0d0) -50)
- (scale-float (float -5325591017587098 1.0d0) -104)
- (scale-float (float 8967602844480112 1.0d0) -159)
- (scale-float (float -8714067795155232 1.0d0) -213)
- (scale-float (float 5877125710118912 1.0d0) -267))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6702145232597557 1.0d0) -50)
- (scale-float (float 5264145955760929 1.0d0) -104)
- (scale-float (float 7640899328253249 1.0d0) -159)
- (scale-float (float -8199995818174760 1.0d0) -215)
- (scale-float (float 8372776688418816 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6765651780866415 1.0d0) -50)
- (scale-float (float -8913235774755133 1.0d0) -105)
- (scale-float (float -5554680047721704 1.0d0) -160)
- (scale-float (float -7100192152346767 1.0d0) -214)
- (scale-float (float 6795542541828096 1.0d0) -268))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6830340010683660 1.0d0) -50)
- (scale-float (float -7544935405342396 1.0d0) -105)
- (scale-float (float -6399750548309840 1.0d0) -159)
- (scale-float (float -6988744419126524 1.0d0) -215)
- (scale-float (float 8766191769550848 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6896243526594935 1.0d0) -50)
- (scale-float (float -7148639483444579 1.0d0) -107)
- (scale-float (float -8149774421085479 1.0d0) -161)
- (scale-float (float 5130992766398235 1.0d0) -215)
- (scale-float (float -5116684355698688 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6963397219422738 1.0d0) -50)
- (scale-float (float 7396017975628843 1.0d0) -105)
- (scale-float (float 4659666528264719 1.0d0) -159)
- (scale-float (float 7909377268086313 1.0d0) -213)
- (scale-float (float 8146787725246464 1.0d0) -268))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7031837328405417 1.0d0) -50)
- (scale-float (float -8006852264312669 1.0d0) -105)
- (scale-float (float 6782117170365220 1.0d0) -161)
- (scale-float (float -4909543439238427 1.0d0) -215)
- (scale-float (float -5806298951581696 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7101601506973565 1.0d0) -50)
- (scale-float (float 5826779434692280 1.0d0) -104)
- (scale-float (float 6406262179461154 1.0d0) -158)
- (scale-float (float 6007871089946416 1.0d0) -215)
- (scale-float (float -8691942719356928 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7172728892414684 1.0d0) -50)
- (scale-float (float -6937304740477504 1.0d0) -107)
- (scale-float (float -8747270011599983 1.0d0) -161)
- (scale-float (float 6032524114605738 1.0d0) -215)
- (scale-float (float -8745824089931776 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7245260179696920 1.0d0) -50)
- (scale-float (float 5505512966988164 1.0d0) -105)
- (scale-float (float 4602729397488698 1.0d0) -161)
- (scale-float (float -6136009817960466 1.0d0) -217)
- (scale-float (float -5825495560093696 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7319237699744493 1.0d0) -50)
- (scale-float (float 8938591627744486 1.0d0) -104)
- (scale-float (float 5137813009951706 1.0d0) -158)
- (scale-float (float -5222551765081983 1.0d0) -214)
- (scale-float (float -5500828197879808 1.0d0) -268))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7394705502481166 1.0d0) -50)
- (scale-float (float 6273553706884387 1.0d0) -104)
- (scale-float (float 8110555903967408 1.0d0) -159)
- (scale-float (float 8908218331107434 1.0d0) -213)
- (scale-float (float -8281934740062208 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7471709444984082 1.0d0) -50)
- (scale-float (float -5155046318705374 1.0d0) -105)
- (scale-float (float 6556986573868921 1.0d0) -159)
- (scale-float (float -4960102419053278 1.0d0) -213)
- (scale-float (float 8664687655157760 1.0d0) -268))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7550297285118669 1.0d0) -50)
- (scale-float (float 7617874065699057 1.0d0) -104)
- (scale-float (float 4961086954657293 1.0d0) -159)
- (scale-float (float 7432056804278926 1.0d0) -213)
- (scale-float (float 6917374136549376 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7630518781056371 1.0d0) -50)
- (scale-float (float 5301031645230804 1.0d0) -104)
- (scale-float (float -8119220284264542 1.0d0) -160)
- (scale-float (float -8238087539836651 1.0d0) -218)
- (scale-float (float 7776125884825600 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7712425797110955 1.0d0) -50)
- (scale-float (float -6741605625235801 1.0d0) -105)
- (scale-float (float -8788195794477204 1.0d0) -159)
- (scale-float (float 7554609254589351 1.0d0) -213)
- (scale-float (float 6754471120355328 1.0d0) -267))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7796072416366460 1.0d0) -50)
- (scale-float (float -8912523774339987 1.0d0) -104)
- (scale-float (float -8231801775931605 1.0d0) -158)
- (scale-float (float -4509771050087843 1.0d0) -212)
- (scale-float (float 6212874764648448 1.0d0) -266))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7881515060610741 1.0d0) -50)
- (scale-float (float -7662752326772993 1.0d0) -104)
- (scale-float (float 5422413957750496 1.0d0) -158)
- (scale-float (float -5247214196928082 1.0d0) -212)
- (scale-float (float 8897340597370880 1.0d0) -267))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7968812618133507 1.0d0) -50)
- (scale-float (float -8690745111413352 1.0d0) -106)
- (scale-float (float -5070297855945954 1.0d0) -161)
- (scale-float (float 5011223573063584 1.0d0) -215)
- (scale-float (float 5484221615046656 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8058026579997157 1.0d0) -50)
- (scale-float (float -5799300632893689 1.0d0) -105)
- (scale-float (float 4911693704369311 1.0d0) -160)
- (scale-float (float -8241752725090557 1.0d0) -215)
- (scale-float (float -5811887269871616 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8149221185443089 1.0d0) -50)
- (scale-float (float 7236168019193906 1.0d0) -105)
- (scale-float (float 4880150367504926 1.0d0) -163)
- (scale-float (float 8916822026084376 1.0d0) -218)
- (scale-float (float 5344730264109056 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8242463577156069 1.0d0) -50)
- (scale-float (float -7208174039158474 1.0d0) -104)
- (scale-float (float 7795541116359725 1.0d0) -158)
- (scale-float (float -4744137578684666 1.0d0) -214)
- (scale-float (float 5303422404493312 1.0d0) -268))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8337823967175290 1.0d0) -50)
- (scale-float (float 5331571890223087 1.0d0) -104)
- (scale-float (float 4881285596339492 1.0d0) -158)
- (scale-float (float -6541107768153204 1.0d0) -212)
- (scale-float (float 4850096471277568 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8435375814313727 1.0d0) -50)
- (scale-float (float -5757153765992658 1.0d0) -104)
- (scale-float (float 5440650508947094 1.0d0) -164)
- (scale-float (float -8756947201213414 1.0d0) -218)
- (scale-float (float 4879855918776320 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8535196014027954 1.0d0) -50)
- (scale-float (float 8617387516478510 1.0d0) -107)
- (scale-float (float 8431382276020886 1.0d0) -161)
- (scale-float (float -4886791056731775 1.0d0) -215)
- (scale-float (float 5579390982815744 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8637365101769860 1.0d0) -50)
- (scale-float (float 8112170130397787 1.0d0) -104)
- (scale-float (float -8956973775390259 1.0d0) -158)
- (scale-float (float 8970707967871852 1.0d0) -212)
- (scale-float (float 5647793587208192 1.0d0) -266))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8741967470950452 1.0d0) -50)
- (scale-float (float -6831554652578395 1.0d0) -107)
- (scale-float (float 7641134967616575 1.0d0) -162)
- (scale-float (float 5651180505028809 1.0d0) -218)
- (scale-float (float -6387803828518912 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8849091606755572 1.0d0) -50)
- (scale-float (float 4758656213153565 1.0d0) -105)
- (scale-float (float -5690456565345044 1.0d0) -159)
- (scale-float (float -7009017492084972 1.0d0) -213)
- (scale-float (float 8143087915859968 1.0d0) -268))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8958830337175048 1.0d0) -50)
- (scale-float (float 7309639546811719 1.0d0) -104)
- (scale-float (float 4800127698185496 1.0d0) -158)
- (scale-float (float -8041242634087653 1.0d0) -215)
- (scale-float (float 5310427710160896 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4535640551371043 1.0d0) -49)
- (scale-float (float -7429371617097656 1.0d0) -103)
- (scale-float (float 7984568245625428 1.0d0) -158)
- (scale-float (float 8110604419811823 1.0d0) -212)
- (scale-float (float 6459589963186176 1.0d0) -267))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4593273123315173 1.0d0) -49)
- (scale-float (float 7344759777308876 1.0d0) -103)
- (scale-float (float 7427405341850773 1.0d0) -158)
- (scale-float (float 4534037897269679 1.0d0) -212)
- (scale-float (float -6667964232040448 1.0d0) -266))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4652366663462033 1.0d0) -49)
- (scale-float (float -5625792712831262 1.0d0) -106)
- (scale-float (float 7759814966345836 1.0d0) -161)
- (scale-float (float -5588953527356031 1.0d0) -221)
- (scale-float (float -5010264235704320 1.0d0) -277))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4712977726531951 1.0d0) -49)
- (scale-float (float -5824862483757728 1.0d0) -104)
- (scale-float (float -7116304334852026 1.0d0) -159)
- (scale-float (float 6068586426395698 1.0d0) -214)
- (scale-float (float 5947502962278400 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4775165824340354 1.0d0) -49)
- (scale-float (float 8578118347290259 1.0d0) -104)
- (scale-float (float -8539408092634281 1.0d0) -158)
- (scale-float (float -8136097540214513 1.0d0) -213)
- (scale-float (float 7101253718966272 1.0d0) -267))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4838993621631888 1.0d0) -49)
- (scale-float (float 5431923598923991 1.0d0) -107)
- (scale-float (float -8863305299629456 1.0d0) -163)
- (scale-float (float -8578810774201095 1.0d0) -217)
- (scale-float (float -6675154591547392 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4904527147686410 1.0d0) -49)
- (scale-float (float 6580824825190128 1.0d0) -105)
- (scale-float (float -6932785482804364 1.0d0) -165)
- (scale-float (float -8179587096652383 1.0d0) -220)
- (scale-float (float -4830927272280064 1.0d0) -279))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4971836025198946 1.0d0) -49)
- (scale-float (float -8741658251100691 1.0d0) -103)
- (scale-float (float 4745945483870918 1.0d0) -158)
- (scale-float (float -8704137713945563 1.0d0) -213)
- (scale-float (float 7513207542513664 1.0d0) -268))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5040993718101430 1.0d0) -49)
- (scale-float (float -7447025110024789 1.0d0) -104)
- (scale-float (float 7782867446190702 1.0d0) -158)
- (scale-float (float 6249534934213357 1.0d0) -214)
- (scale-float (float 6260091792392192 1.0d0) -268))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5112077800180682 1.0d0) -49)
- (scale-float (float 4932763833495494 1.0d0) -103)
- (scale-float (float 5752215372279352 1.0d0) -157)
- (scale-float (float -5867910486697977 1.0d0) -212)
- (scale-float (float -7613663408652288 1.0d0) -266))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5185170246557484 1.0d0) -49)
- (scale-float (float -8013709889359600 1.0d0) -103)
- (scale-float (float 6164738275564263 1.0d0) -157)
- (scale-float (float -5814787066030532 1.0d0) -211)
- (scale-float (float 6551694612168704 1.0d0) -268))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5260357750329314 1.0d0) -49)
- (scale-float (float 5340039035203828 1.0d0) -104)
- (scale-float (float 5675644366822888 1.0d0) -159)
- (scale-float (float 5921907735738175 1.0d0) -214)
- (scale-float (float 8373452026740736 1.0d0) -268))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5337732066948223 1.0d0) -49)
- (scale-float (float 7560216755718676 1.0d0) -103)
- (scale-float (float 6293406804211504 1.0d0) -158)
- (scale-float (float 5139555634585340 1.0d0) -213)
- (scale-float (float 4646421337800704 1.0d0) -268))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5417390389210065 1.0d0) -49)
- (scale-float (float -8064004791001897 1.0d0) -103)
- (scale-float (float -4958372325892497 1.0d0) -158)
- (scale-float (float -4856420191257806 1.0d0) -212)
- (scale-float (float 7637424278208512 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5499435756077345 1.0d0) -49)
- (scale-float (float -7619601216494792 1.0d0) -103)
- (scale-float (float -4636288805119536 1.0d0) -158)
- (scale-float (float -7201129918372980 1.0d0) -213)
- (scale-float (float 6408835067379712 1.0d0) -267))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5583977498951496 1.0d0) -49)
- (scale-float (float -6009462689643882 1.0d0) -103)
- (scale-float (float 5212172999389073 1.0d0) -159)
- (scale-float (float -6995922963939180 1.0d0) -214)
- (scale-float (float -6989763241312256 1.0d0) -268))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5671131729458846 1.0d0) -49)
- (scale-float (float -4601597388793295 1.0d0) -106)
- (scale-float (float -4902383440568414 1.0d0) -160)
- (scale-float (float -5061008161385139 1.0d0) -215)
- (scale-float (float 8263566205779968 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5761021873326603 1.0d0) -49)
- (scale-float (float 5607741177329363 1.0d0) -103)
- (scale-float (float -8698470873366949 1.0d0) -160)
- (scale-float (float -6998957893500646 1.0d0) -216)
- (scale-float (float -6722393366855680 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5853779255510933 1.0d0) -49)
- (scale-float (float 8282331001243868 1.0d0) -104)
- (scale-float (float 5242070954730137 1.0d0) -158)
- (scale-float (float 5803434507425864 1.0d0) -218)
- (scale-float (float 5426335165972480 1.0d0) -278))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5949543742410703 1.0d0) -49)
- (scale-float (float 6809174567780208 1.0d0) -108)
- (scale-float (float 5506994979834123 1.0d0) -165)
- (scale-float (float 6092185093726717 1.0d0) -219)
- (scale-float (float 6176724748337152 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6048464447771845 1.0d0) -49)
- (scale-float (float -4690628249307261 1.0d0) -104)
- (scale-float (float -5266641480663154 1.0d0) -158)
- (scale-float (float -6233247721977268 1.0d0) -212)
- (scale-float (float 7694432521617408 1.0d0) -268))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6150700509775352 1.0d0) -49)
- (scale-float (float 8905870234345599 1.0d0) -104)
- (scale-float (float 7599204760076672 1.0d0) -161)
- (scale-float (float -4951682159557854 1.0d0) -217)
- (scale-float (float 6843822815313920 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6256421947826609 1.0d0) -49)
- (scale-float (float -7137635031088417 1.0d0) -106)
- (scale-float (float 4692404756746364 1.0d0) -166)
- (scale-float (float -7820257308522652 1.0d0) -222)
- (scale-float (float 4838650294566912 1.0d0) -276))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6365810608748822 1.0d0) -49)
- (scale-float (float 8893555986748634 1.0d0) -106)
- (scale-float (float -8638702591546039 1.0d0) -161)
- (scale-float (float -4909692035297430 1.0d0) -215)
- (scale-float (float 4832972271386624 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6479061213457173 1.0d0) -49)
- (scale-float (float 4650614986108905 1.0d0) -103)
- (scale-float (float 7189048200099628 1.0d0) -157)
- (scale-float (float -5740875399128687 1.0d0) -211)
- (scale-float (float -7695065078824960 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6596382516786932 1.0d0) -49)
- (scale-float (float 5450191544518152 1.0d0) -103)
- (scale-float (float -7276472824213892 1.0d0) -159)
- (scale-float (float -5204127492056480 1.0d0) -213)
- (scale-float (float -7264401678073856 1.0d0) -268))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6717998595009069 1.0d0) -49)
- (scale-float (float 4668221514008748 1.0d0) -104)
- (scale-float (float 8463657703702709 1.0d0) -160)
- (scale-float (float 7881847332951529 1.0d0) -214)
- (scale-float (float 4633021862641664 1.0d0) -268))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6844150277740140 1.0d0) -49)
- (scale-float (float 6634602763101683 1.0d0) -106)
- (scale-float (float -7572853401689364 1.0d0) -161)
- (scale-float (float 7462439329155744 1.0d0) -217)
- (scale-float (float -7116079123922944 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6975096743499018 1.0d0) -49)
- (scale-float (float -5293851757232159 1.0d0) -105)
- (scale-float (float -5871446810029191 1.0d0) -161)
- (scale-float (float 5183374652213660 1.0d0) -217)
- (scale-float (float 5362285923008512 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7111117301153727 1.0d0) -49)
- (scale-float (float -8876023440380335 1.0d0) -104)
- (scale-float (float 6596250189197176 1.0d0) -158)
- (scale-float (float -8842856779357653 1.0d0) -212)
- (scale-float (float 8758419540295680 1.0d0) -266))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7252513383025326 1.0d0) -49)
- (scale-float (float -6134037917218726 1.0d0) -103)
- (scale-float (float -7953561958577241 1.0d0) -157)
- (scale-float (float -5357219888535272 1.0d0) -212)
- (scale-float (float 5713855154864128 1.0d0) -266))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7399610779580142 1.0d0) -49)
- (scale-float (float 7173895407040796 1.0d0) -103)
- (scale-float (float 5338336230187401 1.0d0) -157)
- (scale-float (float -8528867054423257 1.0d0) -212)
- (scale-float (float 7004639112118272 1.0d0) -266))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7552762150578778 1.0d0) -49)
- (scale-float (float -6599161507593301 1.0d0) -104)
- (scale-float (float -8549970097258107 1.0d0) -158)
- (scale-float (float 7811379268375386 1.0d0) -212)
- (scale-float (float -5440011347525632 1.0d0) -267))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7712349853422879 1.0d0) -49)
- (scale-float (float 5611659341876338 1.0d0) -104)
- (scale-float (float -8418935969681971 1.0d0) -160)
- (scale-float (float -8146747847561822 1.0d0) -216)
- (scale-float (float -7755025196777472 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7878789136449884 1.0d0) -49)
- (scale-float (float -8824804813635961 1.0d0) -106)
- (scale-float (float -6202878016631969 1.0d0) -161)
- (scale-float (float 8742759483835053 1.0d0) -216)
- (scale-float (float -7323424793296896 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8052531753321576 1.0d0) -49)
- (scale-float (float 5858237722607157 1.0d0) -105)
- (scale-float (float -6446763533076203 1.0d0) -162)
- (scale-float (float -8920794287073338 1.0d0) -217)
- (scale-float (float 7454437921521664 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8234070064745930 1.0d0) -49)
- (scale-float (float 5343437991518512 1.0d0) -103)
- (scale-float (float -8794240947028369 1.0d0) -157)
- (scale-float (float 8763213811742520 1.0d0) -211)
- (scale-float (float 7766596205969408 1.0d0) -265))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8423941705953693 1.0d0) -49)
- (scale-float (float 8855663237191574 1.0d0) -103)
- (scale-float (float 5728599496217159 1.0d0) -159)
- (scale-float (float -5768915592583075 1.0d0) -214)
- (scale-float (float -8299701230305280 1.0d0) -268))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8622734913112836 1.0d0) -49)
- (scale-float (float 5464249674693566 1.0d0) -103)
- (scale-float (float -8063849517394647 1.0d0) -157)
- (scale-float (float 8418093263375557 1.0d0) -211)
- (scale-float (float -6659359019614208 1.0d0) -266))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8831094619827022 1.0d0) -49)
- (scale-float (float -8148546371003981 1.0d0) -103)
- (scale-float (float 7254550863460982 1.0d0) -157)
- (scale-float (float 5104397688052921 1.0d0) -211)
- (scale-float (float -5466395922882560 1.0d0) -265))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4524864728409515 1.0d0) -48)
- (scale-float (float 6972235927586903 1.0d0) -102)
- (scale-float (float 4678816673430668 1.0d0) -156)
- (scale-float (float 4666758015876900 1.0d0) -212)
- (scale-float (float -8800093593829376 1.0d0) -266))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4639709907428621 1.0d0) -48)
- (scale-float (float 6925384230355776 1.0d0) -102)
- (scale-float (float 6943091238830489 1.0d0) -157)
- (scale-float (float 7656213022664895 1.0d0) -211)
- (scale-float (float 8392919872962560 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4760513582121041 1.0d0) -48)
- (scale-float (float 4889534420568852 1.0d0) -102)
- (scale-float (float 8289770516254934 1.0d0) -158)
- (scale-float (float -8322554561221716 1.0d0) -212)
- (scale-float (float -7893230454702080 1.0d0) -267))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4887752432705151 1.0d0) -48)
- (scale-float (float -5693766895143614 1.0d0) -106)
- (scale-float (float -5295234909326301 1.0d0) -160)
- (scale-float (float -6557969739186175 1.0d0) -215)
- (scale-float (float 4511235452436480 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5021955378312448 1.0d0) -48)
- (scale-float (float -5949372964446050 1.0d0) -102)
- (scale-float (float 7939834392766672 1.0d0) -157)
- (scale-float (float -8889853157944003 1.0d0) -212)
- (scale-float (float 5470788102914048 1.0d0) -266))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5163710934580951 1.0d0) -48)
- (scale-float (float -7775707197242452 1.0d0) -108)
- (scale-float (float -6964288742756296 1.0d0) -162)
- (scale-float (float 5678070141242516 1.0d0) -216)
- (scale-float (float -6646540516982784 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5313675850830065 1.0d0) -48)
- (scale-float (float 6305287430543433 1.0d0) -102)
- (scale-float (float -7772032333809724 1.0d0) -157)
- (scale-float (float -8029379288687840 1.0d0) -212)
- (scale-float (float -5092660000718848 1.0d0) -266))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5472585294192134 1.0d0) -48)
- (scale-float (float -8165975952255356 1.0d0) -103)
- (scale-float (float -4998446691715009 1.0d0) -161)
- (scale-float (float -6273568365757200 1.0d0) -217)
- (scale-float (float -7813706681417728 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5641264913891356 1.0d0) -48)
- (scale-float (float -8996120455550341 1.0d0) -102)
- (scale-float (float 6427636381411116 1.0d0) -156)
- (scale-float (float -5449912900214116 1.0d0) -214)
- (scale-float (float 7789779334201344 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5820645203480592 1.0d0) -48)
- (scale-float (float 8781856228066861 1.0d0) -102)
- (scale-float (float 8201369414544246 1.0d0) -158)
- (scale-float (float -6210705520005334 1.0d0) -213)
- (scale-float (float -6239267901407232 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6011778688436236 1.0d0) -48)
- (scale-float (float 7194334622794365 1.0d0) -104)
- (scale-float (float 6477100824374954 1.0d0) -166)
- (scale-float (float -4568571437588617 1.0d0) -223)
- (scale-float (float 5928766949818368 1.0d0) -280))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6215860609535080 1.0d0) -48)
- (scale-float (float 8394916441611171 1.0d0) -102)
- (scale-float (float -5423569241846509 1.0d0) -156)
- (scale-float (float 4785333766536567 1.0d0) -210)
- (scale-float (float -5015554907439104 1.0d0) -267))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6434253960626327 1.0d0) -48)
- (scale-float (float -4862766324251183 1.0d0) -104)
- (scale-float (float 5789086475748961 1.0d0) -159)
- (scale-float (float 5910480269657087 1.0d0) -216)
- (scale-float (float 7260906967793664 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6668519989190208 1.0d0) -48)
- (scale-float (float -8279307004090198 1.0d0) -102)
- (scale-float (float 7429441724422332 1.0d0) -157)
- (scale-float (float 6295270201075446 1.0d0) -212)
- (scale-float (float 8379185551179776 1.0d0) -266))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6920455602683467 1.0d0) -48)
- (scale-float (float -8845616597886231 1.0d0) -102)
- (scale-float (float -7952203617092389 1.0d0) -156)
- (scale-float (float -6139826277100462 1.0d0) -217)
- (scale-float (float 5386457489342464 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7192139576377896 1.0d0) -48)
- (scale-float (float 6130968677069525 1.0d0) -105)
- (scale-float (float 5964937143219749 1.0d0) -160)
- (scale-float (float -6282256614864929 1.0d0) -215)
- (scale-float (float 7154798553989120 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7485990077404228 1.0d0) -48)
- (scale-float (float -5482203802085866 1.0d0) -102)
- (scale-float (float 8647618036673473 1.0d0) -158)
- (scale-float (float -4555017105801660 1.0d0) -212)
- (scale-float (float 8559087960719360 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7804836875785953 1.0d0) -48)
- (scale-float (float 5275001876094406 1.0d0) -102)
- (scale-float (float 5783656034237738 1.0d0) -156)
- (scale-float (float -5647019254008860 1.0d0) -210)
- (scale-float (float 5168835195092992 1.0d0) -264))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8152012811748831 1.0d0) -48)
- (scale-float (float 4755270175277766 1.0d0) -102)
- (scale-float (float 6561325893612995 1.0d0) -156)
- (scale-float (float -6293819739494205 1.0d0) -214)
- (scale-float (float -4611512610062336 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8531470788791185 1.0d0) -48)
- (scale-float (float 4971209640929394 1.0d0) -102)
- (scale-float (float -4849298551206024 1.0d0) -156)
- (scale-float (float -8315187020880318 1.0d0) -210)
- (scale-float (float -8323584824279040 1.0d0) -264))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8947935008628436 1.0d0) -48)
- (scale-float (float 7766658945255354 1.0d0) -102)
- (scale-float (float 6296909150872328 1.0d0) -157)
- (scale-float (float 8685140401214535 1.0d0) -212)
- (scale-float (float 7969202102599680 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4703549369983361 1.0d0) -47)
- (scale-float (float 7852350636790280 1.0d0) -104)
- (scale-float (float 8135489978399987 1.0d0) -158)
- (scale-float (float -7174034823224577 1.0d0) -212)
- (scale-float (float 8298739190988800 1.0d0) -267))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4957943114250195 1.0d0) -47)
- (scale-float (float 8927710627508108 1.0d0) -101)
- (scale-float (float 7771780549149595 1.0d0) -157)
- (scale-float (float -7066653115289274 1.0d0) -211)
- (scale-float (float -5251925558591488 1.0d0) -265))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5241402202311462 1.0d0) -47)
- (scale-float (float 6699700002495111 1.0d0) -101)
- (scale-float (float 7350747415377690 1.0d0) -156)
- (scale-float (float 5956295317296818 1.0d0) -210)
- (scale-float (float -6370921775546368 1.0d0) -264))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5559211242425461 1.0d0) -47)
- (scale-float (float -6630256884878495 1.0d0) -104)
- (scale-float (float 5514374206385815 1.0d0) -162)
- (scale-float (float 4691257561774826 1.0d0) -218)
- (scale-float (float 8800956699377664 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5918018612706102 1.0d0) -47)
- (scale-float (float 6327539369914933 1.0d0) -102)
- (scale-float (float 8467815428623486 1.0d0) -160)
- (scale-float (float 5106528031699086 1.0d0) -217)
- (scale-float (float 4966384115122176 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6326306726590363 1.0d0) -47)
- (scale-float (float 4932593287996622 1.0d0) -103)
- (scale-float (float -6321952359158935 1.0d0) -159)
- (scale-float (float -7780234803709193 1.0d0) -219)
- (scale-float (float 6415528025391104 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6795071305180165 1.0d0) -47)
- (scale-float (float 4587132140060125 1.0d0) -101)
- (scale-float (float 7691750823425688 1.0d0) -158)
- (scale-float (float -8270613876366648 1.0d0) -212)
- (scale-float (float -6076525478084608 1.0d0) -266))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7338826700308355 1.0d0) -47)
- (scale-float (float -8652803979367238 1.0d0) -105)
- (scale-float (float 6630781865019290 1.0d0) -159)
- (scale-float (float 5339382437378590 1.0d0) -213)
- (scale-float (float 6242568037990400 1.0d0) -267))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7977135733986933 1.0d0) -47)
- (scale-float (float 6761142254708228 1.0d0) -101)
- (scale-float (float -8651077221672238 1.0d0) -155)
- (scale-float (float 8286513363443156 1.0d0) -210)
- (scale-float (float -5672208511336448 1.0d0) -266))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8737013731825704 1.0d0) -47)
- (scale-float (float 8654142931785579 1.0d0) -106)
- (scale-float (float -8568301855446921 1.0d0) -161)
- (scale-float (float 6596291337030302 1.0d0) -217)
- (scale-float (float 4872662811672576 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4828425446673454 1.0d0) -46)
- (scale-float (float -6916860673263500 1.0d0) -104)
- (scale-float (float 6047527717683516 1.0d0) -158)
- (scale-float (float 8454679980636421 1.0d0) -213)
- (scale-float (float -7197223298793472 1.0d0) -267))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5396551697143330 1.0d0) -46)
- (scale-float (float -5733671657124272 1.0d0) -104)
- (scale-float (float -7168980379255407 1.0d0) -158)
- (scale-float (float -5385528853569594 1.0d0) -213)
- (scale-float (float 8970110362451968 1.0d0) -268))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6116168685368767 1.0d0) -46)
- (scale-float (float -5154012932173636 1.0d0) -100)
- (scale-float (float -8517276107424681 1.0d0) -155)
- (scale-float (float -8267621084955084 1.0d0) -209)
- (scale-float (float 7180988953329664 1.0d0) -264))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7057195213557535 1.0d0) -46)
- (scale-float (float -8898597694697277 1.0d0) -101)
- (scale-float (float -8681831307511366 1.0d0) -159)
- (scale-float (float 8147107942114543 1.0d0) -213)
- (scale-float (float 8684777780019200 1.0d0) -268))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8340400121862057 1.0d0) -46)
- (scale-float (float 6443522098103518 1.0d0) -103)
- (scale-float (float -5063380033451047 1.0d0) -157)
- (scale-float (float 7096754030320520 1.0d0) -211)
- (scale-float (float -5649303769055232 1.0d0) -265))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5096951165270068 1.0d0) -45)
- (scale-float (float -7367277215028988 1.0d0) -99)
- (scale-float (float 5204165418458199 1.0d0) -155)
- (scale-float (float -7328140217508302 1.0d0) -209)
- (scale-float (float 4644105911926784 1.0d0) -265))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6553264048624175 1.0d0) -45)
- (scale-float (float -8728494544390632 1.0d0) -99)
- (scale-float (float 6818471906941218 1.0d0) -155)
- (scale-float (float -4839948684372485 1.0d0) -209)
- (scale-float (float -6526652324249600 1.0d0) -266))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4587306422959904 1.0d0) -44)
- (scale-float (float -8132024147820829 1.0d0) -99)
- (scale-float (float 8001039806955030 1.0d0) -154)
- (scale-float (float 8285712093786516 1.0d0) -210)
- (scale-float (float -5775142137495552 1.0d0) -264))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7645534692587744 1.0d0) -44)
- (scale-float (float 7904996613277796 1.0d0) -98)
- (scale-float (float -4949844840316895 1.0d0) -157)
- (scale-float (float -5649413412498743 1.0d0) -213)
- (scale-float (float -5510548699480064 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5734160014802806 1.0d0) -42)
- (scale-float (float -5854173816779464 1.0d0) -97)
- (scale-float (float -7171395319441940 1.0d0) -152)
- (scale-float (float 6767673389735587 1.0d0) -207)
- (scale-float (float -6695998270734336 1.0d0) -264))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float -5734160014802806 1.0d0) -42)
- (scale-float (float 5854173816779464 1.0d0) -97)
- (scale-float (float 7171395319441940 1.0d0) -152)
- (scale-float (float -6767673389735587 1.0d0) -207)
- (scale-float (float 6695997717610496 1.0d0) -264))
- (%make-qd-d q0 q1 q2 q3)))))
-
-;; This is the set of evaluation nodes for the atan table. The table contains
-;;
-;; tan((2*k + 2)*pi/(4*s))
-;;
-;; for k = 0, 1, ..., s, where s is the table size,
-;; +qd-atan-partition-size+.
-(defconstant +qd-atan-nodes+
- (make-array +qd-atan-partition-size+ :initial-contents
- (list
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7074243300823009 1.0d0) -62)
- (scale-float (float 6767281937885683 1.0d0) -116)
- (scale-float (float 6495058557496386 1.0d0) -172)
- (scale-float (float 5247049684764422 1.0d0) -226)
- (scale-float (float -5541122207547392 1.0d0) -280))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7074259947269390 1.0d0) -61)
- (scale-float (float -7016692485563189 1.0d0) -116)
- (scale-float (float 7360987505494805 1.0d0) -170)
- (scale-float (float 7711403976890054 1.0d0) -224)
- (scale-float (float 7755379282149376 1.0d0) -278))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5305715768666702 1.0d0) -60)
- (scale-float (float 8471749856458935 1.0d0) -117)
- (scale-float (float -8118241448508008 1.0d0) -173)
- (scale-float (float 5553785129213244 1.0d0) -228)
- (scale-float (float 7351462873006080 1.0d0) -282))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7074326533995023 1.0d0) -60)
- (scale-float (float -7254034420744410 1.0d0) -115)
- (scale-float (float 6401434372892788 1.0d0) -170)
- (scale-float (float -7987115629600412 1.0d0) -231)
- (scale-float (float 7048491884871680 1.0d0) -285))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8842970593782984 1.0d0) -60)
- (scale-float (float -5691728595114215 1.0d0) -114)
- (scale-float (float 8352032547859414 1.0d0) -177)
- (scale-float (float 8515194392491862 1.0d0) -232)
- (scale-float (float -8285511068155904 1.0d0) -288))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5305828136410355 1.0d0) -59)
- (scale-float (float 5670480622612706 1.0d0) -113)
- (scale-float (float 8424458586146156 1.0d0) -167)
- (scale-float (float 7325110716144970 1.0d0) -221)
- (scale-float (float 7901715692986368 1.0d0) -275))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6190195948340938 1.0d0) -59)
- (scale-float (float -8802172611714431 1.0d0) -115)
- (scale-float (float 5293066366625524 1.0d0) -169)
- (scale-float (float -4725513813851070 1.0d0) -226)
- (scale-float (float -6881914124238848 1.0d0) -282))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7074592895940238 1.0d0) -59)
- (scale-float (float -7386148682932407 1.0d0) -114)
- (scale-float (float 8663989822896143 1.0d0) -168)
- (scale-float (float 5638497460170841 1.0d0) -222)
- (scale-float (float -7881181893361664 1.0d0) -276))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7959023143013823 1.0d0) -59)
- (scale-float (float 8019805402879802 1.0d0) -113)
- (scale-float (float -6336817275823725 1.0d0) -167)
- (scale-float (float -7504315909577047 1.0d0) -222)
- (scale-float (float -7001531428110336 1.0d0) -276))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8843490853994263 1.0d0) -59)
- (scale-float (float 6627398283965989 1.0d0) -114)
- (scale-float (float 6401954222096561 1.0d0) -172)
- (scale-float (float -8277716072595469 1.0d0) -228)
- (scale-float (float -6893131865784320 1.0d0) -282))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4864000097009790 1.0d0) -58)
- (scale-float (float 5300827232027539 1.0d0) -113)
- (scale-float (float -8233515723229764 1.0d0) -167)
- (scale-float (float -5661310994722713 1.0d0) -223)
- (scale-float (float 6190628432248832 1.0d0) -279))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5306277664505868 1.0d0) -58)
- (scale-float (float 6080680969503448 1.0d0) -114)
- (scale-float (float 8673453011664433 1.0d0) -168)
- (scale-float (float 6958169807750707 1.0d0) -225)
- (scale-float (float -6223760163340288 1.0d0) -279))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5748580212877572 1.0d0) -58)
- (scale-float (float 7808786237303012 1.0d0) -112)
- (scale-float (float 4562732201975772 1.0d0) -166)
- (scale-float (float 7911073594757806 1.0d0) -220)
- (scale-float (float 7571566118043648 1.0d0) -275))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6190909825987611 1.0d0) -58)
- (scale-float (float 6947339417361781 1.0d0) -114)
- (scale-float (float -6195385482223894 1.0d0) -168)
- (scale-float (float 8660328297735924 1.0d0) -222)
- (scale-float (float 6834525100834816 1.0d0) -278))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6633268588208486 1.0d0) -58)
- (scale-float (float 7956908201130860 1.0d0) -113)
- (scale-float (float 8639872984662784 1.0d0) -168)
- (scale-float (float 4555947475504659 1.0d0) -222)
- (scale-float (float 6747999155978240 1.0d0) -277))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7075658584461808 1.0d0) -58)
- (scale-float (float -4850328405598998 1.0d0) -116)
- (scale-float (float -8337902916519844 1.0d0) -173)
- (scale-float (float 7753457006800198 1.0d0) -227)
- (scale-float (float 8205843736559616 1.0d0) -285))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7518081900257630 1.0d0) -58)
- (scale-float (float 6453105589292401 1.0d0) -112)
- (scale-float (float -8397542814379849 1.0d0) -166)
- (scale-float (float -8199698099635664 1.0d0) -222)
- (scale-float (float 7114045743267840 1.0d0) -276))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7960540621733810 1.0d0) -58)
- (scale-float (float 8175303293584134 1.0d0) -112)
- (scale-float (float -5301580419193644 1.0d0) -167)
- (scale-float (float 6699977611910940 1.0d0) -222)
- (scale-float (float 7547565291601920 1.0d0) -277))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8403036835695393 1.0d0) -58)
- (scale-float (float -5697268423089438 1.0d0) -117)
- (scale-float (float -6473687143763747 1.0d0) -171)
- (scale-float (float -8274683920528728 1.0d0) -226)
- (scale-float (float -5560296672329728 1.0d0) -280))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8845572629654022 1.0d0) -58)
- (scale-float (float -8912156205912812 1.0d0) -112)
- (scale-float (float 5882165538473509 1.0d0) -169)
- (scale-float (float 5764844608194588 1.0d0) -223)
- (scale-float (float -7830218316185600 1.0d0) -281))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4644075045933689 1.0d0) -57)
- (scale-float (float -4644840313601368 1.0d0) -113)
- (scale-float (float 5890558395426862 1.0d0) -169)
- (scale-float (float 5704484041220075 1.0d0) -223)
- (scale-float (float 6758937831800832 1.0d0) -277))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4865385655689326 1.0d0) -57)
- (scale-float (float -5335765408447300 1.0d0) -112)
- (scale-float (float -7739937159330576 1.0d0) -166)
- (scale-float (float 5524190817389561 1.0d0) -220)
- (scale-float (float 8038054959251456 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5086719189028021 1.0d0) -57)
- (scale-float (float -6684440902714514 1.0d0) -111)
- (scale-float (float -6219586612898500 1.0d0) -165)
- (scale-float (float 7622402756168006 1.0d0) -219)
- (scale-float (float 8609496160927744 1.0d0) -275))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5308076691316144 1.0d0) -57)
- (scale-float (float -5476938618039988 1.0d0) -111)
- (scale-float (float -8651596065846501 1.0d0) -165)
- (scale-float (float -7238720175984380 1.0d0) -219)
- (scale-float (float 8112961094213632 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5529459208372121 1.0d0) -57)
- (scale-float (float 7178586049594761 1.0d0) -113)
- (scale-float (float -6270880689972360 1.0d0) -167)
- (scale-float (float 7224178711345510 1.0d0) -225)
- (scale-float (float -8249539170926592 1.0d0) -279))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5750867786486237 1.0d0) -57)
- (scale-float (float -7441067489181542 1.0d0) -114)
- (scale-float (float 8230325703168640 1.0d0) -168)
- (scale-float (float 8318179187665325 1.0d0) -222)
- (scale-float (float -6836870166085632 1.0d0) -281))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5972303472440455 1.0d0) -57)
- (scale-float (float -7755066370248110 1.0d0) -112)
- (scale-float (float 6073039335117040 1.0d0) -166)
- (scale-float (float 6598469129749717 1.0d0) -220)
- (scale-float (float 8182194626101248 1.0d0) -275))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6193767313528259 1.0d0) -57)
- (scale-float (float -5672692450672928 1.0d0) -111)
- (scale-float (float 7035368426510867 1.0d0) -166)
- (scale-float (float -5483850293455672 1.0d0) -221)
- (scale-float (float 6750672895082496 1.0d0) -276))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6415260357574515 1.0d0) -57)
- (scale-float (float -8093349648279617 1.0d0) -113)
- (scale-float (float -5567043568932739 1.0d0) -167)
- (scale-float (float 8262593683581652 1.0d0) -222)
- (scale-float (float 5987877854511104 1.0d0) -277))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6636783652955355 1.0d0) -57)
- (scale-float (float -8939754503571771 1.0d0) -112)
- (scale-float (float 6763825055570294 1.0d0) -173)
- (scale-float (float 7370014801905638 1.0d0) -228)
- (scale-float (float -6571133415456768 1.0d0) -282))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6858338248618080 1.0d0) -57)
- (scale-float (float -5323165169093825 1.0d0) -112)
- (scale-float (float -6625710419580159 1.0d0) -167)
- (scale-float (float 7321993919642445 1.0d0) -221)
- (scale-float (float 6593750164275200 1.0d0) -275))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7079925194101090 1.0d0) -57)
- (scale-float (float 7558128005262237 1.0d0) -116)
- (scale-float (float -7104258077067318 1.0d0) -170)
- (scale-float (float 7325476905488468 1.0d0) -224)
- (scale-float (float 8620106703699968 1.0d0) -284))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7301545539553835 1.0d0) -57)
- (scale-float (float 6515484429926459 1.0d0) -113)
- (scale-float (float -5077845315897347 1.0d0) -170)
- (scale-float (float -8059832583379898 1.0d0) -224)
- (scale-float (float -4518954019586048 1.0d0) -279))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7523200335756791 1.0d0) -57)
- (scale-float (float 5584296786164265 1.0d0) -111)
- (scale-float (float -6409831813512552 1.0d0) -166)
- (scale-float (float 8194437483307359 1.0d0) -220)
- (scale-float (float 7147137294073856 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7744890634141463 1.0d0) -57)
- (scale-float (float -8013636483429749 1.0d0) -115)
- (scale-float (float -7102086122091697 1.0d0) -169)
- (scale-float (float 5858371330382497 1.0d0) -229)
- (scale-float (float 7437432983126016 1.0d0) -283))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7966617486810410 1.0d0) -57)
- (scale-float (float 6042537330451191 1.0d0) -111)
- (scale-float (float 7861008112428726 1.0d0) -165)
- (scale-float (float -7227916145034998 1.0d0) -224)
- (scale-float (float 4815727049572352 1.0d0) -281))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8188381946557304 1.0d0) -57)
- (scale-float (float 8866977047648128 1.0d0) -111)
- (scale-float (float 7123246995488489 1.0d0) -165)
- (scale-float (float 7773570145364191 1.0d0) -219)
- (scale-float (float -6140525153304576 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8410185066887010 1.0d0) -57)
- (scale-float (float 7763884187722252 1.0d0) -114)
- (scale-float (float 5307508571918846 1.0d0) -169)
- (scale-float (float -8886326560828790 1.0d0) -223)
- (scale-float (float -6979660302254080 1.0d0) -279))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8632027902035696 1.0d0) -57)
- (scale-float (float 8311501563013986 1.0d0) -111)
- (scale-float (float -7695719767127804 1.0d0) -167)
- (scale-float (float 6238683558805043 1.0d0) -221)
- (scale-float (float -6011991889608704 1.0d0) -276))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8853911506990979 1.0d0) -57)
- (scale-float (float -4642863164583854 1.0d0) -111)
- (scale-float (float -5547633297239252 1.0d0) -167)
- (scale-float (float 7567050221678446 1.0d0) -221)
- (scale-float (float 8157986184626176 1.0d0) -277))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4537918468756044 1.0d0) -56)
- (scale-float (float 4820993643217819 1.0d0) -110)
- (scale-float (float 8930629000360507 1.0d0) -165)
- (scale-float (float 7087222971126707 1.0d0) -219)
- (scale-float (float -6627888560996352 1.0d0) -276))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4648902625075038 1.0d0) -56)
- (scale-float (float 7436320100222489 1.0d0) -112)
- (scale-float (float -8245691058659380 1.0d0) -168)
- (scale-float (float 5253602438545476 1.0d0) -222)
- (scale-float (float 8638593337655296 1.0d0) -280))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4759908751134022 1.0d0) -56)
- (scale-float (float 7954738707622512 1.0d0) -110)
- (scale-float (float -6845900842570269 1.0d0) -164)
- (scale-float (float -5048866407860981 1.0d0) -218)
- (scale-float (float 5960081798856704 1.0d0) -276))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4870937376030709 1.0d0) -56)
- (scale-float (float -6900203436031769 1.0d0) -110)
- (scale-float (float -6557111036885254 1.0d0) -164)
- (scale-float (float -5242430116227422 1.0d0) -218)
- (scale-float (float -5246739418636288 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4981989029289118 1.0d0) -56)
- (scale-float (float -6331714672912233 1.0d0) -112)
- (scale-float (float 7157065018318002 1.0d0) -166)
- (scale-float (float 7757486424918243 1.0d0) -222)
- (scale-float (float -8944385858994176 1.0d0) -277))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5093064240869749 1.0d0) -56)
- (scale-float (float -8492951271419131 1.0d0) -113)
- (scale-float (float 8515595824100765 1.0d0) -167)
- (scale-float (float -5716193829650164 1.0d0) -221)
- (scale-float (float -5426545241620480 1.0d0) -277))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5204163541179763 1.0d0) -56)
- (scale-float (float -6235957113790399 1.0d0) -110)
- (scale-float (float -5174166007511410 1.0d0) -165)
- (scale-float (float 8611185154120911 1.0d0) -225)
- (scale-float (float 7736045533659136 1.0d0) -282))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5315287461083185 1.0d0) -56)
- (scale-float (float 6889731800400172 1.0d0) -110)
- (scale-float (float -7080341772942908 1.0d0) -164)
- (scale-float (float 8905936866277614 1.0d0) -218)
- (scale-float (float -4711175575453696 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5426436531911130 1.0d0) -56)
- (scale-float (float 6268331220853191 1.0d0) -110)
- (scale-float (float 7600785323609305 1.0d0) -164)
- (scale-float (float -8739038359052265 1.0d0) -220)
- (scale-float (float 6761298908676096 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5537611285472038 1.0d0) -56)
- (scale-float (float 7192871273277846 1.0d0) -113)
- (scale-float (float 4786541271204674 1.0d0) -170)
- (scale-float (float 7028609926727509 1.0d0) -224)
- (scale-float (float 5989165818707968 1.0d0) -278))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5648812254061936 1.0d0) -56)
- (scale-float (float -5604264951909811 1.0d0) -113)
- (scale-float (float 5746680039939614 1.0d0) -168)
- (scale-float (float 6497560367307525 1.0d0) -225)
- (scale-float (float 6467556663623680 1.0d0) -279))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5760039970474718 1.0d0) -56)
- (scale-float (float -6980143845353219 1.0d0) -113)
- (scale-float (float 4785639533129965 1.0d0) -167)
- (scale-float (float -8159304138220741 1.0d0) -222)
- (scale-float (float -6774418327470080 1.0d0) -277))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5871294968012444 1.0d0) -56)
- (scale-float (float -4791551064553444 1.0d0) -111)
- (scale-float (float -4887007668252453 1.0d0) -165)
- (scale-float (float 6787668372624906 1.0d0) -225)
- (scale-float (float -7813467658518528 1.0d0) -281))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5982577780495660 1.0d0) -56)
- (scale-float (float -5604253744660759 1.0d0) -110)
- (scale-float (float -6394322686782746 1.0d0) -165)
- (scale-float (float 7131851835334653 1.0d0) -219)
- (scale-float (float 6165912427102208 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6093888942273739 1.0d0) -56)
- (scale-float (float -5330715064199763 1.0d0) -110)
- (scale-float (float -8751640118165682 1.0d0) -164)
- (scale-float (float -7285821764229900 1.0d0) -218)
- (scale-float (float 8002313246965760 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6205228988235244 1.0d0) -56)
- (scale-float (float 8200951954534406 1.0d0) -112)
- (scale-float (float 6111509378875418 1.0d0) -166)
- (scale-float (float 4613726211466020 1.0d0) -223)
- (scale-float (float 8203483406925824 1.0d0) -277))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6316598453818314 1.0d0) -56)
- (scale-float (float -8766569805266857 1.0d0) -110)
- (scale-float (float -7041718158970532 1.0d0) -166)
- (scale-float (float 7435291341653501 1.0d0) -220)
- (scale-float (float 7481516131811328 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6427997875021066 1.0d0) -56)
- (scale-float (float -5855089389107843 1.0d0) -110)
- (scale-float (float -6422347945156548 1.0d0) -167)
- (scale-float (float -4564270512127009 1.0d0) -221)
- (scale-float (float 6580087321788416 1.0d0) -276))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6539427788412030 1.0d0) -56)
- (scale-float (float 4932162808711017 1.0d0) -112)
- (scale-float (float 4775961348624409 1.0d0) -172)
- (scale-float (float 6253308938258537 1.0d0) -226)
- (scale-float (float -8452628413415424 1.0d0) -284))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6650888731140600 1.0d0) -56)
- (scale-float (float -8014160490158482 1.0d0) -110)
- (scale-float (float 8630627017345737 1.0d0) -165)
- (scale-float (float -8575776752397544 1.0d0) -223)
- (scale-float (float 5666371027337216 1.0d0) -279))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6762381240947507 1.0d0) -56)
- (scale-float (float -5530390079113711 1.0d0) -110)
- (scale-float (float -8346006416574906 1.0d0) -164)
- (scale-float (float -5547641109711780 1.0d0) -220)
- (scale-float (float 4733774473003008 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6873905856175324 1.0d0) -56)
- (scale-float (float 6624288088975897 1.0d0) -112)
- (scale-float (float 6140096482270206 1.0d0) -168)
- (scale-float (float -5870790501959892 1.0d0) -222)
- (scale-float (float -5442761984311296 1.0d0) -276))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6985463115778989 1.0d0) -56)
- (scale-float (float 4681164955421420 1.0d0) -110)
- (scale-float (float -8766768521526820 1.0d0) -164)
- (scale-float (float 5459492635791986 1.0d0) -218)
- (scale-float (float -7454206129184768 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7097053559336354 1.0d0) -56)
- (scale-float (float 6892861201620346 1.0d0) -110)
- (scale-float (float 4621862762597655 1.0d0) -166)
- (scale-float (float 8030392135320131 1.0d0) -223)
- (scale-float (float 5523752298217472 1.0d0) -279))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7208677727058761 1.0d0) -56)
- (scale-float (float 8677658365757109 1.0d0) -110)
- (scale-float (float -5701248841593772 1.0d0) -164)
- (scale-float (float -7758076858108619 1.0d0) -218)
- (scale-float (float -4664176372514816 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7320336159801643 1.0d0) -56)
- (scale-float (float 7130725875007135 1.0d0) -110)
- (scale-float (float -6323732027339787 1.0d0) -165)
- (scale-float (float -5880754033304199 1.0d0) -222)
- (scale-float (float -6158226902745088 1.0d0) -277))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7432029399075151 1.0d0) -56)
- (scale-float (float 4993552063906422 1.0d0) -113)
- (scale-float (float -7293000710681886 1.0d0) -169)
- (scale-float (float 4645994626094532 1.0d0) -223)
- (scale-float (float 5050788669554688 1.0d0) -277))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7543757987054807 1.0d0) -56)
- (scale-float (float 6375768949364446 1.0d0) -110)
- (scale-float (float 7990356077590539 1.0d0) -164)
- (scale-float (float 7889537146385756 1.0d0) -219)
- (scale-float (float -4787856673505280 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7655522466592189 1.0d0) -56)
- (scale-float (float -8932639885604140 1.0d0) -110)
- (scale-float (float 7154800552967290 1.0d0) -164)
- (scale-float (float 8504487847058852 1.0d0) -218)
- (scale-float (float 5517932734169088 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7767323381225633 1.0d0) -56)
- (scale-float (float -7099732203932096 1.0d0) -110)
- (scale-float (float 7787318832776911 1.0d0) -165)
- (scale-float (float -4816798849144489 1.0d0) -219)
- (scale-float (float -7581388403900416 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7879161275190977 1.0d0) -56)
- (scale-float (float -7067364847376586 1.0d0) -110)
- (scale-float (float -5996918893238168 1.0d0) -165)
- (scale-float (float -4831575886096997 1.0d0) -220)
- (scale-float (float 8984551876231168 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7991036693432322 1.0d0) -56)
- (scale-float (float -5699502590634390 1.0d0) -110)
- (scale-float (float 7614224173666209 1.0d0) -168)
- (scale-float (float -7433568750335281 1.0d0) -224)
- (scale-float (float 6300988752265216 1.0d0) -279))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8102950181612828 1.0d0) -56)
- (scale-float (float -6659060468323962 1.0d0) -110)
- (scale-float (float 8935414324151244 1.0d0) -166)
- (scale-float (float 5382978084931225 1.0d0) -220)
- (scale-float (float -5860588151439360 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8214902286125537 1.0d0) -56)
- (scale-float (float -4952835986202615 1.0d0) -110)
- (scale-float (float -8867467142013577 1.0d0) -164)
- (scale-float (float 8477381256242030 1.0d0) -218)
- (scale-float (float 4546036908785664 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8326893554104228 1.0d0) -56)
- (scale-float (float -8864362191955611 1.0d0) -110)
- (scale-float (float -7414201007742116 1.0d0) -164)
- (scale-float (float 7390248804924237 1.0d0) -218)
- (scale-float (float 5203427552927744 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8438924533434299 1.0d0) -56)
- (scale-float (float -6498852296858640 1.0d0) -113)
- (scale-float (float 8724480238237586 1.0d0) -168)
- (scale-float (float 6505237845415267 1.0d0) -224)
- (scale-float (float 6160645556797440 1.0d0) -278))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8550995772763686 1.0d0) -56)
- (scale-float (float -8849620054117273 1.0d0) -110)
- (scale-float (float -6126624500449066 1.0d0) -167)
- (scale-float (float -7441234044338374 1.0d0) -221)
- (scale-float (float -7193057718960128 1.0d0) -278))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8663107821513803 1.0d0) -56)
- (scale-float (float 7896549251964366 1.0d0) -110)
- (scale-float (float 6413572225108209 1.0d0) -165)
- (scale-float (float 6785815414216356 1.0d0) -220)
- (scale-float (float -8698059142004736 1.0d0) -275))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8775261229890529 1.0d0) -56)
- (scale-float (float -5966718174417912 1.0d0) -118)
- (scale-float (float 5908054939109838 1.0d0) -172)
- (scale-float (float 5566629553984590 1.0d0) -226)
- (scale-float (float 8254038780936192 1.0d0) -282))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8887456548895209 1.0d0) -56)
- (scale-float (float -4822487303729171 1.0d0) -111)
- (scale-float (float -6184305249388923 1.0d0) -167)
- (scale-float (float 8897480272152756 1.0d0) -221)
- (scale-float (float -6855015747026944 1.0d0) -275))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8999694330335703 1.0d0) -56)
- (scale-float (float 5866019688579494 1.0d0) -110)
- (scale-float (float 6746113864754295 1.0d0) -165)
- (scale-float (float 5959036981891692 1.0d0) -219)
- (scale-float (float -8150990309261312 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4555987563418731 1.0d0) -55)
- (scale-float (float 6209213722885724 1.0d0) -109)
- (scale-float (float -5214445726143485 1.0d0) -166)
- (scale-float (float 8905707340331887 1.0d0) -222)
- (scale-float (float 5365261823639552 1.0d0) -276))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4612149745927319 1.0d0) -55)
- (scale-float (float -5149064220987970 1.0d0) -109)
- (scale-float (float 5135621514213651 1.0d0) -165)
- (scale-float (float -7670135873233643 1.0d0) -221)
- (scale-float (float 7366713464324096 1.0d0) -276))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4668333989840611 1.0d0) -55)
- (scale-float (float 4510225260708012 1.0d0) -109)
- (scale-float (float 8636055489646536 1.0d0) -164)
- (scale-float (float -8793811301860095 1.0d0) -218)
- (scale-float (float 6385623296147456 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4724540572731118 1.0d0) -55)
- (scale-float (float 6549959657432699 1.0d0) -110)
- (scale-float (float 7449375933247135 1.0d0) -166)
- (scale-float (float -6347708187996322 1.0d0) -223)
- (scale-float (float -5310022893436928 1.0d0) -278))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4780769772602468 1.0d0) -55)
- (scale-float (float -7595498697333782 1.0d0) -109)
- (scale-float (float -7656035220403600 1.0d0) -163)
- (scale-float (float -5381888146336062 1.0d0) -217)
- (scale-float (float 5490984867725312 1.0d0) -275))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4837021867895031 1.0d0) -55)
- (scale-float (float 4955973083008952 1.0d0) -109)
- (scale-float (float 6495859847082499 1.0d0) -165)
- (scale-float (float 6811580417239946 1.0d0) -221)
- (scale-float (float 7307243231903744 1.0d0) -275))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4893297137491568 1.0d0) -55)
- (scale-float (float -4512119916936150 1.0d0) -110)
- (scale-float (float 6124013201381881 1.0d0) -165)
- (scale-float (float 7901731001127329 1.0d0) -219)
- (scale-float (float -5108238592475136 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4949595860722884 1.0d0) -55)
- (scale-float (float 5573513357823599 1.0d0) -111)
- (scale-float (float 6921778578926697 1.0d0) -165)
- (scale-float (float -6871954836299068 1.0d0) -219)
- (scale-float (float -8124723360301056 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5005918317373515 1.0d0) -55)
- (scale-float (float -7449301635455933 1.0d0) -109)
- (scale-float (float 4667696694299058 1.0d0) -163)
- (scale-float (float -8482132186453729 1.0d0) -218)
- (scale-float (float 5190014904221696 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5062264787687421 1.0d0) -55)
- (scale-float (float -5647669325384224 1.0d0) -110)
- (scale-float (float 8368118104806602 1.0d0) -165)
- (scale-float (float 6554426093832685 1.0d0) -219)
- (scale-float (float 6744300675661824 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5118635552373709 1.0d0) -55)
- (scale-float (float -5766246573771723 1.0d0) -110)
- (scale-float (float 7246687990865645 1.0d0) -165)
- (scale-float (float -7797207573510533 1.0d0) -220)
- (scale-float (float -8907989811003392 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5175030892612366 1.0d0) -55)
- (scale-float (float 4817698955833881 1.0d0) -109)
- (scale-float (float 6621452284252597 1.0d0) -166)
- (scale-float (float -6219041473034286 1.0d0) -224)
- (scale-float (float -5352603740274688 1.0d0) -278))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5231451090060019 1.0d0) -55)
- (scale-float (float 4519905144375329 1.0d0) -109)
- (scale-float (float 5480017346586174 1.0d0) -163)
- (scale-float (float 5555549697755828 1.0d0) -221)
- (scale-float (float 4977506345549824 1.0d0) -276))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5287896426855709 1.0d0) -55)
- (scale-float (float -4981394459481342 1.0d0) -111)
- (scale-float (float -4989473981568217 1.0d0) -168)
- (scale-float (float -6355081785181572 1.0d0) -222)
- (scale-float (float 6314023576666112 1.0d0) -276))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5344367185626688 1.0d0) -55)
- (scale-float (float 5294928683267628 1.0d0) -110)
- (scale-float (float 8192558187298156 1.0d0) -164)
- (scale-float (float -4975922872246745 1.0d0) -221)
- (scale-float (float -7805112733401088 1.0d0) -277))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5400863649494238 1.0d0) -55)
- (scale-float (float 8720062026682742 1.0d0) -109)
- (scale-float (float 5300479770928683 1.0d0) -165)
- (scale-float (float 4740531629385530 1.0d0) -219)
- (scale-float (float -5533681895243776 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5457386102079508 1.0d0) -55)
- (scale-float (float -8435548971470740 1.0d0) -112)
- (scale-float (float 4997946243138790 1.0d0) -167)
- (scale-float (float -6608797304466236 1.0d0) -221)
- (scale-float (float -6868559905947648 1.0d0) -275))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5513934827509369 1.0d0) -55)
- (scale-float (float 8782392023262299 1.0d0) -109)
- (scale-float (float -7738673509830927 1.0d0) -167)
- (scale-float (float -5448701703915946 1.0d0) -221)
- (scale-float (float -6273127356039168 1.0d0) -277))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5570510110422301 1.0d0) -55)
- (scale-float (float -8523863027865608 1.0d0) -110)
- (scale-float (float -8518255248434760 1.0d0) -165)
- (scale-float (float 6774399983746988 1.0d0) -219)
- (scale-float (float 4749473861337088 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5627112235974285 1.0d0) -55)
- (scale-float (float 7263358254634327 1.0d0) -110)
- (scale-float (float -7268249985750759 1.0d0) -165)
- (scale-float (float -4693370910543353 1.0d0) -220)
- (scale-float (float -5415880066203648 1.0d0) -275))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5683741489844735 1.0d0) -55)
- (scale-float (float -6280764325749201 1.0d0) -110)
- (scale-float (float 6965480209639580 1.0d0) -164)
- (scale-float (float 8931847868637448 1.0d0) -218)
- (scale-float (float 6284428953845760 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5740398158242435 1.0d0) -55)
- (scale-float (float 5229471594941651 1.0d0) -119)
- (scale-float (float 5226239879079869 1.0d0) -174)
- (scale-float (float 6984672670564467 1.0d0) -229)
- (scale-float (float -4747601484185600 1.0d0) -283))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5797082527911511 1.0d0) -55)
- (scale-float (float 7225087649872241 1.0d0) -109)
- (scale-float (float -6204726364434873 1.0d0) -163)
- (scale-float (float 8665640845854712 1.0d0) -217)
- (scale-float (float -6869387504541696 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5853794886137419 1.0d0) -55)
- (scale-float (float 8582721415685180 1.0d0) -109)
- (scale-float (float 7069542100455701 1.0d0) -163)
- (scale-float (float 5319805524648991 1.0d0) -217)
- (scale-float (float 4908003853656064 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5910535520752957 1.0d0) -55)
- (scale-float (float -5865441005066127 1.0d0) -109)
- (scale-float (float 7076063963421070 1.0d0) -163)
- (scale-float (float -5309399976527585 1.0d0) -217)
- (scale-float (float 7432748259147776 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5967304720144298 1.0d0) -55)
- (scale-float (float -5230215325814731 1.0d0) -109)
- (scale-float (float 5977313757878375 1.0d0) -165)
- (scale-float (float -7081718739490926 1.0d0) -220)
- (scale-float (float 6587185890459648 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6024102773257053 1.0d0) -55)
- (scale-float (float 5313042845820622 1.0d0) -110)
- (scale-float (float 8023417567167796 1.0d0) -166)
- (scale-float (float -8604260761430137 1.0d0) -221)
- (scale-float (float 8631242419339264 1.0d0) -276))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6080929969602352 1.0d0) -55)
- (scale-float (float -7516683944509205 1.0d0) -109)
- (scale-float (float -7853673306859953 1.0d0) -163)
- (scale-float (float 7414966153696994 1.0d0) -223)
- (scale-float (float -5825247748554752 1.0d0) -277))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6137786599262946 1.0d0) -55)
- (scale-float (float -5500886081507582 1.0d0) -109)
- (scale-float (float 7192415028319660 1.0d0) -163)
- (scale-float (float 8703121046288914 1.0d0) -221)
- (scale-float (float -7720201466019840 1.0d0) -275))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6194672952899342 1.0d0) -55)
- (scale-float (float 8257022685980356 1.0d0) -109)
- (scale-float (float -5525974167343856 1.0d0) -168)
- (scale-float (float 4733928606935526 1.0d0) -223)
- (scale-float (float 7298229848244224 1.0d0) -277))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6251589321755958 1.0d0) -55)
- (scale-float (float -7281767909722987 1.0d0) -110)
- (scale-float (float 7509948571332277 1.0d0) -164)
- (scale-float (float -5682276894072656 1.0d0) -218)
- (scale-float (float -7359121898569728 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6308535997667296 1.0d0) -55)
- (scale-float (float -5011612829008087 1.0d0) -112)
- (scale-float (float 8035305895939923 1.0d0) -166)
- (scale-float (float -7349032198139134 1.0d0) -220)
- (scale-float (float -5368791976902656 1.0d0) -277))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6365513273064154 1.0d0) -55)
- (scale-float (float -4812363620961737 1.0d0) -111)
- (scale-float (float -7413962473603094 1.0d0) -165)
- (scale-float (float -8767876790007713 1.0d0) -222)
- (scale-float (float 6507835088175104 1.0d0) -278))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6422521440979851 1.0d0) -55)
- (scale-float (float 6578882977922512 1.0d0) -111)
- (scale-float (float 8321576113250904 1.0d0) -165)
- (scale-float (float -6664725033188740 1.0d0) -221)
- (scale-float (float 7160493126975488 1.0d0) -279))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6479560795056485 1.0d0) -55)
- (scale-float (float -8375672623049098 1.0d0) -109)
- (scale-float (float 7524120084222466 1.0d0) -164)
- (scale-float (float -6815555174250173 1.0d0) -220)
- (scale-float (float 5172221827088384 1.0d0) -275))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6536631629551210 1.0d0) -55)
- (scale-float (float 8736141977573990 1.0d0) -110)
- (scale-float (float -7322710182822515 1.0d0) -164)
- (scale-float (float -4790469966222651 1.0d0) -218)
- (scale-float (float 8864931365781504 1.0d0) -276))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6593734239342550 1.0d0) -55)
- (scale-float (float 7778440410468410 1.0d0) -109)
- (scale-float (float -5254236274260814 1.0d0) -163)
- (scale-float (float 6555239903189666 1.0d0) -218)
- (scale-float (float -7852641536049152 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6650868919936727 1.0d0) -55)
- (scale-float (float 7162191600837053 1.0d0) -109)
- (scale-float (float -5655798014740140 1.0d0) -163)
- (scale-float (float -8421566080588568 1.0d0) -217)
- (scale-float (float 5731190979051520 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6708035967474024 1.0d0) -55)
- (scale-float (float 8929290949301876 1.0d0) -111)
- (scale-float (float 4736664410119567 1.0d0) -165)
- (scale-float (float -5300162952592309 1.0d0) -219)
- (scale-float (float -7285565930602496 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6765235678735172 1.0d0) -55)
- (scale-float (float -7145520010159020 1.0d0) -113)
- (scale-float (float -5949255065233075 1.0d0) -168)
- (scale-float (float 4756154730286905 1.0d0) -222)
- (scale-float (float 5274431212224512 1.0d0) -276))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6822468351147766 1.0d0) -55)
- (scale-float (float -8376580639018366 1.0d0) -110)
- (scale-float (float -4813587535252781 1.0d0) -165)
- (scale-float (float -8879977609109973 1.0d0) -219)
- (scale-float (float -5697320867594240 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6879734282792707 1.0d0) -55)
- (scale-float (float -8556468912319486 1.0d0) -109)
- (scale-float (float -7506974660546488 1.0d0) -165)
- (scale-float (float -4635918891365437 1.0d0) -224)
- (scale-float (float 8122854904168448 1.0d0) -279))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6937033772410672 1.0d0) -55)
- (scale-float (float 8240683988726849 1.0d0) -110)
- (scale-float (float -8616281779497146 1.0d0) -165)
- (scale-float (float 5493686639335658 1.0d0) -219)
- (scale-float (float 7922505090433024 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6994367119408617 1.0d0) -55)
- (scale-float (float -4832167682003882 1.0d0) -110)
- (scale-float (float 4728849073912540 1.0d0) -171)
- (scale-float (float 7229445077727664 1.0d0) -227)
- (scale-float (float 6143325060988928 1.0d0) -281))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7051734623866298 1.0d0) -55)
- (scale-float (float 6602734696643516 1.0d0) -111)
- (scale-float (float 7572256171155605 1.0d0) -165)
- (scale-float (float -5832521577411901 1.0d0) -220)
- (scale-float (float 5065668173234176 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7109136586542834 1.0d0) -55)
- (scale-float (float -6636647347540607 1.0d0) -110)
- (scale-float (float 8117813830610382 1.0d0) -164)
- (scale-float (float 5654996117808915 1.0d0) -218)
- (scale-float (float 7781068388909056 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7166573308883288 1.0d0) -55)
- (scale-float (float 8714537620740422 1.0d0) -113)
- (scale-float (float 4782399557875443 1.0d0) -167)
- (scale-float (float -4906181603167593 1.0d0) -222)
- (scale-float (float 6985796128079872 1.0d0) -277))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7224045093025286 1.0d0) -55)
- (scale-float (float 7002193656429775 1.0d0) -110)
- (scale-float (float 6964543791154448 1.0d0) -164)
- (scale-float (float -7940289474261827 1.0d0) -218)
- (scale-float (float 4826411323326464 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7281552241805660 1.0d0) -55)
- (scale-float (float 8980245436623427 1.0d0) -109)
- (scale-float (float 6183095561836775 1.0d0) -163)
- (scale-float (float -8016598767501366 1.0d0) -224)
- (scale-float (float 8808835028353024 1.0d0) -279))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7339095058767125 1.0d0) -55)
- (scale-float (float 5897632820997376 1.0d0) -109)
- (scale-float (float 8629091534706665 1.0d0) -163)
- (scale-float (float 5607425133319746 1.0d0) -217)
- (scale-float (float 4822937505021952 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7396673848164983 1.0d0) -55)
- (scale-float (float 8922134058383169 1.0d0) -110)
- (scale-float (float 5860943883768514 1.0d0) -167)
- (scale-float (float 6739148691760732 1.0d0) -221)
- (scale-float (float 7246473065398272 1.0d0) -277))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7454288914973862 1.0d0) -55)
- (scale-float (float -5534265883516272 1.0d0) -110)
- (scale-float (float -7599675863546075 1.0d0) -164)
- (scale-float (float -5880007463065778 1.0d0) -218)
- (scale-float (float -6842450592268288 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7511940564894482 1.0d0) -55)
- (scale-float (float -4510530079673467 1.0d0) -109)
- (scale-float (float -5828955460602770 1.0d0) -164)
- (scale-float (float 8455097717915642 1.0d0) -219)
- (scale-float (float -7360031460229120 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7569629104360456 1.0d0) -55)
- (scale-float (float 5463531378599228 1.0d0) -110)
- (scale-float (float 7442931652908749 1.0d0) -165)
- (scale-float (float 8489615287044643 1.0d0) -219)
- (scale-float (float -7132058411794432 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7627354840545122 1.0d0) -55)
- (scale-float (float 6830776078420744 1.0d0) -110)
- (scale-float (float -6599513078449499 1.0d0) -166)
- (scale-float (float -7088737710654194 1.0d0) -221)
- (scale-float (float 6251897204244480 1.0d0) -277))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7685118081368404 1.0d0) -55)
- (scale-float (float 8985004028767087 1.0d0) -109)
- (scale-float (float -4808541751657683 1.0d0) -163)
- (scale-float (float -5519928814936255 1.0d0) -218)
- (scale-float (float -8319844358717440 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7742919135503711 1.0d0) -55)
- (scale-float (float 5182401773456419 1.0d0) -109)
- (scale-float (float -6036935714297580 1.0d0) -163)
- (scale-float (float 6598306630202497 1.0d0) -218)
- (scale-float (float 7689169814470656 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7800758312384863 1.0d0) -55)
- (scale-float (float 4930813786379107 1.0d0) -109)
- (scale-float (float 7750504761624279 1.0d0) -164)
- (scale-float (float -5247586008127933 1.0d0) -219)
- (scale-float (float 7577988707778560 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7858635922213056 1.0d0) -55)
- (scale-float (float -6376094486028435 1.0d0) -110)
- (scale-float (float 7666507855896739 1.0d0) -164)
- (scale-float (float 5717893804250778 1.0d0) -220)
- (scale-float (float 6492539317911552 1.0d0) -275))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7916552275963855 1.0d0) -55)
- (scale-float (float -6470851910821482 1.0d0) -109)
- (scale-float (float -8121047700460262 1.0d0) -163)
- (scale-float (float 4777450552030372 1.0d0) -219)
- (scale-float (float -6416869306138624 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7974507685394225 1.0d0) -55)
- (scale-float (float 6493895228358546 1.0d0) -109)
- (scale-float (float -7438974047349112 1.0d0) -164)
- (scale-float (float -8200925466363753 1.0d0) -218)
- (scale-float (float 6506186355703808 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8032502463049597 1.0d0) -55)
- (scale-float (float 6907154930094209 1.0d0) -109)
- (scale-float (float -5342807368173606 1.0d0) -165)
- (scale-float (float 5089095618658254 1.0d0) -224)
- (scale-float (float -5918269059891200 1.0d0) -278))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8090536922270962 1.0d0) -55)
- (scale-float (float 5811735848428788 1.0d0) -109)
- (scale-float (float -8491959107345443 1.0d0) -163)
- (scale-float (float 8581984814799862 1.0d0) -217)
- (scale-float (float 7808598289006592 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8148611377202007 1.0d0) -55)
- (scale-float (float 7337690669143183 1.0d0) -109)
- (scale-float (float -7988618593069985 1.0d0) -163)
- (scale-float (float -6341858574449737 1.0d0) -222)
- (scale-float (float -5614155528142848 1.0d0) -277))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8206726142796284 1.0d0) -55)
- (scale-float (float 7484712771178970 1.0d0) -110)
- (scale-float (float 4758186941620262 1.0d0) -166)
- (scale-float (float -5279832774698596 1.0d0) -224)
- (scale-float (float 5740846662025216 1.0d0) -281))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8264881534824413 1.0d0) -55)
- (scale-float (float 6014350472706808 1.0d0) -112)
- (scale-float (float 6384986308908024 1.0d0) -166)
- (scale-float (float 5441212634871738 1.0d0) -221)
- (scale-float (float 7042630377406464 1.0d0) -275))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8323077869881323 1.0d0) -55)
- (scale-float (float 7716876308190961 1.0d0) -109)
- (scale-float (float -8848505200423454 1.0d0) -163)
- (scale-float (float -6612535561287589 1.0d0) -217)
- (scale-float (float -7158332374417408 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8381315465393531 1.0d0) -55)
- (scale-float (float -6358807453286942 1.0d0) -112)
- (scale-float (float 5782188539544783 1.0d0) -172)
- (scale-float (float 5455174163373367 1.0d0) -229)
- (scale-float (float -5587693496958976 1.0d0) -283))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8439594639626451 1.0d0) -55)
- (scale-float (float -4737446417511680 1.0d0) -111)
- (scale-float (float -8394721963901726 1.0d0) -165)
- (scale-float (float 6105834803743561 1.0d0) -220)
- (scale-float (float -4605459617021952 1.0d0) -281))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8497915711691749 1.0d0) -55)
- (scale-float (float 7419391130086974 1.0d0) -110)
- (scale-float (float -6486478369933276 1.0d0) -164)
- (scale-float (float -4556550088056046 1.0d0) -221)
- (scale-float (float -7709509161320448 1.0d0) -275))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8556279001554730 1.0d0) -55)
- (scale-float (float 8834989484988432 1.0d0) -109)
- (scale-float (float -6904453082549534 1.0d0) -163)
- (scale-float (float -8929923407877519 1.0d0) -220)
- (scale-float (float 6037335879712768 1.0d0) -275))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8614684830041765 1.0d0) -55)
- (scale-float (float -6444318670433754 1.0d0) -109)
- (scale-float (float -5794766695399649 1.0d0) -163)
- (scale-float (float -7996152427272018 1.0d0) -220)
- (scale-float (float -6974106972848128 1.0d0) -275))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8673133518847751 1.0d0) -55)
- (scale-float (float 7342192056255074 1.0d0) -110)
- (scale-float (float -8710376291718960 1.0d0) -164)
- (scale-float (float -7330547468867136 1.0d0) -218)
- (scale-float (float -7410057208791040 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8731625390543623 1.0d0) -55)
- (scale-float (float -6515227151142448 1.0d0) -109)
- (scale-float (float -8228645499151671 1.0d0) -168)
- (scale-float (float -8354259906275142 1.0d0) -224)
- (scale-float (float 4507582171447296 1.0d0) -279))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8790160768583887 1.0d0) -55)
- (scale-float (float -6639737539678400 1.0d0) -109)
- (scale-float (float 5807702150068111 1.0d0) -163)
- (scale-float (float -6971441697391849 1.0d0) -218)
- (scale-float (float -6399430273630208 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8848739977314208 1.0d0) -55)
- (scale-float (float -5361335681334369 1.0d0) -110)
- (scale-float (float 4662389135718374 1.0d0) -164)
- (scale-float (float -6628223388109715 1.0d0) -220)
- (scale-float (float -5660384324943872 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8907363341979030 1.0d0) -55)
- (scale-float (float -7885202077638681 1.0d0) -109)
- (scale-float (float -4920087825332628 1.0d0) -163)
- (scale-float (float 6730415028849300 1.0d0) -217)
- (scale-float (float -7025253338562560 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8966031188729235 1.0d0) -55)
- (scale-float (float 8834739940364126 1.0d0) -109)
- (scale-float (float 6589986099054557 1.0d0) -163)
- (scale-float (float 7454927126581803 1.0d0) -218)
- (scale-float (float -8652212748763136 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4512371922314926 1.0d0) -54)
- (scale-float (float 6094415848847015 1.0d0) -109)
- (scale-float (float 5241322971970717 1.0d0) -164)
- (scale-float (float -5121031000799317 1.0d0) -219)
- (scale-float (float -6445919928451072 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4541750818833897 1.0d0) -54)
- (scale-float (float -5797423195745767 1.0d0) -108)
- (scale-float (float 7446301587479589 1.0d0) -163)
- (scale-float (float -5920054400259469 1.0d0) -221)
- (scale-float (float -6269948519251968 1.0d0) -275))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4571152448379822 1.0d0) -54)
- (scale-float (float -5625570255588913 1.0d0) -108)
- (scale-float (float 7219257663238561 1.0d0) -162)
- (scale-float (float 5223543510538164 1.0d0) -217)
- (scale-float (float 7698724515217408 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4600576975879743 1.0d0) -54)
- (scale-float (float -5194091547317777 1.0d0) -109)
- (scale-float (float 8249610839084712 1.0d0) -165)
- (scale-float (float 7072510250153134 1.0d0) -220)
- (scale-float (float -5191509610594304 1.0d0) -276))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4630024566733386 1.0d0) -54)
- (scale-float (float -5791983535953253 1.0d0) -108)
- (scale-float (float 5414210622429235 1.0d0) -162)
- (scale-float (float 6848444124821025 1.0d0) -216)
- (scale-float (float 8680263789420544 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4659495386817115 1.0d0) -54)
- (scale-float (float 7855398709617036 1.0d0) -108)
- (scale-float (float 5235129028043004 1.0d0) -163)
- (scale-float (float 5095606684970886 1.0d0) -218)
- (scale-float (float 8216669919084544 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4688989602487915 1.0d0) -54)
- (scale-float (float -5377641559708678 1.0d0) -108)
- (scale-float (float 7394066903993584 1.0d0) -168)
- (scale-float (float -8480567685467516 1.0d0) -222)
- (scale-float (float 6931801827704832 1.0d0) -276))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4718507380587383 1.0d0) -54)
- (scale-float (float -6818224481140156 1.0d0) -108)
- (scale-float (float 6139074941087105 1.0d0) -163)
- (scale-float (float -6287394042137960 1.0d0) -218)
- (scale-float (float 4825403320991744 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4748048888445756 1.0d0) -54)
- (scale-float (float 6671135438521520 1.0d0) -109)
- (scale-float (float -8432447782992624 1.0d0) -164)
- (scale-float (float 7534672896201344 1.0d0) -218)
- (scale-float (float 7438896541466624 1.0d0) -276))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4777614293885954 1.0d0) -54)
- (scale-float (float -5505918640551912 1.0d0) -108)
- (scale-float (float 7233084325496090 1.0d0) -162)
- (scale-float (float -4669191484899807 1.0d0) -219)
- (scale-float (float 7707921153523712 1.0d0) -277))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4807203765227641 1.0d0) -54)
- (scale-float (float -6229730022744001 1.0d0) -108)
- (scale-float (float 5547093377552047 1.0d0) -163)
- (scale-float (float -6133593763606207 1.0d0) -217)
- (scale-float (float -7928192135364608 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4836817471291318 1.0d0) -54)
- (scale-float (float 5431529900780902 1.0d0) -108)
- (scale-float (float 6298041380981058 1.0d0) -162)
- (scale-float (float 7689531001793826 1.0d0) -216)
- (scale-float (float -6386590265720832 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4866455581402435 1.0d0) -54)
- (scale-float (float -8087327352517896 1.0d0) -114)
- (scale-float (float -7368169183518002 1.0d0) -169)
- (scale-float (float 8452265808518809 1.0d0) -223)
- (scale-float (float -5167074080980992 1.0d0) -278))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4896118265395521 1.0d0) -54)
- (scale-float (float -5858372132977222 1.0d0) -108)
- (scale-float (float 4733665516272146 1.0d0) -163)
- (scale-float (float 6362851693766871 1.0d0) -217)
- (scale-float (float 5305077032026112 1.0d0) -280))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4925805693618345 1.0d0) -54)
- (scale-float (float -6145492754901482 1.0d0) -108)
- (scale-float (float -7952803796369268 1.0d0) -162)
- (scale-float (float -7703681047106349 1.0d0) -217)
- (scale-float (float 8902810366115840 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4955518036936097 1.0d0) -54)
- (scale-float (float -4919569790715614 1.0d0) -110)
- (scale-float (float 6027960577342663 1.0d0) -164)
- (scale-float (float -8847907680015868 1.0d0) -218)
- (scale-float (float -5787839612682240 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4985255466735593 1.0d0) -54)
- (scale-float (float 8089815550941344 1.0d0) -109)
- (scale-float (float 7890943098200302 1.0d0) -163)
- (scale-float (float 7870595316283973 1.0d0) -217)
- (scale-float (float 4922290895634432 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5015018154929504 1.0d0) -54)
- (scale-float (float 5343521222344705 1.0d0) -110)
- (scale-float (float 5867787354045478 1.0d0) -165)
- (scale-float (float 4514916001696819 1.0d0) -219)
- (scale-float (float -8573133113131008 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5044806273960608 1.0d0) -54)
- (scale-float (float 7764102156759821 1.0d0) -110)
- (scale-float (float -7786064467293972 1.0d0) -165)
- (scale-float (float -7886026003467305 1.0d0) -219)
- (scale-float (float -4967375467315200 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5074619996806070 1.0d0) -54)
- (scale-float (float -7751186127428779 1.0d0) -109)
- (scale-float (float -7146010290927952 1.0d0) -163)
- (scale-float (float 6675897418535962 1.0d0) -217)
- (scale-float (float -8420051655786496 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5104459496981742 1.0d0) -54)
- (scale-float (float -6010706914106587 1.0d0) -109)
- (scale-float (float -7628409076726424 1.0d0) -163)
- (scale-float (float -6357395433631287 1.0d0) -218)
- (scale-float (float 8299826839945216 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5134324948546493 1.0d0) -54)
- (scale-float (float -6916953015471680 1.0d0) -108)
- (scale-float (float 7167355886226005 1.0d0) -166)
- (scale-float (float -8859515625169292 1.0d0) -223)
- (scale-float (float -4529739804966912 1.0d0) -278))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5164216526106559 1.0d0) -54)
- (scale-float (float -5907726073191727 1.0d0) -108)
- (scale-float (float -7161790682323884 1.0d0) -165)
- (scale-float (float -5380442781818173 1.0d0) -221)
- (scale-float (float -7899266890072064 1.0d0) -275))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5194134404819923 1.0d0) -54)
- (scale-float (float -5964216022171304 1.0d0) -108)
- (scale-float (float -7665535065418988 1.0d0) -163)
- (scale-float (float 7605865686912239 1.0d0) -217)
- (scale-float (float 7316831097421824 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5224078760400717 1.0d0) -54)
- (scale-float (float 4560087958102505 1.0d0) -112)
- (scale-float (float 5886848888205149 1.0d0) -166)
- (scale-float (float 8309156517618128 1.0d0) -220)
- (scale-float (float -5324992313819136 1.0d0) -275))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5254049769123653 1.0d0) -54)
- (scale-float (float 6863384480765018 1.0d0) -108)
- (scale-float (float 4679312891588944 1.0d0) -162)
- (scale-float (float 7532120129297727 1.0d0) -216)
- (scale-float (float 7565695657197568 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5284047607828478 1.0d0) -54)
- (scale-float (float 6537710083588337 1.0d0) -108)
- (scale-float (float -5265208786779314 1.0d0) -162)
- (scale-float (float 7965661672930252 1.0d0) -218)
- (scale-float (float 7750394843496448 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5314072453924456 1.0d0) -54)
- (scale-float (float -7819090497685694 1.0d0) -108)
- (scale-float (float 8331672122895500 1.0d0) -165)
- (scale-float (float 7057899603031006 1.0d0) -219)
- (scale-float (float 5712657984323584 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5344124485394874 1.0d0) -54)
- (scale-float (float 6006304204154579 1.0d0) -108)
- (scale-float (float -7367237253163575 1.0d0) -162)
- (scale-float (float 8583406004471291 1.0d0) -220)
- (scale-float (float -5138008364810240 1.0d0) -277))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5374203880801585 1.0d0) -54)
- (scale-float (float 7082807698146316 1.0d0) -108)
- (scale-float (float 5431708439327186 1.0d0) -164)
- (scale-float (float -5638738396141387 1.0d0) -219)
- (scale-float (float -4570103151656960 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5404310819289564 1.0d0) -54)
- (scale-float (float -5886387432625778 1.0d0) -108)
- (scale-float (float 7599531358932904 1.0d0) -164)
- (scale-float (float -8884544676028892 1.0d0) -220)
- (scale-float (float 8802287441412096 1.0d0) -275))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5434445480591499 1.0d0) -54)
- (scale-float (float -8160630678973751 1.0d0) -108)
- (scale-float (float -8952666462980655 1.0d0) -164)
- (scale-float (float 8107005340255611 1.0d0) -218)
- (scale-float (float -7691253319925760 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5464608045032412 1.0d0) -54)
- (scale-float (float -8286250809013992 1.0d0) -109)
- (scale-float (float 6759604652366405 1.0d0) -163)
- (scale-float (float 6722257583934538 1.0d0) -220)
- (scale-float (float -5086630926876672 1.0d0) -275))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5494798693534303 1.0d0) -54)
- (scale-float (float 6714812821611110 1.0d0) -108)
- (scale-float (float 7693551393041517 1.0d0) -165)
- (scale-float (float 4640121243443789 1.0d0) -219)
- (scale-float (float 4944327467859968 1.0d0) -276))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5525017607620826 1.0d0) -54)
- (scale-float (float -8080142529166553 1.0d0) -109)
- (scale-float (float 8579210614091512 1.0d0) -163)
- (scale-float (float 5260133494884443 1.0d0) -217)
- (scale-float (float 5582301427924992 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5555264969421986 1.0d0) -54)
- (scale-float (float 7137673117952044 1.0d0) -108)
- (scale-float (float 5075308634056774 1.0d0) -162)
- (scale-float (float -6076460270908767 1.0d0) -216)
- (scale-float (float 8913840331456512 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5585540961678879 1.0d0) -54)
- (scale-float (float 5110387220890711 1.0d0) -112)
- (scale-float (float 7472526926945199 1.0d0) -166)
- (scale-float (float 6718546070924804 1.0d0) -220)
- (scale-float (float -5978423460626432 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5615845767748444 1.0d0) -54)
- (scale-float (float 7069981615263570 1.0d0) -109)
- (scale-float (float -5041175894572219 1.0d0) -164)
- (scale-float (float -6067200350673256 1.0d0) -218)
- (scale-float (float -5337373683875840 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5646179571608259 1.0d0) -54)
- (scale-float (float -5969882006205395 1.0d0) -112)
- (scale-float (float -5310936463543469 1.0d0) -166)
- (scale-float (float 5250808131003894 1.0d0) -220)
- (scale-float (float 7733801445752832 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5676542557861356 1.0d0) -54)
- (scale-float (float 7813679352548076 1.0d0) -109)
- (scale-float (float -6999346431632929 1.0d0) -164)
- (scale-float (float -8591741368161837 1.0d0) -220)
- (scale-float (float -4838897577099264 1.0d0) -275))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5706934911741074 1.0d0) -54)
- (scale-float (float -4591456369063391 1.0d0) -108)
- (scale-float (float 6615031414158987 1.0d0) -163)
- (scale-float (float -5394682262959669 1.0d0) -218)
- (scale-float (float -7966786237235200 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5737356819115934 1.0d0) -54)
- (scale-float (float -4921304159190106 1.0d0) -108)
- (scale-float (float -5289724371041531 1.0d0) -162)
- (scale-float (float 8540065299573764 1.0d0) -216)
- (scale-float (float -6246118036234240 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5767808466494552 1.0d0) -54)
- (scale-float (float 7834867164461612 1.0d0) -108)
- (scale-float (float -6057688269140587 1.0d0) -162)
- (scale-float (float 8931755104912459 1.0d0) -219)
- (scale-float (float -8619033248137216 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5798290041030581 1.0d0) -54)
- (scale-float (float -8349877875856717 1.0d0) -109)
- (scale-float (float 8163150127609112 1.0d0) -164)
- (scale-float (float 8918413500492032 1.0d0) -219)
- (scale-float (float -7528032969424896 1.0d0) -278))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5828801730527676 1.0d0) -54)
- (scale-float (float -7543810688919708 1.0d0) -109)
- (scale-float (float 7722482010838801 1.0d0) -164)
- (scale-float (float -6834012364286068 1.0d0) -221)
- (scale-float (float -5998741041446912 1.0d0) -276))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5859343723444504 1.0d0) -54)
- (scale-float (float -7421385686727085 1.0d0) -108)
- (scale-float (float -8429945996744161 1.0d0) -163)
- (scale-float (float 7207515045379233 1.0d0) -217)
- (scale-float (float -8228139563352064 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5889916208899774 1.0d0) -54)
- (scale-float (float -4674283487672738 1.0d0) -108)
- (scale-float (float 5672587542123089 1.0d0) -163)
- (scale-float (float 8422751571816060 1.0d0) -220)
- (scale-float (float 7911739524907008 1.0d0) -276))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5920519376677306 1.0d0) -54)
- (scale-float (float -5250407275313443 1.0d0) -108)
- (scale-float (float -4605976276072331 1.0d0) -162)
- (scale-float (float -6209485626912573 1.0d0) -216)
- (scale-float (float -6200553119064064 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5951153417231127 1.0d0) -54)
- (scale-float (float 7856518334009793 1.0d0) -108)
- (scale-float (float 6981911111573824 1.0d0) -163)
- (scale-float (float -5128172752384731 1.0d0) -220)
- (scale-float (float 8652419861315584 1.0d0) -275))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5981818521690606 1.0d0) -54)
- (scale-float (float 8577060613312499 1.0d0) -108)
- (scale-float (float -6340321397997779 1.0d0) -162)
- (scale-float (float 5448939827810261 1.0d0) -216)
- (scale-float (float -8901481678733312 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6012514881865614 1.0d0) -54)
- (scale-float (float -7860480778018144 1.0d0) -111)
- (scale-float (float -8342641792577533 1.0d0) -169)
- (scale-float (float -8693027931367903 1.0d0) -223)
- (scale-float (float 7826147505078272 1.0d0) -280))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6043242690251722 1.0d0) -54)
- (scale-float (float -6823498238092008 1.0d0) -108)
- (scale-float (float 5156075600076135 1.0d0) -163)
- (scale-float (float 5509330990390834 1.0d0) -217)
- (scale-float (float -7625247047401472 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6074002140035432 1.0d0) -54)
- (scale-float (float 8851806976168487 1.0d0) -108)
- (scale-float (float 7760436775367546 1.0d0) -163)
- (scale-float (float 8701028159537337 1.0d0) -217)
- (scale-float (float 6429747497533440 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6104793425099445 1.0d0) -54)
- (scale-float (float 5524941199192544 1.0d0) -110)
- (scale-float (float 5681686620232979 1.0d0) -164)
- (scale-float (float 7872486800685106 1.0d0) -220)
- (scale-float (float 8442387486474240 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6135616740027952 1.0d0) -54)
- (scale-float (float -5642491117656146 1.0d0) -109)
- (scale-float (float -6325102746319316 1.0d0) -163)
- (scale-float (float 6843328443259586 1.0d0) -218)
- (scale-float (float 8220318131290112 1.0d0) -275))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6166472280111972 1.0d0) -54)
- (scale-float (float 8472944951004593 1.0d0) -112)
- (scale-float (float -6347226898935615 1.0d0) -167)
- (scale-float (float 7351557195299797 1.0d0) -221)
- (scale-float (float 7019053524713472 1.0d0) -277))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6197360241354719 1.0d0) -54)
- (scale-float (float 7537680294401546 1.0d0) -109)
- (scale-float (float -7101841700322343 1.0d0) -163)
- (scale-float (float -8915761922702705 1.0d0) -217)
- (scale-float (float -7990456879382528 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6228280820477004 1.0d0) -54)
- (scale-float (float -5288687005014418 1.0d0) -110)
- (scale-float (float -5218694617980360 1.0d0) -165)
- (scale-float (float 8090026348149549 1.0d0) -222)
- (scale-float (float -8214983313719296 1.0d0) -279))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6259234214922672 1.0d0) -54)
- (scale-float (float -4927270964553817 1.0d0) -108)
- (scale-float (float 8470215160096662 1.0d0) -162)
- (scale-float (float 5678894538463109 1.0d0) -216)
- (scale-float (float 7437533125492736 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6290220622864077 1.0d0) -54)
- (scale-float (float -5699189270528091 1.0d0) -110)
- (scale-float (float -5530242526137833 1.0d0) -165)
- (scale-float (float -7285944726698883 1.0d0) -219)
- (scale-float (float -7840080984604672 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6321240243207592 1.0d0) -54)
- (scale-float (float 7696310263633004 1.0d0) -108)
- (scale-float (float 7652206004191095 1.0d0) -162)
- (scale-float (float 8455646026028582 1.0d0) -217)
- (scale-float (float -4640241842241536 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6352293275599156 1.0d0) -54)
- (scale-float (float 5622380131022882 1.0d0) -112)
- (scale-float (float -7701356562694401 1.0d0) -166)
- (scale-float (float 5774374304450041 1.0d0) -221)
- (scale-float (float -5027086140440576 1.0d0) -275))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6383379920429853 1.0d0) -54)
- (scale-float (float 6082395000110047 1.0d0) -108)
- (scale-float (float -8260835158694014 1.0d0) -162)
- (scale-float (float 6462056623447527 1.0d0) -217)
- (scale-float (float 8210404139991040 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6414500378841538 1.0d0) -54)
- (scale-float (float 8932943429439749 1.0d0) -116)
- (scale-float (float -8724350632606608 1.0d0) -170)
- (scale-float (float 7394655254021948 1.0d0) -226)
- (scale-float (float -6418771346456576 1.0d0) -282))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6445654852732489 1.0d0) -54)
- (scale-float (float 6630692343746876 1.0d0) -109)
- (scale-float (float 5596906211564236 1.0d0) -163)
- (scale-float (float 7000775141288093 1.0d0) -217)
- (scale-float (float 6712199320223744 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6476843544763107 1.0d0) -54)
- (scale-float (float -6567463300180201 1.0d0) -113)
- (scale-float (float 6081636173794535 1.0d0) -167)
- (scale-float (float 5752987244692832 1.0d0) -221)
- (scale-float (float 5566285230637056 1.0d0) -275))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6508066658361646 1.0d0) -54)
- (scale-float (float 7976136740103962 1.0d0) -115)
- (scale-float (float -4792327024289416 1.0d0) -169)
- (scale-float (float 7472671226932633 1.0d0) -223)
- (scale-float (float -7703599982313472 1.0d0) -277))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6539324397729987 1.0d0) -54)
- (scale-float (float 6832979917352444 1.0d0) -108)
- (scale-float (float 6972702137833669 1.0d0) -162)
- (scale-float (float -8943357378665776 1.0d0) -216)
- (scale-float (float -6456432423354368 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6570616967849450 1.0d0) -54)
- (scale-float (float -7071935743463450 1.0d0) -109)
- (scale-float (float -7085858170847411 1.0d0) -163)
- (scale-float (float 8167119248956248 1.0d0) -217)
- (scale-float (float 5159071191269376 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6601944574486640 1.0d0) -54)
- (scale-float (float -4730863724076487 1.0d0) -108)
- (scale-float (float 5593924526336144 1.0d0) -162)
- (scale-float (float 8821645198570676 1.0d0) -216)
- (scale-float (float -5909003596537856 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6633307424199341 1.0d0) -54)
- (scale-float (float 5123807745717619 1.0d0) -108)
- (scale-float (float 7828852147362391 1.0d0) -162)
- (scale-float (float -6607069960518047 1.0d0) -216)
- (scale-float (float 7502492267184128 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6664705724342446 1.0d0) -54)
- (scale-float (float 5179129996467248 1.0d0) -110)
- (scale-float (float 6591497583888178 1.0d0) -165)
- (scale-float (float 8412536519395334 1.0d0) -219)
- (scale-float (float 5472424847605760 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6696139683073924 1.0d0) -54)
- (scale-float (float -8695911602891660 1.0d0) -108)
- (scale-float (float 8796934384215369 1.0d0) -164)
- (scale-float (float 8287182831733458 1.0d0) -219)
- (scale-float (float -7570246986629120 1.0d0) -279))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6727609509360832 1.0d0) -54)
- (scale-float (float -4792140185736031 1.0d0) -109)
- (scale-float (float 5029912584640126 1.0d0) -163)
- (scale-float (float 8375655587728771 1.0d0) -218)
- (scale-float (float -6010696214642688 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6759115412985370 1.0d0) -54)
- (scale-float (float 7049383263602121 1.0d0) -108)
- (scale-float (float 7966500032978979 1.0d0) -164)
- (scale-float (float -4946373334089235 1.0d0) -218)
- (scale-float (float -5303541100707840 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6790657604550973 1.0d0) -54)
- (scale-float (float 4562351160898659 1.0d0) -109)
- (scale-float (float 7117762674089876 1.0d0) -163)
- (scale-float (float -6050459464943318 1.0d0) -217)
- (scale-float (float -6194175991496704 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6822236295488445 1.0d0) -54)
- (scale-float (float -7959086277234874 1.0d0) -108)
- (scale-float (float 7116815396353598 1.0d0) -163)
- (scale-float (float 6417940948877921 1.0d0) -221)
- (scale-float (float 4917787165720576 1.0d0) -275))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6853851698062138 1.0d0) -54)
- (scale-float (float -6460794880831946 1.0d0) -108)
- (scale-float (float 8627544627817744 1.0d0) -162)
- (scale-float (float 7782632443999495 1.0d0) -217)
- (scale-float (float 7698335235620864 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6885504025376175 1.0d0) -54)
- (scale-float (float -7875200407081130 1.0d0) -108)
- (scale-float (float -8817586453762137 1.0d0) -162)
- (scale-float (float 6791034107818861 1.0d0) -217)
- (scale-float (float 5785633163706368 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6917193491380711 1.0d0) -54)
- (scale-float (float -6354209598707159 1.0d0) -108)
- (scale-float (float -5547257667359391 1.0d0) -164)
- (scale-float (float 7480953384043884 1.0d0) -219)
- (scale-float (float -8601638328205312 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6948920310878242 1.0d0) -54)
- (scale-float (float -6529425724220061 1.0d0) -109)
- (scale-float (float -6770777863446063 1.0d0) -165)
- (scale-float (float -4601927600113987 1.0d0) -219)
- (scale-float (float 8743288922570752 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6980684699529956 1.0d0) -54)
- (scale-float (float 8911111487182626 1.0d0) -112)
- (scale-float (float 7866043195791426 1.0d0) -166)
- (scale-float (float 8793868358744477 1.0d0) -221)
- (scale-float (float -7412261453824000 1.0d0) -277))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7012486873862129 1.0d0) -54)
- (scale-float (float 5958377739269213 1.0d0) -110)
- (scale-float (float -7126019962434707 1.0d0) -164)
- (scale-float (float 4824810954656316 1.0d0) -219)
- (scale-float (float -8754419670319104 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7044327051272565 1.0d0) -54)
- (scale-float (float 8724280902124377 1.0d0) -109)
- (scale-float (float 4631327155432459 1.0d0) -167)
- (scale-float (float -4535605803026965 1.0d0) -222)
- (scale-float (float -7769500766175232 1.0d0) -279))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7076205450037083 1.0d0) -54)
- (scale-float (float 7469881275853812 1.0d0) -110)
- (scale-float (float 8708125460348437 1.0d0) -164)
- (scale-float (float -7998827950423527 1.0d0) -218)
- (scale-float (float -8476933266341888 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7108122289316047 1.0d0) -54)
- (scale-float (float 7844065984858103 1.0d0) -110)
- (scale-float (float -6265580730468145 1.0d0) -164)
- (scale-float (float 5578640096157721 1.0d0) -219)
- (scale-float (float -6708594653265920 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7140077789160945 1.0d0) -54)
- (scale-float (float 5965174660247916 1.0d0) -109)
- (scale-float (float -8979964131353364 1.0d0) -163)
- (scale-float (float -5163836372762478 1.0d0) -217)
- (scale-float (float 8878184495742976 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7172072170521013 1.0d0) -54)
- (scale-float (float -7076061197762374 1.0d0) -109)
- (scale-float (float 5765333970830459 1.0d0) -164)
- (scale-float (float -6406058352004189 1.0d0) -218)
- (scale-float (float -7318116292624384 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7204105655249904 1.0d0) -54)
- (scale-float (float 5590020707555993 1.0d0) -108)
- (scale-float (float -6275769150676932 1.0d0) -162)
- (scale-float (float 4524690169176737 1.0d0) -216)
- (scale-float (float 5981746075271168 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7236178466112411 1.0d0) -54)
- (scale-float (float 5287135525880444 1.0d0) -108)
- (scale-float (float 6884703324941259 1.0d0) -162)
- (scale-float (float -7030092162738900 1.0d0) -216)
- (scale-float (float 5449045606326272 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7268290826791229 1.0d0) -54)
- (scale-float (float 8908878693758047 1.0d0) -110)
- (scale-float (float 6583205550288448 1.0d0) -165)
- (scale-float (float -7063133806406844 1.0d0) -219)
- (scale-float (float -8497968332931072 1.0d0) -275))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7300442961893772 1.0d0) -54)
- (scale-float (float -5189387157646678 1.0d0) -108)
- (scale-float (float 6394955726653622 1.0d0) -164)
- (scale-float (float -5970634234690477 1.0d0) -218)
- (scale-float (float -7827681844756480 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7332635096959035 1.0d0) -54)
- (scale-float (float 6145511953117053 1.0d0) -110)
- (scale-float (float 4849814450306723 1.0d0) -164)
- (scale-float (float 7224717405471284 1.0d0) -218)
- (scale-float (float 6818068026753024 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7364867458464510 1.0d0) -54)
- (scale-float (float 8068821842627122 1.0d0) -109)
- (scale-float (float 7885942447230440 1.0d0) -163)
- (scale-float (float 8809025038724724 1.0d0) -220)
- (scale-float (float 4604826755792896 1.0d0) -275))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7397140273833146 1.0d0) -54)
- (scale-float (float -6624004835597461 1.0d0) -108)
- (scale-float (float 5198896387382290 1.0d0) -162)
- (scale-float (float -5012278774128324 1.0d0) -218)
- (scale-float (float -6712284233859072 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7429453771440360 1.0d0) -54)
- (scale-float (float 8489043669316735 1.0d0) -110)
- (scale-float (float -8272354051739522 1.0d0) -164)
- (scale-float (float -7527576378627699 1.0d0) -218)
- (scale-float (float 6127773839654912 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7461808180621106 1.0d0) -54)
- (scale-float (float 4656636580228777 1.0d0) -108)
- (scale-float (float 6180324450698708 1.0d0) -162)
- (scale-float (float 5197737643093849 1.0d0) -216)
- (scale-float (float 6206530073722880 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7494203731676985 1.0d0) -54)
- (scale-float (float 6244875916705196 1.0d0) -111)
- (scale-float (float 8987612493169679 1.0d0) -169)
- (scale-float (float -8944438406190422 1.0d0) -223)
- (scale-float (float 7609318509641728 1.0d0) -279))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7526640655883412 1.0d0) -54)
- (scale-float (float 6331346795363729 1.0d0) -109)
- (scale-float (float -6617581128370878 1.0d0) -165)
- (scale-float (float 7868923505990833 1.0d0) -219)
- (scale-float (float -5540407925800960 1.0d0) -275))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7559119185496837 1.0d0) -54)
- (scale-float (float -8382315125784704 1.0d0) -108)
- (scale-float (float -4847750917965505 1.0d0) -163)
- (scale-float (float 6892943650010337 1.0d0) -218)
- (scale-float (float -8819192773771264 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7591639553762011 1.0d0) -54)
- (scale-float (float 5287089863916958 1.0d0) -108)
- (scale-float (float 5269373324311889 1.0d0) -162)
- (scale-float (float -6075335453453672 1.0d0) -217)
- (scale-float (float 4750037185069056 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7624201994919318 1.0d0) -54)
- (scale-float (float 7236926661985700 1.0d0) -109)
- (scale-float (float -8860397313852292 1.0d0) -163)
- (scale-float (float 6876867734450069 1.0d0) -218)
- (scale-float (float -7957423847571456 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7656806744212146 1.0d0) -54)
- (scale-float (float -8383026502611194 1.0d0) -108)
- (scale-float (float -8658391280494411 1.0d0) -162)
- (scale-float (float -6672759996370751 1.0d0) -217)
- (scale-float (float -6648095027888128 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7689454037894320 1.0d0) -54)
- (scale-float (float 8767228658734370 1.0d0) -109)
- (scale-float (float 7454538244443051 1.0d0) -163)
- (scale-float (float -5789239105644557 1.0d0) -219)
- (scale-float (float -7784663327834112 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7722144113237595 1.0d0) -54)
- (scale-float (float -7347395286237679 1.0d0) -109)
- (scale-float (float -6807613003826818 1.0d0) -163)
- (scale-float (float -7183269477031958 1.0d0) -218)
- (scale-float (float 7486604118687744 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7754877208539189 1.0d0) -54)
- (scale-float (float 4809543627913825 1.0d0) -108)
- (scale-float (float 7770423194575532 1.0d0) -162)
- (scale-float (float 6555719213481071 1.0d0) -216)
- (scale-float (float 5707868316991488 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7787653563129389 1.0d0) -54)
- (scale-float (float 6679707993927243 1.0d0) -109)
- (scale-float (float -5557463966156467 1.0d0) -163)
- (scale-float (float 7831816151390989 1.0d0) -217)
- (scale-float (float -5901536695484416 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7820473417379200 1.0d0) -54)
- (scale-float (float -5610002486131308 1.0d0) -108)
- (scale-float (float 8875542468436136 1.0d0) -165)
- (scale-float (float 4575301741714284 1.0d0) -219)
- (scale-float (float 6957289345777664 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7853337012708057 1.0d0) -54)
- (scale-float (float -8654849815135912 1.0d0) -108)
- (scale-float (float 7625770177442808 1.0d0) -162)
- (scale-float (float -5031752653758568 1.0d0) -218)
- (scale-float (float 6180074740023296 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7886244591591594 1.0d0) -54)
- (scale-float (float 7529633780378438 1.0d0) -108)
- (scale-float (float 5970704415981979 1.0d0) -163)
- (scale-float (float -8821473076797850 1.0d0) -218)
- (scale-float (float 4870462016585728 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7919196397569473 1.0d0) -54)
- (scale-float (float 8245678006873045 1.0d0) -108)
- (scale-float (float 8669879557377221 1.0d0) -162)
- (scale-float (float 8187375233298366 1.0d0) -216)
- (scale-float (float -7732782811553792 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7952192675253264 1.0d0) -54)
- (scale-float (float -7871632387737584 1.0d0) -110)
- (scale-float (float -4721494877770882 1.0d0) -164)
- (scale-float (float -5760355777703592 1.0d0) -220)
- (scale-float (float -8430539578015744 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7985233670334390 1.0d0) -54)
- (scale-float (float 8995652793986095 1.0d0) -111)
- (scale-float (float 7174036095151749 1.0d0) -166)
- (scale-float (float 6888926189976943 1.0d0) -220)
- (scale-float (float -4585856335085568 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8018319629592134 1.0d0) -54)
- (scale-float (float -8809657438135170 1.0d0) -112)
- (scale-float (float -7480916566417747 1.0d0) -167)
- (scale-float (float 4981701802431024 1.0d0) -222)
- (scale-float (float -6969389765099520 1.0d0) -277))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8051450800901699 1.0d0) -54)
- (scale-float (float 5434691875846169 1.0d0) -111)
- (scale-float (float 8472824791907198 1.0d0) -165)
- (scale-float (float -4993174229589980 1.0d0) -219)
- (scale-float (float -8153916873375744 1.0d0) -275))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8084627433242335 1.0d0) -54)
- (scale-float (float -5348243161213007 1.0d0) -108)
- (scale-float (float -5207677165003738 1.0d0) -163)
- (scale-float (float 5128329117851419 1.0d0) -219)
- (scale-float (float -5280568687984640 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8117849776705522 1.0d0) -54)
- (scale-float (float 6927007138186838 1.0d0) -108)
- (scale-float (float -5385777587490323 1.0d0) -162)
- (scale-float (float 7882637401110373 1.0d0) -216)
- (scale-float (float 6123034978058240 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8151118082503223 1.0d0) -54)
- (scale-float (float 8010217738834082 1.0d0) -108)
- (scale-float (float 6233869504436171 1.0d0) -163)
- (scale-float (float 6579181500662535 1.0d0) -217)
- (scale-float (float 8541736362459136 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8184432602976190 1.0d0) -54)
- (scale-float (float -4678009856973107 1.0d0) -108)
- (scale-float (float -6212101755560147 1.0d0) -163)
- (scale-float (float 5386673916374896 1.0d0) -217)
- (scale-float (float -6497159264468992 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8217793591602337 1.0d0) -54)
- (scale-float (float 6670368160536144 1.0d0) -108)
- (scale-float (float -5213186646564335 1.0d0) -162)
- (scale-float (float 8005924993100813 1.0d0) -218)
- (scale-float (float 4589742073348096 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8251201303005184 1.0d0) -54)
- (scale-float (float 8472289190784020 1.0d0) -109)
- (scale-float (float -6804170038942413 1.0d0) -163)
- (scale-float (float -8481091176831416 1.0d0) -217)
- (scale-float (float -8274927296708608 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8284655992962352 1.0d0) -54)
- (scale-float (float 8737697740526153 1.0d0) -112)
- (scale-float (float 4989327011412342 1.0d0) -166)
- (scale-float (float -8654144241045042 1.0d0) -220)
- (scale-float (float -7940971920490496 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8318157918414133 1.0d0) -54)
- (scale-float (float 5393702223165852 1.0d0) -108)
- (scale-float (float -6738619460628835 1.0d0) -166)
- (scale-float (float 8111910404216900 1.0d0) -220)
- (scale-float (float -7565201631084544 1.0d0) -276))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8351707337472124 1.0d0) -54)
- (scale-float (float 6580886723114489 1.0d0) -109)
- (scale-float (float 7770629039908958 1.0d0) -163)
- (scale-float (float 4539051284252494 1.0d0) -221)
- (scale-float (float -7660419082616832 1.0d0) -277))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8385304509427924 1.0d0) -54)
- (scale-float (float -8991308292048439 1.0d0) -108)
- (scale-float (float 7468341065508424 1.0d0) -165)
- (scale-float (float 5818796494072124 1.0d0) -219)
- (scale-float (float -5028710098403328 1.0d0) -275))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8418949694761899 1.0d0) -54)
- (scale-float (float -6374091378859262 1.0d0) -109)
- (scale-float (float -5374943449723078 1.0d0) -165)
- (scale-float (float 4555101501983793 1.0d0) -219)
- (scale-float (float -7702943139364864 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8452643155152020 1.0d0) -54)
- (scale-float (float 6202274721011577 1.0d0) -109)
- (scale-float (float -6491377662184166 1.0d0) -165)
- (scale-float (float -7017573449004785 1.0d0) -219)
- (scale-float (float 5590855932182528 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8486385153482762 1.0d0) -54)
- (scale-float (float 8766047713785899 1.0d0) -112)
- (scale-float (float -8232917648720740 1.0d0) -166)
- (scale-float (float 8248969779935131 1.0d0) -222)
- (scale-float (float -7864480035241984 1.0d0) -276))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8520175953854074 1.0d0) -54)
- (scale-float (float 5652739356775365 1.0d0) -108)
- (scale-float (float 7725888744126575 1.0d0) -163)
- (scale-float (float 6266873194749620 1.0d0) -217)
- (scale-float (float -4692701312122880 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8554015821590423 1.0d0) -54)
- (scale-float (float -5572600197130009 1.0d0) -113)
- (scale-float (float -6831622091652219 1.0d0) -167)
- (scale-float (float -8563553322584176 1.0d0) -221)
- (scale-float (float 6205059659202560 1.0d0) -275))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8587905023249901 1.0d0) -54)
- (scale-float (float 7612881592390848 1.0d0) -112)
- (scale-float (float 5922087062680907 1.0d0) -167)
- (scale-float (float -7007212083047902 1.0d0) -221)
- (scale-float (float 8116629915828224 1.0d0) -276))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8621843826633410 1.0d0) -54)
- (scale-float (float 6322337749047105 1.0d0) -108)
- (scale-float (float 7560634196812342 1.0d0) -164)
- (scale-float (float 7870288845622429 1.0d0) -221)
- (scale-float (float -5998834309136384 1.0d0) -275))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8655832500793916 1.0d0) -54)
- (scale-float (float -8363952213368707 1.0d0) -108)
- (scale-float (float -5396004779500850 1.0d0) -162)
- (scale-float (float 5885940877540764 1.0d0) -216)
- (scale-float (float -5256022017605632 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8689871316045770 1.0d0) -54)
- (scale-float (float -7432889515702178 1.0d0) -110)
- (scale-float (float 8866649053132337 1.0d0) -166)
- (scale-float (float 4767266423799998 1.0d0) -220)
- (scale-float (float -8296562063704064 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8723960543974115 1.0d0) -54)
- (scale-float (float -4842581324068868 1.0d0) -108)
- (scale-float (float -7076387154038018 1.0d0) -162)
- (scale-float (float 8373442959647582 1.0d0) -217)
- (scale-float (float -5502449543413760 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8758100457444352 1.0d0) -54)
- (scale-float (float 7341009967788563 1.0d0) -108)
- (scale-float (float -7592821898804018 1.0d0) -162)
- (scale-float (float -5116645296225785 1.0d0) -217)
- (scale-float (float 6627560141357056 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8792291330611694 1.0d0) -54)
- (scale-float (float 6027011009825708 1.0d0) -111)
- (scale-float (float 7328159808672179 1.0d0) -166)
- (scale-float (float -5158623149089477 1.0d0) -227)
- (scale-float (float -7541098192830464 1.0d0) -281))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8826533438930782 1.0d0) -54)
- (scale-float (float 8877873613918524 1.0d0) -108)
- (scale-float (float -5947216410343675 1.0d0) -162)
- (scale-float (float 6224794289481471 1.0d0) -218)
- (scale-float (float -7516413266264064 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8860827059165391 1.0d0) -54)
- (scale-float (float 7605474188324829 1.0d0) -108)
- (scale-float (float -6361355458841842 1.0d0) -164)
- (scale-float (float -8265341481836926 1.0d0) -218)
- (scale-float (float -7951326072799232 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8895172469398201 1.0d0) -54)
- (scale-float (float 6205080002828305 1.0d0) -109)
- (scale-float (float 5411233389563850 1.0d0) -164)
- (scale-float (float 8722910855031143 1.0d0) -220)
- (scale-float (float -8225830325321728 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8929569949040652 1.0d0) -54)
- (scale-float (float 7985823067656771 1.0d0) -109)
- (scale-float (float -7312356250659901 1.0d0) -165)
- (scale-float (float 8966079680896307 1.0d0) -220)
- (scale-float (float -6226556696133632 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8964019778842877 1.0d0) -54)
- (scale-float (float -6541485911088680 1.0d0) -113)
- (scale-float (float -5666681644673596 1.0d0) -172)
- (scale-float (float -5551580701507223 1.0d0) -226)
- (scale-float (float 6001647847211008 1.0d0) -280))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8998522240903711 1.0d0) -54)
- (scale-float (float -8693690530636151 1.0d0) -109)
- (scale-float (float -6017760811640363 1.0d0) -163)
- (scale-float (float -8364834800251897 1.0d0) -217)
- (scale-float (float -4597957294981120 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4516538809340391 1.0d0) -53)
- (scale-float (float 4712323320191029 1.0d0) -107)
- (scale-float (float 8117587223700539 1.0d0) -161)
- (scale-float (float 8624475480540327 1.0d0) -216)
- (scale-float (float 8192504200003584 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4533843098500343 1.0d0) -53)
- (scale-float (float 4714495066670999 1.0d0) -107)
- (scale-float (float 5844489966106497 1.0d0) -161)
- (scale-float (float 5721123954595768 1.0d0) -216)
- (scale-float (float -5969894765461504 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4551174131034618 1.0d0) -53)
- (scale-float (float -6272022655175315 1.0d0) -107)
- (scale-float (float 7666413529628192 1.0d0) -164)
- (scale-float (float 7367618744276558 1.0d0) -219)
- (scale-float (float -7733125290917888 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4568532050740898 1.0d0) -53)
- (scale-float (float -8241010225918141 1.0d0) -107)
- (scale-float (float 5569596895828755 1.0d0) -163)
- (scale-float (float 4990389010213445 1.0d0) -217)
- (scale-float (float -5293832305573888 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4585917002116852 1.0d0) -53)
- (scale-float (float 5078639334726385 1.0d0) -108)
- (scale-float (float 7422036535454205 1.0d0) -163)
- (scale-float (float 8431631450077783 1.0d0) -218)
- (scale-float (float -6462825830678528 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4603329130365388 1.0d0) -53)
- (scale-float (float -5452657142606152 1.0d0) -113)
- (scale-float (float -5572966958953144 1.0d0) -167)
- (scale-float (float 4896067438188759 1.0d0) -221)
- (scale-float (float 6056677421350912 1.0d0) -275))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4620768581399943 1.0d0) -53)
- (scale-float (float -6394889512408980 1.0d0) -107)
- (scale-float (float -5248674441708195 1.0d0) -161)
- (scale-float (float 8031626806578780 1.0d0) -215)
- (scale-float (float -6772328549416960 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4638235501849821 1.0d0) -53)
- (scale-float (float 7342849852426935 1.0d0) -109)
- (scale-float (float 4940420208140210 1.0d0) -166)
- (scale-float (float -4950318263085061 1.0d0) -220)
- (scale-float (float -4625648551985152 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4655730039065576 1.0d0) -53)
- (scale-float (float -7385125698097314 1.0d0) -107)
- (scale-float (float -6384809890151543 1.0d0) -163)
- (scale-float (float -5800383841029970 1.0d0) -220)
- (scale-float (float -6188260689969152 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4673252341124429 1.0d0) -53)
- (scale-float (float -5924877989770359 1.0d0) -111)
- (scale-float (float 7048520143305684 1.0d0) -167)
- (scale-float (float 6111597169126294 1.0d0) -221)
- (scale-float (float 5050432387809280 1.0d0) -276))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4690802556835742 1.0d0) -53)
- (scale-float (float 6332623197245562 1.0d0) -107)
- (scale-float (float -7492074553469258 1.0d0) -162)
- (scale-float (float -6754431030774425 1.0d0) -219)
- (scale-float (float -5812764733865984 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4708380835746527 1.0d0) -53)
- (scale-float (float 5051916109759041 1.0d0) -108)
- (scale-float (float -5679535756966327 1.0d0) -162)
- (scale-float (float -6625043549544358 1.0d0) -217)
- (scale-float (float -5153473959624704 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4725987328147002 1.0d0) -53)
- (scale-float (float 5351540980857506 1.0d0) -107)
- (scale-float (float 5017698638689441 1.0d0) -161)
- (scale-float (float -7113428247683296 1.0d0) -215)
- (scale-float (float -6001342382342144 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4743622185076197 1.0d0) -53)
- (scale-float (float -4748758349123609 1.0d0) -109)
- (scale-float (float -5492849729385543 1.0d0) -165)
- (scale-float (float 5442895358036660 1.0d0) -219)
- (scale-float (float -5758552221941760 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4761285558327599 1.0d0) -53)
- (scale-float (float -7001910292957345 1.0d0) -109)
- (scale-float (float 7369944209338672 1.0d0) -164)
- (scale-float (float 4733316477155528 1.0d0) -220)
- (scale-float (float -7265936393895936 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4778977600454850 1.0d0) -53)
- (scale-float (float -8163617702390692 1.0d0) -108)
- (scale-float (float 8888228832011218 1.0d0) -163)
- (scale-float (float -8419129775633155 1.0d0) -217)
- (scale-float (float -5492767800557568 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4796698464777487 1.0d0) -53)
- (scale-float (float -5714826189455742 1.0d0) -107)
- (scale-float (float 8099898202192098 1.0d0) -162)
- (scale-float (float 7041527205063924 1.0d0) -217)
- (scale-float (float 8188407241244672 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4814448305386732 1.0d0) -53)
- (scale-float (float -8539132865176413 1.0d0) -107)
- (scale-float (float 5822439319087047 1.0d0) -162)
- (scale-float (float 5825333419334273 1.0d0) -217)
- (scale-float (float -5781450953359360 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4832227277151328 1.0d0) -53)
- (scale-float (float -8438381943499715 1.0d0) -111)
- (scale-float (float -8372592215131924 1.0d0) -165)
- (scale-float (float 8679567552715980 1.0d0) -219)
- (scale-float (float 6272998587891712 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4850035535723427 1.0d0) -53)
- (scale-float (float -7945180857706407 1.0d0) -108)
- (scale-float (float 7714728014554843 1.0d0) -164)
- (scale-float (float 5808308686522136 1.0d0) -219)
- (scale-float (float 8751604008878080 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4867873237544520 1.0d0) -53)
- (scale-float (float -5019721500009499 1.0d0) -109)
- (scale-float (float 8026920363984100 1.0d0) -164)
- (scale-float (float -6714864918368138 1.0d0) -219)
- (scale-float (float -6406155998855168 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4885740539851424 1.0d0) -53)
- (scale-float (float 4655630896099995 1.0d0) -110)
- (scale-float (float -5361624528102949 1.0d0) -166)
- (scale-float (float -8600022955113898 1.0d0) -220)
- (scale-float (float -8315235169468416 1.0d0) -277))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4903637600682314 1.0d0) -53)
- (scale-float (float -8343593797004275 1.0d0) -107)
- (scale-float (float -6880464660655384 1.0d0) -163)
- (scale-float (float -5161724039003758 1.0d0) -218)
- (scale-float (float -8758778528661504 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4921564578882804 1.0d0) -53)
- (scale-float (float 4558698905876837 1.0d0) -107)
- (scale-float (float -6675770933383906 1.0d0) -163)
- (scale-float (float -6175485009200689 1.0d0) -218)
- (scale-float (float 5416315432468480 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4939521634112088 1.0d0) -53)
- (scale-float (float -5768107888022972 1.0d0) -107)
- (scale-float (float -6517650997167120 1.0d0) -162)
- (scale-float (float 7307944886714264 1.0d0) -218)
- (scale-float (float 7980825110249472 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4957508926849117 1.0d0) -53)
- (scale-float (float -5880729525638918 1.0d0) -107)
- (scale-float (float -5880387024013551 1.0d0) -161)
- (scale-float (float 8057969928250970 1.0d0) -215)
- (scale-float (float 6944751229255680 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4975526618398843 1.0d0) -53)
- (scale-float (float -6577772829195700 1.0d0) -111)
- (scale-float (float -7049929814140454 1.0d0) -165)
- (scale-float (float -5584941222299087 1.0d0) -219)
- (scale-float (float -6585434108854272 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4993574870898507 1.0d0) -53)
- (scale-float (float 5062895028490683 1.0d0) -108)
- (scale-float (float 8217973798328345 1.0d0) -162)
- (scale-float (float 5371979073867810 1.0d0) -217)
- (scale-float (float -8517496665931776 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5011653847323981 1.0d0) -53)
- (scale-float (float 6662133346642981 1.0d0) -107)
- (scale-float (float -7386942265315174 1.0d0) -162)
- (scale-float (float -6222074877515867 1.0d0) -216)
- (scale-float (float -4907384985075712 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5029763711496166 1.0d0) -53)
- (scale-float (float -5433443448605480 1.0d0) -108)
- (scale-float (float 7332416874678522 1.0d0) -162)
- (scale-float (float -6100455288116160 1.0d0) -216)
- (scale-float (float -4762855684489216 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5047904628087439 1.0d0) -53)
- (scale-float (float 6026828497807981 1.0d0) -109)
- (scale-float (float -6878535050593153 1.0d0) -163)
- (scale-float (float -8177381643089568 1.0d0) -217)
- (scale-float (float 5873772891799552 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5066076762628163 1.0d0) -53)
- (scale-float (float -6507542383268338 1.0d0) -108)
- (scale-float (float -5513687939405299 1.0d0) -163)
- (scale-float (float -5818442986183336 1.0d0) -218)
- (scale-float (float 5663989782020096 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5084280281513242 1.0d0) -53)
- (scale-float (float 7467568404310058 1.0d0) -109)
- (scale-float (float 7834463879395691 1.0d0) -164)
- (scale-float (float -6214698115088728 1.0d0) -218)
- (scale-float (float 7834731090018304 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5102515352008741 1.0d0) -53)
- (scale-float (float 7579413498622770 1.0d0) -110)
- (scale-float (float 8133827303462379 1.0d0) -165)
- (scale-float (float -6468784855578576 1.0d0) -221)
- (scale-float (float -6064180980875264 1.0d0) -275))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5120782142258555 1.0d0) -53)
- (scale-float (float -7003545277399288 1.0d0) -109)
- (scale-float (float 9004947866668099 1.0d0) -165)
- (scale-float (float -4888525092852748 1.0d0) -221)
- (scale-float (float 8141576595308544 1.0d0) -275))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5139080821291139 1.0d0) -53)
- (scale-float (float -5195165037288157 1.0d0) -109)
- (scale-float (float -5919373685808232 1.0d0) -165)
- (scale-float (float -8464948068835386 1.0d0) -219)
- (scale-float (float 4984409489932288 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5157411559026295 1.0d0) -53)
- (scale-float (float -6869926425063928 1.0d0) -108)
- (scale-float (float -5065083946326269 1.0d0) -162)
- (scale-float (float 5740385651574615 1.0d0) -219)
- (scale-float (float -6017247978717184 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5175774526282015 1.0d0) -53)
- (scale-float (float 8151256617197900 1.0d0) -110)
- (scale-float (float -5090237931201716 1.0d0) -166)
- (scale-float (float 4822061880865465 1.0d0) -221)
- (scale-float (float -7849799357825024 1.0d0) -275))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5194169894781386 1.0d0) -53)
- (scale-float (float 5720248741678870 1.0d0) -109)
- (scale-float (float 8476785785156408 1.0d0) -163)
- (scale-float (float 6427013979864677 1.0d0) -218)
- (scale-float (float 5803423157452800 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5212597837159551 1.0d0) -53)
- (scale-float (float -8620836191453318 1.0d0) -107)
- (scale-float (float 5502489131210675 1.0d0) -162)
- (scale-float (float -7155086140526867 1.0d0) -216)
- (scale-float (float -5458023103414272 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5231058526970729 1.0d0) -53)
- (scale-float (float 8501416089415538 1.0d0) -107)
- (scale-float (float -7323763124249820 1.0d0) -161)
- (scale-float (float -7091310731773024 1.0d0) -215)
- (scale-float (float -8850570112040960 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5249552138695305 1.0d0) -53)
- (scale-float (float 6446250485425073 1.0d0) -108)
- (scale-float (float 7083381607740477 1.0d0) -164)
- (scale-float (float -5327682890406449 1.0d0) -221)
- (scale-float (float 6771644567650304 1.0d0) -279))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5268078847746965 1.0d0) -53)
- (scale-float (float -7510185916055648 1.0d0) -109)
- (scale-float (float 6448163352840430 1.0d0) -167)
- (scale-float (float 6325767741577631 1.0d0) -223)
- (scale-float (float 4857990289031168 1.0d0) -277))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5286638830479906 1.0d0) -53)
- (scale-float (float 8984572682883449 1.0d0) -107)
- (scale-float (float 8908915364579007 1.0d0) -162)
- (scale-float (float -8223388342784113 1.0d0) -216)
- (scale-float (float 5798531723657216 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5305232264196107 1.0d0) -53)
- (scale-float (float -8609900257612480 1.0d0) -107)
- (scale-float (float -5052626816997173 1.0d0) -161)
- (scale-float (float -7143976190293253 1.0d0) -216)
- (scale-float (float 6384342274637824 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5323859327152651 1.0d0) -53)
- (scale-float (float 4755051264805225 1.0d0) -107)
- (scale-float (float -5319438623619327 1.0d0) -161)
- (scale-float (float 7827806197208571 1.0d0) -215)
- (scale-float (float 8992059237531648 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5342520198569132 1.0d0) -53)
- (scale-float (float -6754203398931628 1.0d0) -107)
- (scale-float (float 5271617458007905 1.0d0) -161)
- (scale-float (float -6616588986438304 1.0d0) -215)
- (scale-float (float -7840693537767424 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5361215058635102 1.0d0) -53)
- (scale-float (float 6270609391735678 1.0d0) -107)
- (scale-float (float -5698788142442072 1.0d0) -161)
- (scale-float (float 8842738579911480 1.0d0) -217)
- (scale-float (float 5166792707047424 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5379944088517606 1.0d0) -53)
- (scale-float (float 6052877702039045 1.0d0) -107)
- (scale-float (float 7111566148157146 1.0d0) -161)
- (scale-float (float -8776373810154238 1.0d0) -219)
- (scale-float (float -8095346564005888 1.0d0) -275))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5398707470368765 1.0d0) -53)
- (scale-float (float -4797461858526456 1.0d0) -107)
- (scale-float (float 6732965623139239 1.0d0) -162)
- (scale-float (float 7749442918798755 1.0d0) -217)
- (scale-float (float -6473382152568832 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5417505387333433 1.0d0) -53)
- (scale-float (float 8398376083975219 1.0d0) -107)
- (scale-float (float 8156124031565761 1.0d0) -165)
- (scale-float (float -7691301946366969 1.0d0) -219)
- (scale-float (float 5984958108270592 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5436338023556927 1.0d0) -53)
- (scale-float (float -4676226270750820 1.0d0) -109)
- (scale-float (float -7332101047345434 1.0d0) -163)
- (scale-float (float 7501454629761823 1.0d0) -219)
- (scale-float (float 5036410457423872 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5455205564192810 1.0d0) -53)
- (scale-float (float -7520232765810273 1.0d0) -107)
- (scale-float (float 5106219158126203 1.0d0) -161)
- (scale-float (float -6069406356390033 1.0d0) -215)
- (scale-float (float -6621799189684224 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5474108195410756 1.0d0) -53)
- (scale-float (float 5963009621159524 1.0d0) -110)
- (scale-float (float 8753520270311418 1.0d0) -168)
- (scale-float (float 8476234578374146 1.0d0) -222)
- (scale-float (float 6616462837940224 1.0d0) -277))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5493046104404481 1.0d0) -53)
- (scale-float (float -7240953236880992 1.0d0) -107)
- (scale-float (float 6687816297030731 1.0d0) -163)
- (scale-float (float 6177251312029357 1.0d0) -219)
- (scale-float (float 5062687302352896 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5512019479399737 1.0d0) -53)
- (scale-float (float -5337476887189881 1.0d0) -107)
- (scale-float (float 8132746143439031 1.0d0) -162)
- (scale-float (float 6203706505607338 1.0d0) -219)
- (scale-float (float 8549331347439616 1.0d0) -275))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5531028509662387 1.0d0) -53)
- (scale-float (float 5006253830174276 1.0d0) -107)
- (scale-float (float -6064611521532516 1.0d0) -163)
- (scale-float (float 5075026078773125 1.0d0) -220)
- (scale-float (float -8088168960098304 1.0d0) -277))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5550073385506547 1.0d0) -53)
- (scale-float (float -7963748165533310 1.0d0) -107)
- (scale-float (float 5408021657844878 1.0d0) -164)
- (scale-float (float -6897421132571305 1.0d0) -218)
- (scale-float (float 5961352389984256 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5569154298302794 1.0d0) -53)
- (scale-float (float 4615503510353601 1.0d0) -107)
- (scale-float (float -7540979643400192 1.0d0) -172)
- (scale-float (float 7836118583884861 1.0d0) -228)
- (scale-float (float -6583101056614400 1.0d0) -282))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5588271440486463 1.0d0) -53)
- (scale-float (float -7308982168651133 1.0d0) -108)
- (scale-float (float 6922685267173202 1.0d0) -162)
- (scale-float (float -7857914317401664 1.0d0) -217)
- (scale-float (float 5791752692269056 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5607425005565998 1.0d0) -53)
- (scale-float (float 7456123125286854 1.0d0) -107)
- (scale-float (float -6354016403351228 1.0d0) -163)
- (scale-float (float -4731131524276583 1.0d0) -221)
- (scale-float (float -8326281708961792 1.0d0) -276))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5626615188131397 1.0d0) -53)
- (scale-float (float -7513025945375216 1.0d0) -109)
- (scale-float (float -6658975433691672 1.0d0) -163)
- (scale-float (float 6802116939384472 1.0d0) -217)
- (scale-float (float -8678364394618880 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5645842183862715 1.0d0) -53)
- (scale-float (float -7743478944270931 1.0d0) -108)
- (scale-float (float -6353264113068006 1.0d0) -166)
- (scale-float (float -8340573167581726 1.0d0) -220)
- (scale-float (float 5344765958422528 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5665106189538657 1.0d0) -53)
- (scale-float (float -5978929548864813 1.0d0) -108)
- (scale-float (float -5463588819488222 1.0d0) -163)
- (scale-float (float 6003114251484877 1.0d0) -218)
- (scale-float (float 7222947287400448 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5684407403045241 1.0d0) -53)
- (scale-float (float -8294272085087370 1.0d0) -107)
- (scale-float (float -8381390268267532 1.0d0) -161)
- (scale-float (float 5416108916544789 1.0d0) -217)
- (scale-float (float 6054767888465920 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5703746023384539 1.0d0) -53)
- (scale-float (float -7456086796685430 1.0d0) -107)
- (scale-float (float 7120442194564315 1.0d0) -163)
- (scale-float (float -8693281305931273 1.0d0) -219)
- (scale-float (float -6974898897551360 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5723122250683500 1.0d0) -53)
- (scale-float (float 5093982224413668 1.0d0) -110)
- (scale-float (float -8917924974158974 1.0d0) -164)
- (scale-float (float -8201133831457905 1.0d0) -218)
- (scale-float (float 4813372552380416 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5742536286202851 1.0d0) -53)
- (scale-float (float 8097550956249641 1.0d0) -109)
- (scale-float (float -6700769854112535 1.0d0) -163)
- (scale-float (float -8486352386985402 1.0d0) -220)
- (scale-float (float -6325315755835392 1.0d0) -275))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5761988332346076 1.0d0) -53)
- (scale-float (float 8070044467396410 1.0d0) -107)
- (scale-float (float 7521571299958967 1.0d0) -162)
- (scale-float (float -7360931258275250 1.0d0) -216)
- (scale-float (float -8041194637131776 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5781478592668482 1.0d0) -53)
- (scale-float (float -6348649609093203 1.0d0) -107)
- (scale-float (float -7865776481343855 1.0d0) -163)
- (scale-float (float -7414322417664008 1.0d0) -217)
- (scale-float (float -7923972996399104 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5801007271886338 1.0d0) -53)
- (scale-float (float 4883452379124426 1.0d0) -109)
- (scale-float (float 5517722868438546 1.0d0) -166)
- (scale-float (float 7452721618571625 1.0d0) -223)
- (scale-float (float -7797708580454400 1.0d0) -277))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5820574575886111 1.0d0) -53)
- (scale-float (float -5544453050321818 1.0d0) -107)
- (scale-float (float -6019990252576236 1.0d0) -161)
- (scale-float (float -5241780552283328 1.0d0) -215)
- (scale-float (float -4599632823230464 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5840180711733770 1.0d0) -53)
- (scale-float (float 5617607438242589 1.0d0) -112)
- (scale-float (float 6400824792886757 1.0d0) -166)
- (scale-float (float -6353522462595121 1.0d0) -221)
- (scale-float (float 6875531474632704 1.0d0) -276))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5859825887684189 1.0d0) -53)
- (scale-float (float -6902423295780859 1.0d0) -108)
- (scale-float (float 8888330413005266 1.0d0) -162)
- (scale-float (float 7535209701492570 1.0d0) -216)
- (scale-float (float -8860849506877440 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5879510313190625 1.0d0) -53)
- (scale-float (float -6814694338286297 1.0d0) -108)
- (scale-float (float -8801549044228897 1.0d0) -162)
- (scale-float (float 4999351469611069 1.0d0) -216)
- (scale-float (float 8673660416131072 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5899234198914290 1.0d0) -53)
- (scale-float (float 6283006921937045 1.0d0) -109)
- (scale-float (float 6200229083739520 1.0d0) -164)
- (scale-float (float 4977927589994460 1.0d0) -218)
- (scale-float (float -7605320988360704 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5918997756734008 1.0d0) -53)
- (scale-float (float 6988684443349567 1.0d0) -108)
- (scale-float (float -6152520313082565 1.0d0) -162)
- (scale-float (float -7782308246609974 1.0d0) -219)
- (scale-float (float 8754796978765824 1.0d0) -275))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5938801199755960 1.0d0) -53)
- (scale-float (float -5926394093514177 1.0d0) -115)
- (scale-float (float 7620890547647189 1.0d0) -169)
- (scale-float (float 8680018638312400 1.0d0) -223)
- (scale-float (float -4624686801485824 1.0d0) -278))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5958644742323519 1.0d0) -53)
- (scale-float (float 5837499729476640 1.0d0) -108)
- (scale-float (float 5805594171748389 1.0d0) -169)
- (scale-float (float 6841182626183782 1.0d0) -224)
- (scale-float (float 5399122601312256 1.0d0) -278))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5978528600027178 1.0d0) -53)
- (scale-float (float 4703174464159792 1.0d0) -107)
- (scale-float (float -5390198599519672 1.0d0) -162)
- (scale-float (float -6489710829442164 1.0d0) -221)
- (scale-float (float -4908450896150528 1.0d0) -275))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5998452989714567 1.0d0) -53)
- (scale-float (float -8096041220161000 1.0d0) -107)
- (scale-float (float -7835598253830714 1.0d0) -161)
- (scale-float (float -7012132770705025 1.0d0) -216)
- (scale-float (float -7817595773452288 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6018418129500560 1.0d0) -53)
- (scale-float (float 6659489087534709 1.0d0) -107)
- (scale-float (float 8345502268995181 1.0d0) -162)
- (scale-float (float -8150710203863600 1.0d0) -218)
- (scale-float (float 7666645967306752 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6038424238777487 1.0d0) -53)
- (scale-float (float 7781913615198190 1.0d0) -108)
- (scale-float (float 7611681214395614 1.0d0) -162)
- (scale-float (float 7024337346699218 1.0d0) -217)
- (scale-float (float -7959062663266304 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6058471538225425 1.0d0) -53)
- (scale-float (float -8636030985155905 1.0d0) -107)
- (scale-float (float 6386033233360409 1.0d0) -161)
- (scale-float (float -8264358932081060 1.0d0) -216)
- (scale-float (float -8851278994014208 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6078560249822594 1.0d0) -53)
- (scale-float (float 6154024088984338 1.0d0) -108)
- (scale-float (float 5145445860402320 1.0d0) -162)
- (scale-float (float 6519894297640498 1.0d0) -218)
- (scale-float (float 7430925104119808 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6098690596855854 1.0d0) -53)
- (scale-float (float -5742416278425873 1.0d0) -108)
- (scale-float (float -8701688771941415 1.0d0) -163)
- (scale-float (float 6856703381738876 1.0d0) -218)
- (scale-float (float 8330054362464256 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6118862803931286 1.0d0) -53)
- (scale-float (float 7287168916884525 1.0d0) -108)
- (scale-float (float 6700569177866219 1.0d0) -162)
- (scale-float (float -7056829416081209 1.0d0) -217)
- (scale-float (float 7133017988202496 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6139077096984887 1.0d0) -53)
- (scale-float (float 7601354138854478 1.0d0) -109)
- (scale-float (float 7827836787722962 1.0d0) -163)
- (scale-float (float -8707805869477676 1.0d0) -217)
- (scale-float (float -7011207342981120 1.0d0) -277))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6159333703293354 1.0d0) -53)
- (scale-float (float -6300013242813811 1.0d0) -108)
- (scale-float (float -7055273727637067 1.0d0) -163)
- (scale-float (float 6354926587916120 1.0d0) -218)
- (scale-float (float 7172218111066112 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6179632851484974 1.0d0) -53)
- (scale-float (float 8851058764858042 1.0d0) -107)
- (scale-float (float -5393991416546434 1.0d0) -161)
- (scale-float (float -7087928934921133 1.0d0) -218)
- (scale-float (float -7137013930983424 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6199974771550620 1.0d0) -53)
- (scale-float (float -6095652345689366 1.0d0) -108)
- (scale-float (float 7608163058261834 1.0d0) -164)
- (scale-float (float 7860502758117739 1.0d0) -220)
- (scale-float (float -8199903066980352 1.0d0) -277))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6220359694854838 1.0d0) -53)
- (scale-float (float 6523866044383337 1.0d0) -107)
- (scale-float (float -6173852507803036 1.0d0) -164)
- (scale-float (float 7082191144354423 1.0d0) -218)
- (scale-float (float 6277452351078400 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6240787854147056 1.0d0) -53)
- (scale-float (float 7281230495326443 1.0d0) -108)
- (scale-float (float 4638527086501368 1.0d0) -162)
- (scale-float (float -8570506498232121 1.0d0) -216)
- (scale-float (float -6718319458402304 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6261259483572883 1.0d0) -53)
- (scale-float (float -6213603737296974 1.0d0) -107)
- (scale-float (float 8828115745955665 1.0d0) -163)
- (scale-float (float -5444066038342533 1.0d0) -221)
- (scale-float (float -6460963274883072 1.0d0) -275))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6281774818685523 1.0d0) -53)
- (scale-float (float -8190142974415872 1.0d0) -108)
- (scale-float (float 8922183346235503 1.0d0) -163)
- (scale-float (float 7614728183057357 1.0d0) -219)
- (scale-float (float -7801636618895360 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6302334096457298 1.0d0) -53)
- (scale-float (float 6139409532121475 1.0d0) -109)
- (scale-float (float -8459381361295595 1.0d0) -163)
- (scale-float (float 4819516272065152 1.0d0) -218)
- (scale-float (float -6501872342401024 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6322937555291277 1.0d0) -53)
- (scale-float (float -4996575910228414 1.0d0) -107)
- (scale-float (float -8723418418458635 1.0d0) -165)
- (scale-float (float -8209894426869078 1.0d0) -220)
- (scale-float (float -5793670850150400 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6343585435033014 1.0d0) -53)
- (scale-float (float 5692979910274044 1.0d0) -108)
- (scale-float (float 5238809827312188 1.0d0) -164)
- (scale-float (float 7473693542399043 1.0d0) -218)
- (scale-float (float 8524454948110336 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6364277976982406 1.0d0) -53)
- (scale-float (float -6416140146841029 1.0d0) -108)
- (scale-float (float 6012843359468366 1.0d0) -162)
- (scale-float (float 5190870914433327 1.0d0) -216)
- (scale-float (float -6720177234771968 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6385015423905653 1.0d0) -53)
- (scale-float (float -5299888057943309 1.0d0) -108)
- (scale-float (float 7218658897639641 1.0d0) -163)
- (scale-float (float -7564399872162399 1.0d0) -218)
- (scale-float (float -6012036790878208 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6405798020047342 1.0d0) -53)
- (scale-float (float 4771437957468797 1.0d0) -107)
- (scale-float (float 7922057994526591 1.0d0) -164)
- (scale-float (float 6305434990390014 1.0d0) -221)
- (scale-float (float -5603070020943872 1.0d0) -275))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6426626011142643 1.0d0) -53)
- (scale-float (float -6161275590724442 1.0d0) -108)
- (scale-float (float 7252093914251728 1.0d0) -165)
- (scale-float (float 5781418451220263 1.0d0) -220)
- (scale-float (float -5961254394920960 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6447499644429618 1.0d0) -53)
- (scale-float (float -4504718518993321 1.0d0) -111)
- (scale-float (float -8429352747261720 1.0d0) -165)
- (scale-float (float 5543335249515187 1.0d0) -220)
- (scale-float (float 8089805902577664 1.0d0) -277))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6468419168661657 1.0d0) -53)
- (scale-float (float 7838903660495786 1.0d0) -109)
- (scale-float (float -5571298332786114 1.0d0) -163)
- (scale-float (float -6383341328115460 1.0d0) -217)
- (scale-float (float -6749775945596928 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6489384834120026 1.0d0) -53)
- (scale-float (float 8970208082772124 1.0d0) -107)
- (scale-float (float -7422249931715393 1.0d0) -161)
- (scale-float (float -5719080457162672 1.0d0) -215)
- (scale-float (float 8945949534576640 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6510396892626541 1.0d0) -53)
- (scale-float (float 7552727392259982 1.0d0) -107)
- (scale-float (float -6859084330124199 1.0d0) -161)
- (scale-float (float 8323952238069947 1.0d0) -215)
- (scale-float (float -5007933334437888 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6531455597556361 1.0d0) -53)
- (scale-float (float -6776786845362370 1.0d0) -107)
- (scale-float (float 5537658314917462 1.0d0) -161)
- (scale-float (float 6558024436949175 1.0d0) -215)
- (scale-float (float -7010751320473600 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6552561203850905 1.0d0) -53)
- (scale-float (float -5075608684518640 1.0d0) -107)
- (scale-float (float 6077079132341169 1.0d0) -161)
- (scale-float (float -6051523991378174 1.0d0) -218)
- (scale-float (float 6256815439020032 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6573713968030900 1.0d0) -53)
- (scale-float (float -6610258687383610 1.0d0) -108)
- (scale-float (float -5026765429437363 1.0d0) -165)
- (scale-float (float 4817855703864593 1.0d0) -221)
- (scale-float (float -5767616137789440 1.0d0) -275))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6594914148209548 1.0d0) -53)
- (scale-float (float -6479939408032255 1.0d0) -109)
- (scale-float (float 8747802440996474 1.0d0) -163)
- (scale-float (float -8305150090361413 1.0d0) -218)
- (scale-float (float -8449931072503808 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6616162004105825 1.0d0) -53)
- (scale-float (float 7449763630728054 1.0d0) -107)
- (scale-float (float 6861855559321431 1.0d0) -162)
- (scale-float (float 5079944506709764 1.0d0) -216)
- (scale-float (float -4923941043568640 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6637457797057911 1.0d0) -53)
- (scale-float (float 6533869147616686 1.0d0) -107)
- (scale-float (float -7774676911384651 1.0d0) -162)
- (scale-float (float 6559091031019990 1.0d0) -231)
- (scale-float (float -5937883017904128 1.0d0) -285))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6658801790036747 1.0d0) -53)
- (scale-float (float -8645917834399834 1.0d0) -108)
- (scale-float (float -6459175220449992 1.0d0) -164)
- (scale-float (float 5425107217767832 1.0d0) -218)
- (scale-float (float 5490230981033984 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6680194247659727 1.0d0) -53)
- (scale-float (float -7502326705482134 1.0d0) -107)
- (scale-float (float 5122373436187108 1.0d0) -162)
- (scale-float (float 4659855717958087 1.0d0) -216)
- (scale-float (float -6282496273154048 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6701635436204526 1.0d0) -53)
- (scale-float (float -6792633099855874 1.0d0) -113)
- (scale-float (float -6718785746107185 1.0d0) -168)
- (scale-float (float -8090407294887994 1.0d0) -225)
- (scale-float (float 6302818184986624 1.0d0) -280))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6723125623623062 1.0d0) -53)
- (scale-float (float 5348210264711913 1.0d0) -107)
- (scale-float (float 4565069343244453 1.0d0) -162)
- (scale-float (float -7777670701490282 1.0d0) -216)
- (scale-float (float 8128569594937344 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6744665079555594 1.0d0) -53)
- (scale-float (float 8390468820650359 1.0d0) -108)
- (scale-float (float -7523599844690822 1.0d0) -162)
- (scale-float (float -8138474779450287 1.0d0) -217)
- (scale-float (float 7537177927876608 1.0d0) -276))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6766254075344960 1.0d0) -53)
- (scale-float (float 7124161662288890 1.0d0) -108)
- (scale-float (float -5315676331877133 1.0d0) -162)
- (scale-float (float 4586058689724245 1.0d0) -216)
- (scale-float (float 6389392412737536 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6787892884050957 1.0d0) -53)
- (scale-float (float 6589788053269867 1.0d0) -113)
- (scale-float (float 8191606233670341 1.0d0) -167)
- (scale-float (float -6831189017752290 1.0d0) -223)
- (scale-float (float 6177450232905728 1.0d0) -278))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6809581780464861 1.0d0) -53)
- (scale-float (float -5815316960378802 1.0d0) -108)
- (scale-float (float -4802061841594552 1.0d0) -163)
- (scale-float (float 6961324585030021 1.0d0) -217)
- (scale-float (float 8617582846738432 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6831321041124092 1.0d0) -53)
- (scale-float (float 5868374287455696 1.0d0) -110)
- (scale-float (float -8513605422168076 1.0d0) -164)
- (scale-float (float 8336743130121122 1.0d0) -219)
- (scale-float (float 5844242957991936 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6853110944327025 1.0d0) -53)
- (scale-float (float 7995813491300551 1.0d0) -107)
- (scale-float (float 5669745357521053 1.0d0) -162)
- (scale-float (float -5983191241064722 1.0d0) -216)
- (scale-float (float -7244438658875392 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6874951770147948 1.0d0) -53)
- (scale-float (float -5211889442734905 1.0d0) -109)
- (scale-float (float -7994391083689276 1.0d0) -163)
- (scale-float (float 5294798515156797 1.0d0) -221)
- (scale-float (float -5041489973346304 1.0d0) -276))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6896843800452165 1.0d0) -53)
- (scale-float (float -7972678450271797 1.0d0) -110)
- (scale-float (float -8343345213530639 1.0d0) -164)
- (scale-float (float 8514274148005680 1.0d0) -223)
- (scale-float (float -5308832372752384 1.0d0) -277))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6918787318911258 1.0d0) -53)
- (scale-float (float -8592506738174507 1.0d0) -108)
- (scale-float (float 5852661501860042 1.0d0) -162)
- (scale-float (float 4857986091060286 1.0d0) -216)
- (scale-float (float 5239371004280832 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6940782611018493 1.0d0) -53)
- (scale-float (float 6912589129476135 1.0d0) -108)
- (scale-float (float 6744530868863774 1.0d0) -163)
- (scale-float (float -4989319458478924 1.0d0) -219)
- (scale-float (float 6940701453320192 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6962829964104388 1.0d0) -53)
- (scale-float (float -6838882142879123 1.0d0) -107)
- (scale-float (float 8833998898921057 1.0d0) -161)
- (scale-float (float 8054222522316531 1.0d0) -216)
- (scale-float (float -4519279887253504 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6984929667352427 1.0d0) -53)
- (scale-float (float 5071590174998387 1.0d0) -108)
- (scale-float (float -7947223231970943 1.0d0) -165)
- (scale-float (float -6151955209191225 1.0d0) -221)
- (scale-float (float -7526765473824768 1.0d0) -275))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7007082011814946 1.0d0) -53)
- (scale-float (float -6189386596240567 1.0d0) -107)
- (scale-float (float -6199821917316083 1.0d0) -161)
- (scale-float (float 7404596430114969 1.0d0) -215)
- (scale-float (float -8302313716678656 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7029287290429163 1.0d0) -53)
- (scale-float (float -6627817883510584 1.0d0) -108)
- (scale-float (float 8857892683323228 1.0d0) -163)
- (scale-float (float 8693268109448113 1.0d0) -218)
- (scale-float (float 4689364096122880 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7051545798033384 1.0d0) -53)
- (scale-float (float -5711999757009983 1.0d0) -107)
- (scale-float (float -5825962407702506 1.0d0) -162)
- (scale-float (float -6196166392955384 1.0d0) -216)
- (scale-float (float 8664340208123904 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7073857831383362 1.0d0) -53)
- (scale-float (float 8881086912650455 1.0d0) -110)
- (scale-float (float 8835372864906445 1.0d0) -164)
- (scale-float (float 4562394845940881 1.0d0) -222)
- (scale-float (float 5715850790174720 1.0d0) -276))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7096223689168829 1.0d0) -53)
- (scale-float (float 7786181296922526 1.0d0) -107)
- (scale-float (float 7593542376663890 1.0d0) -163)
- (scale-float (float -6824515861621019 1.0d0) -218)
- (scale-float (float -8097078091055104 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7118643672030191 1.0d0) -53)
- (scale-float (float 8441419455363968 1.0d0) -107)
- (scale-float (float 8816723865288410 1.0d0) -161)
- (scale-float (float 7080773938790631 1.0d0) -220)
- (scale-float (float 6527379443810304 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7141118082575394 1.0d0) -53)
- (scale-float (float 5201259377433963 1.0d0) -108)
- (scale-float (float 8502483145406469 1.0d0) -163)
- (scale-float (float -7797854467647834 1.0d0) -221)
- (scale-float (float 8393617992318976 1.0d0) -275))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7163647225396961 1.0d0) -53)
- (scale-float (float 8235912743688556 1.0d0) -107)
- (scale-float (float -7957914224696733 1.0d0) -161)
- (scale-float (float 8092188431032028 1.0d0) -217)
- (scale-float (float -5763890071207936 1.0d0) -275))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7186231407089207 1.0d0) -53)
- (scale-float (float -6125628591049317 1.0d0) -108)
- (scale-float (float 6463709282529567 1.0d0) -163)
- (scale-float (float -7089380904209025 1.0d0) -219)
- (scale-float (float 6480532824391680 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7208870936265620 1.0d0) -53)
- (scale-float (float 4969155040377850 1.0d0) -107)
- (scale-float (float -5478158021003299 1.0d0) -162)
- (scale-float (float 5009767247068612 1.0d0) -216)
- (scale-float (float 4631444762656768 1.0d0) -276))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7231566123576433 1.0d0) -53)
- (scale-float (float 7961163014055434 1.0d0) -107)
- (scale-float (float -4995638983741310 1.0d0) -161)
- (scale-float (float 5008798611336229 1.0d0) -216)
- (scale-float (float -6391980102516736 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7254317281726365 1.0d0) -53)
- (scale-float (float -5823663294586708 1.0d0) -107)
- (scale-float (float 5458711312191116 1.0d0) -163)
- (scale-float (float 7373648181985147 1.0d0) -219)
- (scale-float (float 4579959604641792 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7277124725492546 1.0d0) -53)
- (scale-float (float 5305137385450636 1.0d0) -107)
- (scale-float (float 7924942194421221 1.0d0) -161)
- (scale-float (float -7950148257115253 1.0d0) -215)
- (scale-float (float -6052484860723200 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7299988771742636 1.0d0) -53)
- (scale-float (float 8680125840686565 1.0d0) -108)
- (scale-float (float 7429093071873346 1.0d0) -164)
- (scale-float (float -5599801530175494 1.0d0) -219)
- (scale-float (float 5535685011832832 1.0d0) -275))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7322909739453116 1.0d0) -53)
- (scale-float (float 7097062106770298 1.0d0) -107)
- (scale-float (float -5349092443827285 1.0d0) -162)
- (scale-float (float -5099742010785249 1.0d0) -216)
- (scale-float (float 8817229833256960 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7345887949727780 1.0d0) -53)
- (scale-float (float -8457027092863592 1.0d0) -108)
- (scale-float (float -6913069935946125 1.0d0) -162)
- (scale-float (float -8426555266695745 1.0d0) -216)
- (scale-float (float -5208210342281216 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7368923725816409 1.0d0) -53)
- (scale-float (float -7308765651908383 1.0d0) -109)
- (scale-float (float 6336995842098196 1.0d0) -164)
- (scale-float (float 5029974525320782 1.0d0) -220)
- (scale-float (float -4826452771995648 1.0d0) -277))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7392017393133648 1.0d0) -53)
- (scale-float (float -7438986702722814 1.0d0) -108)
- (scale-float (float 6096655805351087 1.0d0) -162)
- (scale-float (float 8498067619242502 1.0d0) -217)
- (scale-float (float -6177366889168896 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7415169279278070 1.0d0) -53)
- (scale-float (float -5120641521992079 1.0d0) -107)
- (scale-float (float -6173743406581481 1.0d0) -163)
- (scale-float (float -6186085494466364 1.0d0) -218)
- (scale-float (float -6687969806778368 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7438379714051443 1.0d0) -53)
- (scale-float (float 5163882227945242 1.0d0) -107)
- (scale-float (float -7134474603423716 1.0d0) -161)
- (scale-float (float 8099527437853578 1.0d0) -215)
- (scale-float (float -8737594719870976 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7461649029478199 1.0d0) -53)
- (scale-float (float 5047985052177667 1.0d0) -107)
- (scale-float (float 5661761690518348 1.0d0) -162)
- (scale-float (float 6314662186913944 1.0d0) -216)
- (scale-float (float -8476179641925632 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7484977559825101 1.0d0) -53)
- (scale-float (float -7429904801612951 1.0d0) -107)
- (scale-float (float 7507318260125625 1.0d0) -162)
- (scale-float (float -6428450809666175 1.0d0) -219)
- (scale-float (float -7626245206441984 1.0d0) -278))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7508365641621118 1.0d0) -53)
- (scale-float (float -5593749010769806 1.0d0) -108)
- (scale-float (float 5636164097347867 1.0d0) -162)
- (scale-float (float 6999663356388954 1.0d0) -216)
- (scale-float (float 5357161379004416 1.0d0) -276))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7531813613677513 1.0d0) -53)
- (scale-float (float 4581063167772971 1.0d0) -107)
- (scale-float (float 7353040010455473 1.0d0) -161)
- (scale-float (float -8985035177341617 1.0d0) -217)
- (scale-float (float -9005891600416768 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7555321817108135 1.0d0) -53)
- (scale-float (float 5991978685937365 1.0d0) -108)
- (scale-float (float 7515701065304341 1.0d0) -165)
- (scale-float (float -7848040318995656 1.0d0) -221)
- (scale-float (float -7387075273293824 1.0d0) -275))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7578890595349926 1.0d0) -53)
- (scale-float (float 6111058056718947 1.0d0) -111)
- (scale-float (float -7625238287344318 1.0d0) -171)
- (scale-float (float -5322126950690926 1.0d0) -227)
- (scale-float (float -7997044689993728 1.0d0) -284))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7602520294183646 1.0d0) -53)
- (scale-float (float 5278126483421458 1.0d0) -107)
- (scale-float (float -8809723265824375 1.0d0) -162)
- (scale-float (float 5266825943354873 1.0d0) -216)
- (scale-float (float 7680279964270592 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7626211261754817 1.0d0) -53)
- (scale-float (float 7856880994289273 1.0d0) -109)
- (scale-float (float 5073518343103663 1.0d0) -163)
- (scale-float (float 7320880980552741 1.0d0) -218)
- (scale-float (float 6164601738625024 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7649963848594884 1.0d0) -53)
- (scale-float (float 4685784402871430 1.0d0) -107)
- (scale-float (float 7577836369986652 1.0d0) -163)
- (scale-float (float -4980090075722126 1.0d0) -220)
- (scale-float (float -8789059230498816 1.0d0) -275))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7673778407642606 1.0d0) -53)
- (scale-float (float 6364884756656920 1.0d0) -107)
- (scale-float (float 6153979703457739 1.0d0) -162)
- (scale-float (float -6224103722924539 1.0d0) -216)
- (scale-float (float 7295477818654720 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7697655294265670 1.0d0) -53)
- (scale-float (float -7267862823064778 1.0d0) -109)
- (scale-float (float -7737903927999409 1.0d0) -164)
- (scale-float (float -4944665808781718 1.0d0) -220)
- (scale-float (float -6573422581121024 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7721594866282534 1.0d0) -53)
- (scale-float (float 5903557453565999 1.0d0) -108)
- (scale-float (float -6416831380576808 1.0d0) -162)
- (scale-float (float 8806572503583245 1.0d0) -217)
- (scale-float (float 7765577412116480 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7745597483984509 1.0d0) -53)
- (scale-float (float -6144509063709385 1.0d0) -107)
- (scale-float (float 5185255202111359 1.0d0) -161)
- (scale-float (float -7402097004959452 1.0d0) -215)
- (scale-float (float 5213973706899456 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7769663510158066 1.0d0) -53)
- (scale-float (float 6470069052594091 1.0d0) -108)
- (scale-float (float -4837094629917467 1.0d0) -162)
- (scale-float (float 5023985097428639 1.0d0) -218)
- (scale-float (float 7660496705683456 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7793793310107394 1.0d0) -53)
- (scale-float (float 6255438774607890 1.0d0) -107)
- (scale-float (float 4890020526794485 1.0d0) -162)
- (scale-float (float -7178979415977333 1.0d0) -217)
- (scale-float (float -6774932051886080 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7817987251677189 1.0d0) -53)
- (scale-float (float -6274412550417931 1.0d0) -107)
- (scale-float (float -5213877654328768 1.0d0) -165)
- (scale-float (float 7623710121795882 1.0d0) -219)
- (scale-float (float -7668292987650048 1.0d0) -276))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7842245705275690 1.0d0) -53)
- (scale-float (float 4755439535197461 1.0d0) -110)
- (scale-float (float -6491338259032560 1.0d0) -169)
- (scale-float (float -6027186414927101 1.0d0) -226)
- (scale-float (float 7531889095081984 1.0d0) -281))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7866569043897970 1.0d0) -53)
- (scale-float (float 6203235208083930 1.0d0) -109)
- (scale-float (float 7465551591673784 1.0d0) -164)
- (scale-float (float 8166262348485213 1.0d0) -219)
- (scale-float (float -6023336035352576 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7890957643149467 1.0d0) -53)
- (scale-float (float 4565316914673408 1.0d0) -111)
- (scale-float (float -5073270382141029 1.0d0) -169)
- (scale-float (float 7284895438284374 1.0d0) -223)
- (scale-float (float -6470251101290496 1.0d0) -277))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7915411881269776 1.0d0) -53)
- (scale-float (float -8732455080878904 1.0d0) -107)
- (scale-float (float -8972624560631460 1.0d0) -161)
- (scale-float (float -5802770418051256 1.0d0) -215)
- (scale-float (float -5894612583809024 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7939932139156694 1.0d0) -53)
- (scale-float (float -7728774586478161 1.0d0) -108)
- (scale-float (float -5122395498390164 1.0d0) -162)
- (scale-float (float 8034467693630628 1.0d0) -216)
- (scale-float (float -6127267246014464 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7964518800390531 1.0d0) -53)
- (scale-float (float -5333950519206214 1.0d0) -110)
- (scale-float (float -6855336031570640 1.0d0) -166)
- (scale-float (float -8103642639632277 1.0d0) -221)
- (scale-float (float 8817951445614592 1.0d0) -276))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7989172251258678 1.0d0) -53)
- (scale-float (float 4799035515117038 1.0d0) -107)
- (scale-float (float -7075338048210246 1.0d0) -161)
- (scale-float (float -8586719858203288 1.0d0) -217)
- (scale-float (float 5551191926112256 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8013892880780447 1.0d0) -53)
- (scale-float (float 8070209461981732 1.0d0) -108)
- (scale-float (float 5383960032839146 1.0d0) -163)
- (scale-float (float -5391502856833359 1.0d0) -217)
- (scale-float (float 4611789961494528 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8038681080732178 1.0d0) -53)
- (scale-float (float 7052322924254692 1.0d0) -107)
- (scale-float (float 4662847422718372 1.0d0) -162)
- (scale-float (float 7185286506518269 1.0d0) -216)
- (scale-float (float 5622161755602944 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8063537245672624 1.0d0) -53)
- (scale-float (float 5672318795950278 1.0d0) -111)
- (scale-float (float -5116080609750552 1.0d0) -166)
- (scale-float (float -7609717448867233 1.0d0) -222)
- (scale-float (float 4692897535361024 1.0d0) -276))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8088461772968608 1.0d0) -53)
- (scale-float (float 6561047830650932 1.0d0) -108)
- (scale-float (float -7907785504659630 1.0d0) -162)
- (scale-float (float -8942948971153189 1.0d0) -217)
- (scale-float (float -7559890343952384 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8113455062820968 1.0d0) -53)
- (scale-float (float -5472615846331824 1.0d0) -109)
- (scale-float (float 5977609223732986 1.0d0) -164)
- (scale-float (float 7115509566652408 1.0d0) -218)
- (scale-float (float -5387108883628032 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8138517518290779 1.0d0) -53)
- (scale-float (float 6752214430572379 1.0d0) -110)
- (scale-float (float 7813943309258673 1.0d0) -164)
- (scale-float (float -7531807323370307 1.0d0) -218)
- (scale-float (float -8077148627795968 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8163649545325870 1.0d0) -53)
- (scale-float (float 6998037274955710 1.0d0) -108)
- (scale-float (float 7871939694839604 1.0d0) -162)
- (scale-float (float 6893324305915105 1.0d0) -219)
- (scale-float (float -6666193181081600 1.0d0) -276))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8188851552787629 1.0d0) -53)
- (scale-float (float -5530151176954949 1.0d0) -110)
- (scale-float (float 6991091742977840 1.0d0) -164)
- (scale-float (float 8482591613484455 1.0d0) -218)
- (scale-float (float -7039437530988544 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8214123952478104 1.0d0) -53)
- (scale-float (float -7054334098865418 1.0d0) -108)
- (scale-float (float -8877605983907212 1.0d0) -163)
- (scale-float (float 5682356343726468 1.0d0) -218)
- (scale-float (float -8826109976117248 1.0d0) -276))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8239467159167406 1.0d0) -53)
- (scale-float (float -7651898140888595 1.0d0) -107)
- (scale-float (float 8648965404520721 1.0d0) -161)
- (scale-float (float 7028850772873957 1.0d0) -215)
- (scale-float (float 5534674606866432 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8264881590621413 1.0d0) -53)
- (scale-float (float -7510438895388554 1.0d0) -107)
- (scale-float (float -5500854175455348 1.0d0) -161)
- (scale-float (float 7176439462285651 1.0d0) -218)
- (scale-float (float 7752654741241856 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8290367667629783 1.0d0) -53)
- (scale-float (float 8133138596186356 1.0d0) -109)
- (scale-float (float -7591268029116145 1.0d0) -163)
- (scale-float (float -5898979962753431 1.0d0) -217)
- (scale-float (float -6625987420028928 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8315925814034279 1.0d0) -53)
- (scale-float (float 7519360826045658 1.0d0) -107)
- (scale-float (float -4861813932032458 1.0d0) -163)
- (scale-float (float -6822801646816934 1.0d0) -219)
- (scale-float (float 6483083152850944 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8341556456757407 1.0d0) -53)
- (scale-float (float 8713258068062022 1.0d0) -108)
- (scale-float (float -8794846795103942 1.0d0) -164)
- (scale-float (float 4763933906617127 1.0d0) -218)
- (scale-float (float -8448473406504960 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8367260025831375 1.0d0) -53)
- (scale-float (float 7832510640147127 1.0d0) -113)
- (scale-float (float -4585451134943656 1.0d0) -168)
- (scale-float (float 6860564854731439 1.0d0) -222)
- (scale-float (float 4739820444188672 1.0d0) -277))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8393036954427377 1.0d0) -53)
- (scale-float (float -5882849124950196 1.0d0) -108)
- (scale-float (float -7796383713284814 1.0d0) -163)
- (scale-float (float 7952873874854669 1.0d0) -217)
- (scale-float (float -6056073206824960 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8418887678885204 1.0d0) -53)
- (scale-float (float -5715673222913417 1.0d0) -107)
- (scale-float (float -5122652624101890 1.0d0) -161)
- (scale-float (float -7070365230023692 1.0d0) -216)
- (scale-float (float 7389122488401920 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8444812638743187 1.0d0) -53)
- (scale-float (float -5300223451013964 1.0d0) -108)
- (scale-float (float -7110683026382794 1.0d0) -162)
- (scale-float (float -7744943696350442 1.0d0) -216)
- (scale-float (float 6310419953451008 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8470812276768478 1.0d0) -53)
- (scale-float (float 5910789752266694 1.0d0) -107)
- (scale-float (float -4540777544879638 1.0d0) -161)
- (scale-float (float 6851088171542932 1.0d0) -215)
- (scale-float (float -7617921543036928 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8496887038987672 1.0d0) -53)
- (scale-float (float 5531872111144993 1.0d0) -107)
- (scale-float (float -7962212397842975 1.0d0) -162)
- (scale-float (float -5860583371644180 1.0d0) -216)
- (scale-float (float 7866919184433152 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8523037374717772 1.0d0) -53)
- (scale-float (float 8853251511678952 1.0d0) -107)
- (scale-float (float 7259767988058284 1.0d0) -162)
- (scale-float (float 8389230841988564 1.0d0) -217)
- (scale-float (float -8575876819451904 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8549263736597510 1.0d0) -53)
- (scale-float (float -5579620565343165 1.0d0) -107)
- (scale-float (float -5587574106166803 1.0d0) -161)
- (scale-float (float -8188753341291124 1.0d0) -215)
- (scale-float (float 7942509615710208 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8575566580619014 1.0d0) -53)
- (scale-float (float 7060972329967819 1.0d0) -107)
- (scale-float (float -6794461814768363 1.0d0) -161)
- (scale-float (float 5860283490685656 1.0d0) -220)
- (scale-float (float -5535999337693184 1.0d0) -278))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8601946366159849 1.0d0) -53)
- (scale-float (float 6643600354864787 1.0d0) -111)
- (scale-float (float -6774328151098143 1.0d0) -165)
- (scale-float (float 6238045156276258 1.0d0) -220)
- (scale-float (float 7385437152739328 1.0d0) -281))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8628403556015405 1.0d0) -53)
- (scale-float (float -5689830371797970 1.0d0) -107)
- (scale-float (float 8456917422509878 1.0d0) -161)
- (scale-float (float 6498397382453532 1.0d0) -216)
- (scale-float (float -7683261920575488 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8654938616431667 1.0d0) -53)
- (scale-float (float 8182047312445503 1.0d0) -108)
- (scale-float (float -6662523829600515 1.0d0) -162)
- (scale-float (float 5290567255884442 1.0d0) -217)
- (scale-float (float -6464888284348416 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8681552017138358 1.0d0) -53)
- (scale-float (float -7006822305559368 1.0d0) -107)
- (scale-float (float 7451129425931068 1.0d0) -161)
- (scale-float (float -7173167161450929 1.0d0) -215)
- (scale-float (float -5536285008453632 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8708244231382452 1.0d0) -53)
- (scale-float (float -8087631037263965 1.0d0) -107)
- (scale-float (float -8185307178763586 1.0d0) -161)
- (scale-float (float -6511095932131732 1.0d0) -215)
- (scale-float (float 8343018883710976 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8735015735962084 1.0d0) -53)
- (scale-float (float -8117625885586849 1.0d0) -107)
- (scale-float (float 7067185933598292 1.0d0) -161)
- (scale-float (float -5928047136609223 1.0d0) -217)
- (scale-float (float -4613124548198400 1.0d0) -279))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8761867011260840 1.0d0) -53)
- (scale-float (float 8610737154062316 1.0d0) -107)
- (scale-float (float 5316487286030695 1.0d0) -161)
- (scale-float (float 8025315088065011 1.0d0) -216)
- (scale-float (float -8789522686148608 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8788798541282450 1.0d0) -53)
- (scale-float (float -5767028858726936 1.0d0) -110)
- (scale-float (float 5809369621052884 1.0d0) -167)
- (scale-float (float 7326787612774527 1.0d0) -221)
- (scale-float (float -6442635476598784 1.0d0) -279))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8815810813685869 1.0d0) -53)
- (scale-float (float -8724536074899524 1.0d0) -109)
- (scale-float (float 5172102500931788 1.0d0) -166)
- (scale-float (float -8595123929132079 1.0d0) -220)
- (scale-float (float -4972293416550400 1.0d0) -276))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8842904319820777 1.0d0) -53)
- (scale-float (float 7692158636243959 1.0d0) -107)
- (scale-float (float -6981365851709947 1.0d0) -161)
- (scale-float (float 5606403711887330 1.0d0) -216)
- (scale-float (float 7207011875684352 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8870079554763484 1.0d0) -53)
- (scale-float (float 6730270946682744 1.0d0) -108)
- (scale-float (float -6566124735755288 1.0d0) -163)
- (scale-float (float 4704554665939634 1.0d0) -217)
- (scale-float (float 5990258066063360 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8897337017353248 1.0d0) -53)
- (scale-float (float -6246556062351795 1.0d0) -108)
- (scale-float (float 7682958297604200 1.0d0) -163)
- (scale-float (float -6314968768802122 1.0d0) -217)
- (scale-float (float -6603959870652416 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8924677210229021 1.0d0) -53)
- (scale-float (float 5469297920188961 1.0d0) -109)
- (scale-float (float -8593195763191850 1.0d0) -163)
- (scale-float (float -7114494562938148 1.0d0) -217)
- (scale-float (float 8594557003857920 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8952100639866623 1.0d0) -53)
- (scale-float (float -4764119273928549 1.0d0) -107)
- (scale-float (float -4842944010947886 1.0d0) -161)
- (scale-float (float 6684392706093202 1.0d0) -215)
- (scale-float (float 5193091026345984 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8979607816616344 1.0d0) -53)
- (scale-float (float -7789931843743237 1.0d0) -107)
- (scale-float (float -8124365004371129 1.0d0) -164)
- (scale-float (float 8996080488067980 1.0d0) -218)
- (scale-float (float 6558996243415040 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4503599627370496 1.0d0) -52)
- (scale-float (float -4503599627370496 1.0d0) -308) (scale-float (float 0 1.0d0) 0)
- (scale-float (float 0 1.0d0) 0) (scale-float (float 0 1.0d0) 0))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4517437736227193 1.0d0) -52)
- (scale-float (float -5847015961790376 1.0d0) -107)
- (scale-float (float -4716335209519244 1.0d0) -161)
- (scale-float (float 6089224749422725 1.0d0) -219)
- (scale-float (float 4687409247682560 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4531318495980147 1.0d0) -52)
- (scale-float (float 8707865871150605 1.0d0) -106)
- (scale-float (float -8742156179954147 1.0d0) -160)
- (scale-float (float 7423461641638503 1.0d0) -214)
- (scale-float (float 4946309413175296 1.0d0) -268))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4545242169745922 1.0d0) -52)
- (scale-float (float 6120288057254408 1.0d0) -106)
- (scale-float (float -7134966792624880 1.0d0) -160)
- (scale-float (float 7106442382470865 1.0d0) -214)
- (scale-float (float -4994665554444288 1.0d0) -268))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4559209022675690 1.0d0) -52)
- (scale-float (float 4642612743551652 1.0d0) -107)
- (scale-float (float -8835620097922572 1.0d0) -162)
- (scale-float (float 5462967962548958 1.0d0) -216)
- (scale-float (float -7488916543471616 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4573219321975402 1.0d0) -52)
- (scale-float (float 8208268750109258 1.0d0) -106)
- (scale-float (float 8779294862775466 1.0d0) -161)
- (scale-float (float 8575869339142009 1.0d0) -216)
- (scale-float (float 5754828073402368 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4587273336926197 1.0d0) -52)
- (scale-float (float 6567139298043908 1.0d0) -108)
- (scale-float (float -5788397270204549 1.0d0) -167)
- (scale-float (float 8365114338788143 1.0d0) -227)
- (scale-float (float -6680456019836928 1.0d0) -283))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4601371338905047 1.0d0) -52)
- (scale-float (float 5156158567470130 1.0d0) -106)
- (scale-float (float 7491499535329569 1.0d0) -160)
- (scale-float (float 6874719364608933 1.0d0) -219)
- (scale-float (float 8812820396507136 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4615513601405656 1.0d0) -52)
- (scale-float (float 8637286653403373 1.0d0) -106)
- (scale-float (float -5845648852952455 1.0d0) -163)
- (scale-float (float 8213629556057855 1.0d0) -217)
- (scale-float (float -7694357970223104 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4629700400059602 1.0d0) -52)
- (scale-float (float -6640905085885411 1.0d0) -107)
- (scale-float (float -6108186170495346 1.0d0) -161)
- (scale-float (float -5276109493674260 1.0d0) -216)
- (scale-float (float -6528630449078272 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4643932012657730 1.0d0) -52)
- (scale-float (float -7676944829602621 1.0d0) -109)
- (scale-float (float -7576235611493503 1.0d0) -163)
- (scale-float (float -5866291950993164 1.0d0) -218)
- (scale-float (float -4570226453118976 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4658208719171809 1.0d0) -52)
- (scale-float (float -6462358001331209 1.0d0) -106)
- (scale-float (float 4841745630889741 1.0d0) -161)
- (scale-float (float -6165834006044884 1.0d0) -215)
- (scale-float (float -6336043552489472 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4672530801776438 1.0d0) -52)
- (scale-float (float -7691439632814366 1.0d0) -107)
- (scale-float (float -5275038674081474 1.0d0) -162)
- (scale-float (float -5290430969572931 1.0d0) -217)
- (scale-float (float -4752702542184448 1.0d0) -277))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4686898544871223 1.0d0) -52)
- (scale-float (float 7616878022565265 1.0d0) -106)
- (scale-float (float -4891512935952183 1.0d0) -161)
- (scale-float (float -7554585890962611 1.0d0) -215)
- (scale-float (float 8158457242517504 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4701312235103219 1.0d0) -52)
- (scale-float (float -8828957998279163 1.0d0) -106)
- (scale-float (float 8896627949166807 1.0d0) -161)
- (scale-float (float 6455528090084148 1.0d0) -215)
- (scale-float (float 5376526822440960 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4715772161389634 1.0d0) -52)
- (scale-float (float 6611889806761557 1.0d0) -107)
- (scale-float (float 8587106394250273 1.0d0) -161)
- (scale-float (float 4612376928302046 1.0d0) -215)
- (scale-float (float -7995449752584192 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4730278614940825 1.0d0) -52)
- (scale-float (float 5797047947429435 1.0d0) -106)
- (scale-float (float 8451360026022682 1.0d0) -162)
- (scale-float (float -7176326364695730 1.0d0) -216)
- (scale-float (float 5588354057633792 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4744831889283554 1.0d0) -52)
- (scale-float (float 5440507614362052 1.0d0) -106)
- (scale-float (float -7472777561652180 1.0d0) -162)
- (scale-float (float 5322393024626314 1.0d0) -217)
- (scale-float (float -6975573859958784 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4759432280284537 1.0d0) -52)
- (scale-float (float -7804460408252274 1.0d0) -108)
- (scale-float (float 4721420388794970 1.0d0) -162)
- (scale-float (float -4869051928629796 1.0d0) -216)
- (scale-float (float -5855131702919168 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4774080086174274 1.0d0) -52)
- (scale-float (float 5078391214474324 1.0d0) -106)
- (scale-float (float 8726228470903242 1.0d0) -160)
- (scale-float (float 5726008165951771 1.0d0) -215)
- (scale-float (float 5327202326757376 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4788775607571175 1.0d0) -52)
- (scale-float (float 6042915648874728 1.0d0) -106)
- (scale-float (float -6737326657531783 1.0d0) -166)
- (scale-float (float -7385308912213535 1.0d0) -220)
- (scale-float (float -7546812207988736 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4803519147505973 1.0d0) -52)
- (scale-float (float 6821857535497915 1.0d0) -107)
- (scale-float (float 6448918725600666 1.0d0) -161)
- (scale-float (float -6602953432721212 1.0d0) -219)
- (scale-float (float -6849715759480832 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4818311011446440 1.0d0) -52)
- (scale-float (float 7538637027465560 1.0d0) -106)
- (scale-float (float 6748868498788284 1.0d0) -161)
- (scale-float (float 8322818221344581 1.0d0) -216)
- (scale-float (float 4765752779046912 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4833151507322407 1.0d0) -52)
- (scale-float (float 5187081350654200 1.0d0) -109)
- (scale-float (float 4527064833154022 1.0d0) -163)
- (scale-float (float 7727203281482466 1.0d0) -221)
- (scale-float (float 8475947126751232 1.0d0) -275))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4848040945551086 1.0d0) -52)
- (scale-float (float -5832991476629573 1.0d0) -106)
- (scale-float (float -8678368141246756 1.0d0) -162)
- (scale-float (float -6698834309432254 1.0d0) -216)
- (scale-float (float -5925838650703872 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4862979639062708 1.0d0) -52)
- (scale-float (float 6794302758030968 1.0d0) -106)
- (scale-float (float -6710157956760469 1.0d0) -161)
- (scale-float (float -8243514520532244 1.0d0) -215)
- (scale-float (float 6449818064977920 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4877967903326479 1.0d0) -52)
- (scale-float (float 8154215292809681 1.0d0) -106)
- (scale-float (float -5509504215723478 1.0d0) -162)
- (scale-float (float -8971056361398774 1.0d0) -217)
- (scale-float (float 7952769083899904 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4893006056376849 1.0d0) -52)
- (scale-float (float 5057769703051193 1.0d0) -110)
- (scale-float (float -7124920471066105 1.0d0) -165)
- (scale-float (float 8682182329137565 1.0d0) -219)
- (scale-float (float 7684547366879232 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4908094418840112 1.0d0) -52)
- (scale-float (float -6997879398230154 1.0d0) -107)
- (scale-float (float 6546058407120439 1.0d0) -163)
- (scale-float (float -5274800579489853 1.0d0) -217)
- (scale-float (float -5245426427887616 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4923233313961336 1.0d0) -52)
- (scale-float (float -6942158939172050 1.0d0) -113)
- (scale-float (float 8228310865713679 1.0d0) -172)
- (scale-float (float -4601925709315571 1.0d0) -227)
- (scale-float (float -7263043301933056 1.0d0) -281))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4938423067631627 1.0d0) -52)
- (scale-float (float -5530707171972330 1.0d0) -107)
- (scale-float (float 7866626135932406 1.0d0) -161)
- (scale-float (float 5790192201545901 1.0d0) -216)
- (scale-float (float 6639625734520832 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4953664008415730 1.0d0) -52)
- (scale-float (float -8872028529868000 1.0d0) -112)
- (scale-float (float -4994381805917503 1.0d0) -166)
- (scale-float (float -5033825816006095 1.0d0) -220)
- (scale-float (float 4856569822969856 1.0d0) -276))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4968956467579979 1.0d0) -52)
- (scale-float (float 7114716596311967 1.0d0) -106)
- (scale-float (float -4782362984658837 1.0d0) -161)
- (scale-float (float 8374869555575251 1.0d0) -215)
- (scale-float (float -7500377938362368 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4984300779120595 1.0d0) -52)
- (scale-float (float -7507565419188659 1.0d0) -109)
- (scale-float (float -8262093613781549 1.0d0) -163)
- (scale-float (float -8266901577533332 1.0d0) -218)
- (scale-float (float -8686654726340608 1.0d0) -274))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4999697279792335 1.0d0) -52)
- (scale-float (float -8555622703224681 1.0d0) -108)
- (scale-float (float 5489580344728516 1.0d0) -162)
- (scale-float (float 7502523356519082 1.0d0) -217)
- (scale-float (float -5087482778615808 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5015146309137508 1.0d0) -52)
- (scale-float (float 6009190491712938 1.0d0) -107)
- (scale-float (float -5960955796465403 1.0d0) -162)
- (scale-float (float 7835124684248771 1.0d0) -216)
- (scale-float (float 5746239523520512 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5030648209515352 1.0d0) -52)
- (scale-float (float 7936843531829287 1.0d0) -107)
- (scale-float (float -4585410160052836 1.0d0) -162)
- (scale-float (float -8621225892320225 1.0d0) -216)
- (scale-float (float 7710108439543808 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5046203326131781 1.0d0) -52)
- (scale-float (float 5158856777537267 1.0d0) -106)
- (scale-float (float 4618156553226288 1.0d0) -161)
- (scale-float (float 4833555759796584 1.0d0) -217)
- (scale-float (float 5248807128268800 1.0d0) -271))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5061812007069511 1.0d0) -52)
- (scale-float (float -5372672245251699 1.0d0) -110)
- (scale-float (float -6155918414023994 1.0d0) -164)
- (scale-float (float -6076117403626994 1.0d0) -218)
- (scale-float (float -6909448552448000 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5077474603318565 1.0d0) -52)
- (scale-float (float -7872412654372175 1.0d0) -106)
- (scale-float (float -7640420387406356 1.0d0) -160)
- (scale-float (float 8467733000367172 1.0d0) -219)
- (scale-float (float 4808649420570624 1.0d0) -275))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5093191468807167 1.0d0) -52)
- (scale-float (float -7390176804989206 1.0d0) -106)
- (scale-float (float 7677554952883375 1.0d0) -160)
- (scale-float (float -6041022645373913 1.0d0) -215)
- (scale-float (float 5202695561084928 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5108962960433030 1.0d0) -52)
- (scale-float (float -4883489843268605 1.0d0) -106)
- (scale-float (float -5947149930910021 1.0d0) -160)
- (scale-float (float 7534085244535872 1.0d0) -215)
- (scale-float (float -6233059199598592 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5124789438095041 1.0d0) -52)
- (scale-float (float -7742270852632945 1.0d0) -106)
- (scale-float (float -6813610688219826 1.0d0) -161)
- (scale-float (float -8001223243516280 1.0d0) -215)
- (scale-float (float 6305398319022080 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5140671264725350 1.0d0) -52)
- (scale-float (float 7250990733991090 1.0d0) -106)
- (scale-float (float 7083281718424973 1.0d0) -160)
- (scale-float (float -4884865306153148 1.0d0) -214)
- (scale-float (float -5908183825727488 1.0d0) -268))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5156608806321877 1.0d0) -52)
- (scale-float (float 6764461164591122 1.0d0) -111)
- (scale-float (float -8849667432852637 1.0d0) -165)
- (scale-float (float 5955325841257886 1.0d0) -219)
- (scale-float (float 7098341156454400 1.0d0) -275))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5172602431981224 1.0d0) -52)
- (scale-float (float -6068710065284638 1.0d0) -106)
- (scale-float (float 4560291370760431 1.0d0) -161)
- (scale-float (float -7980608815099774 1.0d0) -218)
- (scale-float (float -7408551747780608 1.0d0) -272))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5188652513932022 1.0d0) -52)
- (scale-float (float -8361586724300927 1.0d0) -106)
- (scale-float (float 5083568272833154 1.0d0) -161)
- (scale-float (float -6766243031787910 1.0d0) -215)
- (scale-float (float 5012841632055296 1.0d0) -269))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5204759427568702 1.0d0) -52)
- (scale-float (float -7868926527126995 1.0d0) -111)
- (scale-float (float -7111689560364649 1.0d0) -165)
- (scale-float (float -7923744305549435 1.0d0) -219)
- (scale-float (float -7840953111412736 1.0d0) -273))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5220923551485705 1.0d0) -52)
- (scale-float (float 4558766697113952 1.0d0) -107)
- (scale-float (float 8636791486606798 1.0d0) -161)
- (scale-float (float -8534698707320123 1.0d0) -215)
- (scale-float (float 5170869010464768 1.0d0) -270))
- (%make-qd-d q0 q1 q2 q3))
- (multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5237145267512131 1.0d0) -52)
- (scale-float (float 5671333817527839 1.0d0) -106)
- (scale-float (float 6702731158711598 1.0d0) -164)
- (scale-float (float 8725677669579077 1.0d0) -220)
- (scale-float (float -8054127175139328 1.0d0) -275))
+ (renorm-5 (scale-float (float 5426436531911130 1.0d0) -56)
+ (scale-float (float 6268331220853191 1.0d0) -110)
+ (scale-float (float 7600785323609305 1.0d0) -164)
+ (scale-float (float -8739038359052265 1.0d0) -220)
+ (scale-float (float 6761298908676096 1.0d0) -274))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5253424960746842 1.0d0) -52)
- (scale-float (float 4914006112278795 1.0d0) -106)
- (scale-float (float -6640198425541870 1.0d0) -160)
- (scale-float (float -7482977692808900 1.0d0) -214)
- (scale-float (float 7146494793342976 1.0d0) -268))
+ (renorm-5 (scale-float (float 5537611285472038 1.0d0) -56)
+ (scale-float (float 7192871273277846 1.0d0) -113)
+ (scale-float (float 4786541271204674 1.0d0) -170)
+ (scale-float (float 7028609926727509 1.0d0) -224)
+ (scale-float (float 5989165818707968 1.0d0) -278))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5269763019594019 1.0d0) -52)
- (scale-float (float -6197178020972243 1.0d0) -106)
- (scale-float (float -6368333410350760 1.0d0) -160)
- (scale-float (float 8920519928215835 1.0d0) -214)
- (scale-float (float -6098770810658816 1.0d0) -268))
+ (renorm-5 (scale-float (float 5648812254061936 1.0d0) -56)
+ (scale-float (float -5604264951909811 1.0d0) -113)
+ (scale-float (float 5746680039939614 1.0d0) -168)
+ (scale-float (float 6497560367307525 1.0d0) -225)
+ (scale-float (float 6467556663623680 1.0d0) -279))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5286159835799181 1.0d0) -52)
- (scale-float (float 7761834614816388 1.0d0) -110)
- (scale-float (float -6495572605073135 1.0d0) -169)
- (scale-float (float 6271977073868380 1.0d0) -223)
- (scale-float (float 5384071907639296 1.0d0) -278))
+ (renorm-5 (scale-float (float 5760039970474718 1.0d0) -56)
+ (scale-float (float -6980143845353219 1.0d0) -113)
+ (scale-float (float 4785639533129965 1.0d0) -167)
+ (scale-float (float -8159304138220741 1.0d0) -222)
+ (scale-float (float -6774418327470080 1.0d0) -277))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5302615804485681 1.0d0) -52)
- (scale-float (float 5380131577539679 1.0d0) -106)
- (scale-float (float 7219845164474095 1.0d0) -160)
- (scale-float (float -5620655606260218 1.0d0) -216)
- (scale-float (float 7670657555038208 1.0d0) -271))
+ (renorm-5 (scale-float (float 5871294968012444 1.0d0) -56)
+ (scale-float (float -4791551064553444 1.0d0) -111)
+ (scale-float (float -4887007668252453 1.0d0) -165)
+ (scale-float (float 6787668372624906 1.0d0) -225)
+ (scale-float (float -7813467658518528 1.0d0) -281))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5319131324191672 1.0d0) -52)
- (scale-float (float -5714718294713518 1.0d0) -107)
- (scale-float (float -5467512887293186 1.0d0) -162)
- (scale-float (float 5169815790195207 1.0d0) -218)
- (scale-float (float -7534175560663040 1.0d0) -274))
+ (renorm-5 (scale-float (float 5982577780495660 1.0d0) -56)
+ (scale-float (float -5604253744660759 1.0d0) -110)
+ (scale-float (float -6394322686782746 1.0d0) -165)
+ (scale-float (float 7131851835334653 1.0d0) -219)
+ (scale-float (float 6165912427102208 1.0d0) -273))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5335706796907560 1.0d0) -52)
- (scale-float (float -7743357533407159 1.0d0) -106)
- (scale-float (float 8602872195364813 1.0d0) -160)
- (scale-float (float 5956292379557479 1.0d0) -214)
- (scale-float (float -6644807458160640 1.0d0) -268))
+ (renorm-5 (scale-float (float 6093888942273739 1.0d0) -56)
+ (scale-float (float -5330715064199763 1.0d0) -110)
+ (scale-float (float -8751640118165682 1.0d0) -164)
+ (scale-float (float -7285821764229900 1.0d0) -218)
+ (scale-float (float 8002313246965760 1.0d0) -273))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5352342628113952 1.0d0) -52)
- (scale-float (float 8287948830298086 1.0d0) -106)
- (scale-float (float -8263058540515532 1.0d0) -161)
- (scale-float (float 8746414962754213 1.0d0) -215)
- (scale-float (float -4647619282599936 1.0d0) -270))
+ (renorm-5 (scale-float (float 6205228988235244 1.0d0) -56)
+ (scale-float (float 8200951954534406 1.0d0) -112)
+ (scale-float (float 6111509378875418 1.0d0) -166)
+ (scale-float (float 4613726211466020 1.0d0) -223)
+ (scale-float (float 8203483406925824 1.0d0) -277))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5369039226820106 1.0d0) -52)
- (scale-float (float 4788887780696931 1.0d0) -108)
- (scale-float (float -5417627612608227 1.0d0) -162)
- (scale-float (float 6930209616115571 1.0d0) -218)
- (scale-float (float -5943628753010688 1.0d0) -273))
+ (renorm-5 (scale-float (float 6316598453818314 1.0d0) -56)
+ (scale-float (float -8766569805266857 1.0d0) -110)
+ (scale-float (float -7041718158970532 1.0d0) -166)
+ (scale-float (float 7435291341653501 1.0d0) -220)
+ (scale-float (float 7481516131811328 1.0d0) -274))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5385797005602878 1.0d0) -52)
- (scale-float (float -8613972398492569 1.0d0) -107)
- (scale-float (float -8780328477970895 1.0d0) -161)
- (scale-float (float 6334968262014952 1.0d0) -215)
- (scale-float (float -6431481749700608 1.0d0) -270))
+ (renorm-5 (scale-float (float 6427997875021066 1.0d0) -56)
+ (scale-float (float -5855089389107843 1.0d0) -110)
+ (scale-float (float -6422347945156548 1.0d0) -167)
+ (scale-float (float -4564270512127009 1.0d0) -221)
+ (scale-float (float 6580087321788416 1.0d0) -276))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5402616380646197 1.0d0) -52)
- (scale-float (float -8461026404816341 1.0d0) -106)
- (scale-float (float 6110845169392857 1.0d0) -166)
- (scale-float (float 4613892684805469 1.0d0) -221)
- (scale-float (float -6099356071493632 1.0d0) -275))
+ (renorm-5 (scale-float (float 6539427788412030 1.0d0) -56)
+ (scale-float (float 4932162808711017 1.0d0) -112)
+ (scale-float (float 4775961348624409 1.0d0) -172)
+ (scale-float (float 6253308938258537 1.0d0) -226)
+ (scale-float (float -8452628413415424 1.0d0) -284))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5419497771781056 1.0d0) -52)
- (scale-float (float 5850327538265884 1.0d0) -106)
- (scale-float (float -4661457073413234 1.0d0) -161)
- (scale-float (float 5691100896377569 1.0d0) -215)
- (scale-float (float 6955708596404224 1.0d0) -269))
+ (renorm-5 (scale-float (float 6650888731140600 1.0d0) -56)
+ (scale-float (float -8014160490158482 1.0d0) -110)
+ (scale-float (float 8630627017345737 1.0d0) -165)
+ (scale-float (float -8575776752397544 1.0d0) -223)
+ (scale-float (float 5666371027337216 1.0d0) -279))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5436441602526041 1.0d0) -52)
- (scale-float (float 5907679784846151 1.0d0) -108)
- (scale-float (float 8916729613410306 1.0d0) -163)
- (scale-float (float -6542909483744733 1.0d0) -220)
- (scale-float (float 7442857689350144 1.0d0) -275))
+ (renorm-5 (scale-float (float 6762381240947507 1.0d0) -56)
+ (scale-float (float -5530390079113711 1.0d0) -110)
+ (scale-float (float -8346006416574906 1.0d0) -164)
+ (scale-float (float -5547641109711780 1.0d0) -220)
+ (scale-float (float 4733774473003008 1.0d0) -274))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5453448300128390 1.0d0) -52)
- (scale-float (float -5395172642177515 1.0d0) -106)
- (scale-float (float -7415820396980726 1.0d0) -162)
- (scale-float (float 8565277280800078 1.0d0) -216)
- (scale-float (float -6487363912400896 1.0d0) -270))
+ (renorm-5 (scale-float (float 6873905856175324 1.0d0) -56)
+ (scale-float (float 6624288088975897 1.0d0) -112)
+ (scale-float (float 6140096482270206 1.0d0) -168)
+ (scale-float (float -5870790501959892 1.0d0) -222)
+ (scale-float (float -5442761984311296 1.0d0) -276))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5470518295605609 1.0d0) -52)
- (scale-float (float 6859549412285172 1.0d0) -106)
- (scale-float (float 8410295424490072 1.0d0) -161)
- (scale-float (float 5617606155659205 1.0d0) -215)
- (scale-float (float -5730893386301440 1.0d0) -269))
+ (renorm-5 (scale-float (float 6985463115778989 1.0d0) -56)
+ (scale-float (float 4681164955421420 1.0d0) -110)
+ (scale-float (float -8766768521526820 1.0d0) -164)
+ (scale-float (float 5459492635791986 1.0d0) -218)
+ (scale-float (float -7454206129184768 1.0d0) -272))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5487652023787646 1.0d0) -52)
- (scale-float (float -6894328101426537 1.0d0) -108)
- (scale-float (float -4863443290707938 1.0d0) -162)
- (scale-float (float 7473415355050136 1.0d0) -216)
- (scale-float (float -8046079960907776 1.0d0) -270))
+ (renorm-5 (scale-float (float 7097053559336354 1.0d0) -56)
+ (scale-float (float 6892861201620346 1.0d0) -110)
+ (scale-float (float 4621862762597655 1.0d0) -166)
+ (scale-float (float 8030392135320131 1.0d0) -223)
+ (scale-float (float 5523752298217472 1.0d0) -279))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5504849923359620 1.0d0) -52)
- (scale-float (float -7675733602073683 1.0d0) -106)
- (scale-float (float -4959418929518672 1.0d0) -164)
- (scale-float (float 8055799358766222 1.0d0) -221)
- (scale-float (float 8901690440810496 1.0d0) -275))
+ (renorm-5 (scale-float (float 7208677727058761 1.0d0) -56)
+ (scale-float (float 8677658365757109 1.0d0) -110)
+ (scale-float (float -5701248841593772 1.0d0) -164)
+ (scale-float (float -7758076858108619 1.0d0) -218)
+ (scale-float (float -4664176372514816 1.0d0) -273))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5522112436905136 1.0d0) -52)
- (scale-float (float -5502589643288498 1.0d0) -106)
- (scale-float (float 4920876623060797 1.0d0) -163)
- (scale-float (float 6507281189931081 1.0d0) -217)
- (scale-float (float 7931598952398848 1.0d0) -271))
+ (renorm-5 (scale-float (float 7320336159801643 1.0d0) -56)
+ (scale-float (float 7130725875007135 1.0d0) -110)
+ (scale-float (float -6323732027339787 1.0d0) -165)
+ (scale-float (float -5880754033304199 1.0d0) -222)
+ (scale-float (float -6158226902745088 1.0d0) -277))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5539440010950179 1.0d0) -52)
- (scale-float (float -6586300721274210 1.0d0) -106)
- (scale-float (float 4875414167676657 1.0d0) -161)
- (scale-float (float -5971935162612676 1.0d0) -217)
- (scale-float (float -8879786832166912 1.0d0) -273))
+ (renorm-5 (scale-float (float 7432029399075151 1.0d0) -56)
+ (scale-float (float 4993552063906422 1.0d0) -113)
+ (scale-float (float -7293000710681886 1.0d0) -169)
+ (scale-float (float 4645994626094532 1.0d0) -223)
+ (scale-float (float 5050788669554688 1.0d0) -277))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5556833096007599 1.0d0) -52)
- (scale-float (float -5983320784766758 1.0d0) -106)
- (scale-float (float 4761683160661033 1.0d0) -160)
- (scale-float (float 4780794256244852 1.0d0) -214)
- (scale-float (float 5044951728259072 1.0d0) -271))
+ (renorm-5 (scale-float (float 7543757987054807 1.0d0) -56)
+ (scale-float (float 6375768949364446 1.0d0) -110)
+ (scale-float (float 7990356077590539 1.0d0) -164)
+ (scale-float (float 7889537146385756 1.0d0) -219)
+ (scale-float (float -4787856673505280 1.0d0) -273))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5574292146622201 1.0d0) -52)
- (scale-float (float -8886887860497170 1.0d0) -110)
- (scale-float (float 6445995358430954 1.0d0) -165)
- (scale-float (float 7277245463857843 1.0d0) -219)
- (scale-float (float 5619182104215552 1.0d0) -277))
+ (renorm-5 (scale-float (float 7655522466592189 1.0d0) -56)
+ (scale-float (float -8932639885604140 1.0d0) -110)
+ (scale-float (float 7154800552967290 1.0d0) -164)
+ (scale-float (float 8504487847058852 1.0d0) -218)
+ (scale-float (float 5517932734169088 1.0d0) -273))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5591817621416446 1.0d0) -52)
- (scale-float (float 5298355796694084 1.0d0) -106)
- (scale-float (float -5114747045044762 1.0d0) -160)
- (scale-float (float -7370756506461501 1.0d0) -216)
- (scale-float (float -5777120783073280 1.0d0) -270))
+ (renorm-5 (scale-float (float 7767323381225633 1.0d0) -56)
+ (scale-float (float -7099732203932096 1.0d0) -110)
+ (scale-float (float 7787318832776911 1.0d0) -165)
+ (scale-float (float -4816798849144489 1.0d0) -219)
+ (scale-float (float -7581388403900416 1.0d0) -273))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5609409983136773 1.0d0) -52)
- (scale-float (float 8803645493974858 1.0d0) -109)
- (scale-float (float 8607267036649616 1.0d0) -163)
- (scale-float (float 7266687025234818 1.0d0) -219)
- (scale-float (float -8378684359573504 1.0d0) -275))
+ (renorm-5 (scale-float (float 7879161275190977 1.0d0) -56)
+ (scale-float (float -7067364847376586 1.0d0) -110)
+ (scale-float (float -5996918893238168 1.0d0) -165)
+ (scale-float (float -4831575886096997 1.0d0) -220)
+ (scale-float (float 8984551876231168 1.0d0) -274))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5627069698700551 1.0d0) -52)
- (scale-float (float -5069687772444870 1.0d0) -106)
- (scale-float (float -6985058564174371 1.0d0) -161)
- (scale-float (float 6795876030934237 1.0d0) -215)
- (scale-float (float 7953330937856000 1.0d0) -271))
+ (renorm-5 (scale-float (float 7991036693432322 1.0d0) -56)
+ (scale-float (float -5699502590634390 1.0d0) -110)
+ (scale-float (float 7614224173666209 1.0d0) -168)
+ (scale-float (float -7433568750335281 1.0d0) -224)
+ (scale-float (float 6300988752265216 1.0d0) -279))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5644797239243674 1.0d0) -52)
- (scale-float (float 8411381203376034 1.0d0) -106)
- (scale-float (float 7653256017934632 1.0d0) -163)
- (scale-float (float 7152356641584070 1.0d0) -217)
- (scale-float (float 5009045517697024 1.0d0) -271))
+ (renorm-5 (scale-float (float 8102950181612828 1.0d0) -56)
+ (scale-float (float -6659060468323962 1.0d0) -110)
+ (scale-float (float 8935414324151244 1.0d0) -166)
+ (scale-float (float 5382978084931225 1.0d0) -220)
+ (scale-float (float -5860588151439360 1.0d0) -274))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5662593080168812 1.0d0) -52)
- (scale-float (float -7463623433219470 1.0d0) -106)
- (scale-float (float -6749935140334936 1.0d0) -162)
- (scale-float (float -5132882691543150 1.0d0) -217)
- (scale-float (float -7518575503867904 1.0d0) -271))
+ (renorm-5 (scale-float (float 8214902286125537 1.0d0) -56)
+ (scale-float (float -4952835986202615 1.0d0) -110)
+ (scale-float (float -8867467142013577 1.0d0) -164)
+ (scale-float (float 8477381256242030 1.0d0) -218)
+ (scale-float (float 4546036908785664 1.0d0) -272))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5680457701194310 1.0d0) -52)
- (scale-float (float -6998750368212970 1.0d0) -107)
- (scale-float (float -7930918713877090 1.0d0) -161)
- (scale-float (float -8747426055564017 1.0d0) -215)
- (scale-float (float 5887302577258496 1.0d0) -270))
+ (renorm-5 (scale-float (float 8326893554104228 1.0d0) -56)
+ (scale-float (float -8864362191955611 1.0d0) -110)
+ (scale-float (float -7414201007742116 1.0d0) -164)
+ (scale-float (float 7390248804924237 1.0d0) -218)
+ (scale-float (float 5203427552927744 1.0d0) -272))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5698391586403778 1.0d0) -52)
- (scale-float (float 6429457098929092 1.0d0) -106)
- (scale-float (float 5364497324013643 1.0d0) -161)
- (scale-float (float -5389536438482203 1.0d0) -219)
- (scale-float (float -5449683185958912 1.0d0) -274))
+ (renorm-5 (scale-float (float 8438924533434299 1.0d0) -56)
+ (scale-float (float -6498852296858640 1.0d0) -113)
+ (scale-float (float 8724480238237586 1.0d0) -168)
+ (scale-float (float 6505237845415267 1.0d0) -224)
+ (scale-float (float 6160645556797440 1.0d0) -278))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5716395224296353 1.0d0) -52)
- (scale-float (float -8699934226618341 1.0d0) -106)
- (scale-float (float 8727990775977224 1.0d0) -161)
- (scale-float (float 6321497904821580 1.0d0) -215)
- (scale-float (float 8394350004862976 1.0d0) -269))
+ (renorm-5 (scale-float (float 8550995772763686 1.0d0) -56)
+ (scale-float (float -8849620054117273 1.0d0) -110)
+ (scale-float (float -6126624500449066 1.0d0) -167)
+ (scale-float (float -7441234044338374 1.0d0) -221)
+ (scale-float (float -7193057718960128 1.0d0) -278))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5734469107837653 1.0d0) -52)
- (scale-float (float -5608466080249442 1.0d0) -106)
- (scale-float (float -8128962820009935 1.0d0) -160)
- (scale-float (float -8734907705205393 1.0d0) -214)
- (scale-float (float 7574031242117120 1.0d0) -268))
+ (renorm-5 (scale-float (float 8663107821513803 1.0d0) -56)
+ (scale-float (float 7896549251964366 1.0d0) -110)
+ (scale-float (float 6413572225108209 1.0d0) -165)
+ (scale-float (float 6785815414216356 1.0d0) -220)
+ (scale-float (float -8698059142004736 1.0d0) -275))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5752613734511449 1.0d0) -52)
- (scale-float (float 8359797713652660 1.0d0) -107)
- (scale-float (float 7268348276446850 1.0d0) -162)
- (scale-float (float 8547978174302657 1.0d0) -220)
- (scale-float (float -4901703552860160 1.0d0) -274))
+ (renorm-5 (scale-float (float 8775261229890529 1.0d0) -56)
+ (scale-float (float -5966718174417912 1.0d0) -118)
+ (scale-float (float 5908054939109838 1.0d0) -172)
+ (scale-float (float 5566629553984590 1.0d0) -226)
+ (scale-float (float 8254038780936192 1.0d0) -282))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5770829606372044 1.0d0) -52)
- (scale-float (float 8873848746075100 1.0d0) -106)
- (scale-float (float -5482395340917506 1.0d0) -161)
- (scale-float (float 4950129265951595 1.0d0) -215)
- (scale-float (float 8348001891680256 1.0d0) -269))
+ (renorm-5 (scale-float (float 8887456548895209 1.0d0) -56)
+ (scale-float (float -4822487303729171 1.0d0) -111)
+ (scale-float (float -6184305249388923 1.0d0) -167)
+ (scale-float (float 8897480272152756 1.0d0) -221)
+ (scale-float (float -6855015747026944 1.0d0) -275))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5789117230097384 1.0d0) -52)
- (scale-float (float -5907478425914740 1.0d0) -106)
- (scale-float (float 8155485967379828 1.0d0) -164)
- (scale-float (float 8073351445144473 1.0d0) -218)
- (scale-float (float -7648255763808256 1.0d0) -273))
+ (renorm-5 (scale-float (float 8999694330335703 1.0d0) -56)
+ (scale-float (float 5866019688579494 1.0d0) -110)
+ (scale-float (float 6746113864754295 1.0d0) -165)
+ (scale-float (float 5959036981891692 1.0d0) -219)
+ (scale-float (float -8150990309261312 1.0d0) -273))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5807477117042906 1.0d0) -52)
- (scale-float (float 7379105030513962 1.0d0) -106)
- (scale-float (float 6962354212586022 1.0d0) -160)
- (scale-float (float -5068089388980974 1.0d0) -214)
- (scale-float (float 5266491457921024 1.0d0) -268))
+ (renorm-5 (scale-float (float 4555987563418731 1.0d0) -55)
+ (scale-float (float 6209213722885724 1.0d0) -109)
+ (scale-float (float -5214445726143485 1.0d0) -166)
+ (scale-float (float 8905707340331887 1.0d0) -222)
+ (scale-float (float 5365261823639552 1.0d0) -276))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5825909783296151 1.0d0) -52)
- (scale-float (float 5797874806894183 1.0d0) -107)
- (scale-float (float 8949531194295957 1.0d0) -161)
- (scale-float (float -4871977890381284 1.0d0) -218)
- (scale-float (float -8203445065875456 1.0d0) -272))
+ (renorm-5 (scale-float (float 4612149745927319 1.0d0) -55)
+ (scale-float (float -5149064220987970 1.0d0) -109)
+ (scale-float (float 5135621514213651 1.0d0) -165)
+ (scale-float (float -7670135873233643 1.0d0) -221)
+ (scale-float (float 7366713464324096 1.0d0) -276))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5844415749732125 1.0d0) -52)
- (scale-float (float -5611268112741578 1.0d0) -106)
- (scale-float (float -4714589241636602 1.0d0) -160)
- (scale-float (float -7435363496845589 1.0d0) -215)
- (scale-float (float 5053626226671616 1.0d0) -269))
+ (renorm-5 (scale-float (float 4668333989840611 1.0d0) -55)
+ (scale-float (float 4510225260708012 1.0d0) -109)
+ (scale-float (float 8636055489646536 1.0d0) -164)
+ (scale-float (float -8793811301860095 1.0d0) -218)
+ (scale-float (float 6385623296147456 1.0d0) -272))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5862995542069449 1.0d0) -52)
- (scale-float (float 7488415117650730 1.0d0) -107)
- (scale-float (float -6614643630069895 1.0d0) -162)
- (scale-float (float -5102430690183685 1.0d0) -218)
- (scale-float (float 7259113985015808 1.0d0) -272))
+ (renorm-5 (scale-float (float 4724540572731118 1.0d0) -55)
+ (scale-float (float 6549959657432699 1.0d0) -110)
+ (scale-float (float 7449375933247135 1.0d0) -166)
+ (scale-float (float -6347708187996322 1.0d0) -223)
+ (scale-float (float -5310022893436928 1.0d0) -278))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5881649690927300 1.0d0) -52)
- (scale-float (float -8983594369336534 1.0d0) -110)
- (scale-float (float -8803855787500514 1.0d0) -164)
- (scale-float (float -5829848534110580 1.0d0) -220)
- (scale-float (float 6388222641831936 1.0d0) -275))
+ (renorm-5 (scale-float (float 4780769772602468 1.0d0) -55)
+ (scale-float (float -7595498697333782 1.0d0) -109)
+ (scale-float (float -7656035220403600 1.0d0) -163)
+ (scale-float (float -5381888146336062 1.0d0) -217)
+ (scale-float (float 5490984867725312 1.0d0) -275))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5900378731883146 1.0d0) -52)
- (scale-float (float 5282966696948388 1.0d0) -106)
- (scale-float (float -7227500597331042 1.0d0) -160)
- (scale-float (float 7122644606364067 1.0d0) -214)
- (scale-float (float 8679813332058112 1.0d0) -269))
+ (renorm-5 (scale-float (float 4837021867895031 1.0d0) -55)
+ (scale-float (float 4955973083008952 1.0d0) -109)
+ (scale-float (float 6495859847082499 1.0d0) -165)
+ (scale-float (float 6811580417239946 1.0d0) -221)
+ (scale-float (float 7307243231903744 1.0d0) -275))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5919183205531309 1.0d0) -52)
- (scale-float (float 6020360633385612 1.0d0) -106)
- (scale-float (float -5617027140810653 1.0d0) -160)
- (scale-float (float -8063497217131366 1.0d0) -215)
- (scale-float (float -6998831223095296 1.0d0) -269))
+ (renorm-5 (scale-float (float 4893297137491568 1.0d0) -55)
+ (scale-float (float -4512119916936150 1.0d0) -110)
+ (scale-float (float 6124013201381881 1.0d0) -165)
+ (scale-float (float 7901731001127329 1.0d0) -219)
+ (scale-float (float -5108238592475136 1.0d0) -273))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5938063657542350 1.0d0) -52)
- (scale-float (float 5349144650243834 1.0d0) -108)
- (scale-float (float 4932281782375480 1.0d0) -162)
- (scale-float (float -7435308876813488 1.0d0) -219)
- (scale-float (float 7014939923316736 1.0d0) -276))
+ (renorm-5 (scale-float (float 4949595860722884 1.0d0) -55)
+ (scale-float (float 5573513357823599 1.0d0) -111)
+ (scale-float (float 6921778578926697 1.0d0) -165)
+ (scale-float (float -6871954836299068 1.0d0) -219)
+ (scale-float (float -8124723360301056 1.0d0) -274))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5957020638723301 1.0d0) -52)
- (scale-float (float 6050693286119645 1.0d0) -106)
- (scale-float (float -7010959626751421 1.0d0) -160)
- (scale-float (float 4831433211189875 1.0d0) -220)
- (scale-float (float -5946420923203584 1.0d0) -275))
+ (renorm-5 (scale-float (float 5005918317373515 1.0d0) -55)
+ (scale-float (float -7449301635455933 1.0d0) -109)
+ (scale-float (float 4667696694299058 1.0d0) -163)
+ (scale-float (float -8482132186453729 1.0d0) -218)
+ (scale-float (float 5190014904221696 1.0d0) -272))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5976054705078758 1.0d0) -52)
- (scale-float (float -5804760634859385 1.0d0) -107)
- (scale-float (float -6678204498813162 1.0d0) -161)
- (scale-float (float -7794647540220125 1.0d0) -215)
- (scale-float (float 7130250855546880 1.0d0) -270))
+ (renorm-5 (scale-float (float 5062264787687421 1.0d0) -55)
+ (scale-float (float -5647669325384224 1.0d0) -110)
+ (scale-float (float 8368118104806602 1.0d0) -165)
+ (scale-float (float 6554426093832685 1.0d0) -219)
+ (scale-float (float 6744300675661824 1.0d0) -273))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5995166417872839 1.0d0) -52)
- (scale-float (float -7083656090478066 1.0d0) -106)
- (scale-float (float -5085604729162056 1.0d0) -160)
- (scale-float (float -4786273674027804 1.0d0) -214)
- (scale-float (float -7576257161363456 1.0d0) -269))
+ (renorm-5 (scale-float (float 5118635552373709 1.0d0) -55)
+ (scale-float (float -5766246573771723 1.0d0) -110)
+ (scale-float (float 7246687990865645 1.0d0) -165)
+ (scale-float (float -7797207573510533 1.0d0) -220)
+ (scale-float (float -8907989811003392 1.0d0) -274))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6014356343692036 1.0d0) -52)
- (scale-float (float 5366472246956758 1.0d0) -106)
- (scale-float (float -5071220322235649 1.0d0) -169)
- (scale-float (float 6954359692199752 1.0d0) -223)
- (scale-float (float -5034514724159488 1.0d0) -277))
+ (renorm-5 (scale-float (float 5175030892612366 1.0d0) -55)
+ (scale-float (float 4817698955833881 1.0d0) -109)
+ (scale-float (float 6621452284252597 1.0d0) -166)
+ (scale-float (float -6219041473034286 1.0d0) -224)
+ (scale-float (float -5352603740274688 1.0d0) -278))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6033625054508968 1.0d0) -52)
- (scale-float (float 5677257234433246 1.0d0) -106)
- (scale-float (float -5084702581541349 1.0d0) -161)
- (scale-float (float 5654826779275307 1.0d0) -215)
- (scale-float (float -4653569025212416 1.0d0) -269))
+ (renorm-5 (scale-float (float 5231451090060019 1.0d0) -55)
+ (scale-float (float 4519905144375329 1.0d0) -109)
+ (scale-float (float 5480017346586174 1.0d0) -163)
+ (scale-float (float 5555549697755828 1.0d0) -221)
+ (scale-float (float 4977506345549824 1.0d0) -276))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6052973127747045 1.0d0) -52)
- (scale-float (float -5992522324811026 1.0d0) -107)
- (scale-float (float 5137769490681806 1.0d0) -163)
- (scale-float (float 6191509978816801 1.0d0) -217)
- (scale-float (float -5937582080655360 1.0d0) -272))
+ (renorm-5 (scale-float (float 5287896426855709 1.0d0) -55)
+ (scale-float (float -4981394459481342 1.0d0) -111)
+ (scale-float (float -4989473981568217 1.0d0) -168)
+ (scale-float (float -6355081785181572 1.0d0) -222)
+ (scale-float (float 6314023576666112 1.0d0) -276))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6072401146346069 1.0d0) -52)
- (scale-float (float 6368946399492854 1.0d0) -107)
- (scale-float (float 5940989044276757 1.0d0) -161)
- (scale-float (float -6257130296766040 1.0d0) -215)
- (scale-float (float -8387244314984448 1.0d0) -272))
+ (renorm-5 (scale-float (float 5344367185626688 1.0d0) -55)
+ (scale-float (float 5294928683267628 1.0d0) -110)
+ (scale-float (float 8192558187298156 1.0d0) -164)
+ (scale-float (float -4975922872246745 1.0d0) -221)
+ (scale-float (float -7805112733401088 1.0d0) -277))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6091909698828786 1.0d0) -52)
- (scale-float (float 4825684163849395 1.0d0) -106)
- (scale-float (float 6244703829615250 1.0d0) -160)
- (scale-float (float -7353096679909392 1.0d0) -214)
- (scale-float (float 6242314420658176 1.0d0) -268))
+ (renorm-5 (scale-float (float 5400863649494238 1.0d0) -55)
+ (scale-float (float 8720062026682742 1.0d0) -109)
+ (scale-float (float 5300479770928683 1.0d0) -165)
+ (scale-float (float 4740531629385530 1.0d0) -219)
+ (scale-float (float -5533681895243776 1.0d0) -273))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6111499379368395 1.0d0) -52)
- (scale-float (float 6853268348922355 1.0d0) -107)
- (scale-float (float 8921987650280235 1.0d0) -162)
- (scale-float (float -5647125548986718 1.0d0) -218)
- (scale-float (float 7050803615367168 1.0d0) -272))
+ (renorm-5 (scale-float (float 5457386102079508 1.0d0) -55)
+ (scale-float (float -8435548971470740 1.0d0) -112)
+ (scale-float (float 4997946243138790 1.0d0) -167)
+ (scale-float (float -6608797304466236 1.0d0) -221)
+ (scale-float (float -6868559905947648 1.0d0) -275))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6131170787857042 1.0d0) -52)
- (scale-float (float 7076646005340217 1.0d0) -107)
- (scale-float (float -8918575034835941 1.0d0) -166)
- (scale-float (float 6834943287816370 1.0d0) -222)
- (scale-float (float 6145850373832704 1.0d0) -276))
+ (renorm-5 (scale-float (float 5513934827509369 1.0d0) -55)
+ (scale-float (float 8782392023262299 1.0d0) -109)
+ (scale-float (float -7738673509830927 1.0d0) -167)
+ (scale-float (float -5448701703915946 1.0d0) -221)
+ (scale-float (float -6273127356039168 1.0d0) -277))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6150924529975311 1.0d0) -52)
- (scale-float (float -6211441221071454 1.0d0) -107)
- (scale-float (float -8016332564782876 1.0d0) -161)
- (scale-float (float -4773628654070188 1.0d0) -216)
- (scale-float (float -8576558004961280 1.0d0) -274))
+ (renorm-5 (scale-float (float 5570510110422301 1.0d0) -55)
+ (scale-float (float -8523863027865608 1.0d0) -110)
+ (scale-float (float -8518255248434760 1.0d0) -165)
+ (scale-float (float 6774399983746988 1.0d0) -219)
+ (scale-float (float 4749473861337088 1.0d0) -274))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6170761217262726 1.0d0) -52)
- (scale-float (float 4529737820769807 1.0d0) -107)
- (scale-float (float -6371861108480422 1.0d0) -161)
- (scale-float (float -8743805348163722 1.0d0) -217)
- (scale-float (float 5463106528870400 1.0d0) -271))
+ (renorm-5 (scale-float (float 5627112235974285 1.0d0) -55)
+ (scale-float (float 7263358254634327 1.0d0) -110)
+ (scale-float (float -7268249985750759 1.0d0) -165)
+ (scale-float (float -4693370910543353 1.0d0) -220)
+ (scale-float (float -5415880066203648 1.0d0) -275))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6190681467189290 1.0d0) -52)
- (scale-float (float 4583442240251745 1.0d0) -106)
- (scale-float (float 8007699635050869 1.0d0) -161)
- (scale-float (float 7067192484128569 1.0d0) -216)
- (scale-float (float 5880342829596672 1.0d0) -270))
+ (renorm-5 (scale-float (float 5683741489844735 1.0d0) -55)
+ (scale-float (float -6280764325749201 1.0d0) -110)
+ (scale-float (float 6965480209639580 1.0d0) -164)
+ (scale-float (float 8931847868637448 1.0d0) -218)
+ (scale-float (float 6284428953845760 1.0d0) -274))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6210685903228067 1.0d0) -52)
- (scale-float (float 6563328176446876 1.0d0) -107)
- (scale-float (float 8373952085979007 1.0d0) -161)
- (scale-float (float -7691011378213255 1.0d0) -217)
- (scale-float (float 8480275457310720 1.0d0) -271))
+ (renorm-5 (scale-float (float 5740398158242435 1.0d0) -55)
+ (scale-float (float 5229471594941651 1.0d0) -119)
+ (scale-float (float 5226239879079869 1.0d0) -174)
+ (scale-float (float 6984672670564467 1.0d0) -229)
+ (scale-float (float -4747601484185600 1.0d0) -283))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6230775154928834 1.0d0) -52)
- (scale-float (float 7704622863134887 1.0d0) -106)
- (scale-float (float 7323134867572349 1.0d0) -160)
- (scale-float (float -5005478534218041 1.0d0) -214)
- (scale-float (float -7309238760914944 1.0d0) -268))
+ (renorm-5 (scale-float (float 5797082527911511 1.0d0) -55)
+ (scale-float (float 7225087649872241 1.0d0) -109)
+ (scale-float (float -6204726364434873 1.0d0) -163)
+ (scale-float (float 8665640845854712 1.0d0) -217)
+ (scale-float (float -6869387504541696 1.0d0) -271))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6250949857992820 1.0d0) -52)
- (scale-float (float 7987647985519856 1.0d0) -107)
- (scale-float (float -7487426820719905 1.0d0) -161)
- (scale-float (float -5364782272810499 1.0d0) -215)
- (scale-float (float -8832938274062336 1.0d0) -270))
+ (renorm-5 (scale-float (float 5853794886137419 1.0d0) -55)
+ (scale-float (float 8582721415685180 1.0d0) -109)
+ (scale-float (float 7069542100455701 1.0d0) -163)
+ (scale-float (float 5319805524648991 1.0d0) -217)
+ (scale-float (float 4908003853656064 1.0d0) -271))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6271210654348545 1.0d0) -52)
- (scale-float (float -7202865618189550 1.0d0) -107)
- (scale-float (float -6519805450253747 1.0d0) -161)
- (scale-float (float -6252520507001189 1.0d0) -215)
- (scale-float (float 8927192142708736 1.0d0) -269))
+ (renorm-5 (scale-float (float 5910535520752957 1.0d0) -55)
+ (scale-float (float -5865441005066127 1.0d0) -109)
+ (scale-float (float 7076063963421070 1.0d0) -163)
+ (scale-float (float -5309399976527585 1.0d0) -217)
+ (scale-float (float 7432748259147776 1.0d0) -273))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6291558192228785 1.0d0) -52)
- (scale-float (float -6205580932530312 1.0d0) -108)
- (scale-float (float 8383826856069705 1.0d0) -162)
- (scale-float (float 7536245349448984 1.0d0) -217)
- (scale-float (float 7909342424727552 1.0d0) -271))
+ (renorm-5 (scale-float (float 5967304720144298 1.0d0) -55)
+ (scale-float (float -5230215325814731 1.0d0) -109)
+ (scale-float (float 5977313757878375 1.0d0) -165)
+ (scale-float (float -7081718739490926 1.0d0) -220)
+ (scale-float (float 6587185890459648 1.0d0) -274))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6311993126248681 1.0d0) -52)
- (scale-float (float 5505618814708415 1.0d0) -110)
- (scale-float (float -6766921334681526 1.0d0) -164)
- (scale-float (float 7244415763832851 1.0d0) -220)
- (scale-float (float 8690738430738432 1.0d0) -276))
+ (renorm-5 (scale-float (float 6024102773257053 1.0d0) -55)
+ (scale-float (float 5313042845820622 1.0d0) -110)
+ (scale-float (float 8023417567167796 1.0d0) -166)
+ (scale-float (float -8604260761430137 1.0d0) -221)
+ (scale-float (float 8631242419339264 1.0d0) -276))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6332516117485007 1.0d0) -52)
- (scale-float (float -4986656226720623 1.0d0) -112)
- (scale-float (float -7019315119988339 1.0d0) -167)
- (scale-float (float -8547683247092648 1.0d0) -221)
- (scale-float (float 8098755056238592 1.0d0) -277))
+ (renorm-5 (scale-float (float 6080929969602352 1.0d0) -55)
+ (scale-float (float -7516683944509205 1.0d0) -109)
+ (scale-float (float -7853673306859953 1.0d0) -163)
+ (scale-float (float 7414966153696994 1.0d0) -223)
+ (scale-float (float -5825247748554752 1.0d0) -277))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6353127833556623 1.0d0) -52)
- (scale-float (float -6484016137410317 1.0d0) -106)
- (scale-float (float 7194743581760215 1.0d0) -165)
- (scale-float (float -6107308258168385 1.0d0) -221)
- (scale-float (float 6471096203214848 1.0d0) -277))
+ (renorm-5 (scale-float (float 6137786599262946 1.0d0) -55)
+ (scale-float (float -5500886081507582 1.0d0) -109)
+ (scale-float (float 7192415028319660 1.0d0) -163)
+ (scale-float (float 8703121046288914 1.0d0) -221)
+ (scale-float (float -7720201466019840 1.0d0) -275))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6373828948706130 1.0d0) -52)
- (scale-float (float -7570036791396226 1.0d0) -106)
- (scale-float (float 7505571551562323 1.0d0) -162)
- (scale-float (float -6361470971601130 1.0d0) -216)
- (scale-float (float 6530359831363584 1.0d0) -271))
+ (renorm-5 (scale-float (float 6194672952899342 1.0d0) -55)
+ (scale-float (float 8257022685980356 1.0d0) -109)
+ (scale-float (float -5525974167343856 1.0d0) -168)
+ (scale-float (float 4733928606935526 1.0d0) -223)
+ (scale-float (float 7298229848244224 1.0d0) -277))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6394620143882752 1.0d0) -52)
- (scale-float (float -5926281191235762 1.0d0) -106)
- (scale-float (float 6906608668392283 1.0d0) -162)
- (scale-float (float 8869198526887854 1.0d0) -216)
- (scale-float (float 8679426859663360 1.0d0) -271))
+ (renorm-5 (scale-float (float 6251589321755958 1.0d0) -55)
+ (scale-float (float -7281767909722987 1.0d0) -110)
+ (scale-float (float 7509948571332277 1.0d0) -164)
+ (scale-float (float -5682276894072656 1.0d0) -218)
+ (scale-float (float -7359121898569728 1.0d0) -272))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6415502106826461 1.0d0) -52)
- (scale-float (float 6540068083767816 1.0d0) -106)
- (scale-float (float 6153041982415204 1.0d0) -162)
- (scale-float (float 8610841340982497 1.0d0) -216)
- (scale-float (float -6431942437240832 1.0d0) -275))
+ (renorm-5 (scale-float (float 6308535997667296 1.0d0) -55)
+ (scale-float (float -5011612829008087 1.0d0) -112)
+ (scale-float (float 8035305895939923 1.0d0) -166)
+ (scale-float (float -7349032198139134 1.0d0) -220)
+ (scale-float (float -5368791976902656 1.0d0) -277))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6436475532153374 1.0d0) -52)
- (scale-float (float -8004461954805426 1.0d0) -109)
- (scale-float (float -4616699193508432 1.0d0) -163)
- (scale-float (float 5836784995704703 1.0d0) -220)
- (scale-float (float 4650103046406144 1.0d0) -275))
+ (renorm-5 (scale-float (float 6365513273064154 1.0d0) -55)
+ (scale-float (float -4812363620961737 1.0d0) -111)
+ (scale-float (float -7413962473603094 1.0d0) -165)
+ (scale-float (float -8767876790007713 1.0d0) -222)
+ (scale-float (float 6507835088175104 1.0d0) -278))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6457541121442432 1.0d0) -52)
- (scale-float (float 8229890068077468 1.0d0) -110)
- (scale-float (float 8417589833442195 1.0d0) -164)
- (scale-float (float 4993999935830255 1.0d0) -218)
- (scale-float (float 8387867879931904 1.0d0) -274))
+ (renorm-5 (scale-float (float 6422521440979851 1.0d0) -55)
+ (scale-float (float 6578882977922512 1.0d0) -111)
+ (scale-float (float 8321576113250904 1.0d0) -165)
+ (scale-float (float -6664725033188740 1.0d0) -221)
+ (scale-float (float 7160493126975488 1.0d0) -279))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6478699583323403 1.0d0) -52)
- (scale-float (float 6209766338586700 1.0d0) -108)
- (scale-float (float 8812525065085517 1.0d0) -162)
- (scale-float (float 7606674576940641 1.0d0) -218)
- (scale-float (float 5829493922594816 1.0d0) -272))
+ (renorm-5 (scale-float (float 6479560795056485 1.0d0) -55)
+ (scale-float (float -8375672623049098 1.0d0) -109)
+ (scale-float (float 7524120084222466 1.0d0) -164)
+ (scale-float (float -6815555174250173 1.0d0) -220)
+ (scale-float (float 5172221827088384 1.0d0) -275))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6499951633566213 1.0d0) -52)
- (scale-float (float 5344999255632671 1.0d0) -106)
- (scale-float (float 6659043903118210 1.0d0) -160)
- (scale-float (float 7988952299473118 1.0d0) -215)
- (scale-float (float 8825753877725184 1.0d0) -269))
+ (renorm-5 (scale-float (float 6536631629551210 1.0d0) -55)
+ (scale-float (float 8736141977573990 1.0d0) -110)
+ (scale-float (float -7322710182822515 1.0d0) -164)
+ (scale-float (float -4790469966222651 1.0d0) -218)
+ (scale-float (float 8864931365781504 1.0d0) -276))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6521297995171641 1.0d0) -52)
- (scale-float (float 8289589138315224 1.0d0) -106)
- (scale-float (float -7613861187390282 1.0d0) -160)
- (scale-float (float -7921364707044254 1.0d0) -215)
- (scale-float (float -6003899739537408 1.0d0) -272))
+ (renorm-5 (scale-float (float 6593734239342550 1.0d0) -55)
+ (scale-float (float 7778440410468410 1.0d0) -109)
+ (scale-float (float -5254236274260814 1.0d0) -163)
+ (scale-float (float 6555239903189666 1.0d0) -218)
+ (scale-float (float -7852641536049152 1.0d0) -273))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6542739398463397 1.0d0) -52)
- (scale-float (float 7091371929556171 1.0d0) -107)
- (scale-float (float -7866566071479408 1.0d0) -161)
- (scale-float (float 8144757392471106 1.0d0) -215)
- (scale-float (float -4970357131509760 1.0d0) -270))
+ (renorm-5 (scale-float (float 6650868919936727 1.0d0) -55)
+ (scale-float (float 7162191600837053 1.0d0) -109)
+ (scale-float (float -5655798014740140 1.0d0) -163)
+ (scale-float (float -8421566080588568 1.0d0) -217)
+ (scale-float (float 5731190979051520 1.0d0) -271))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6564276581181608 1.0d0) -52)
- (scale-float (float 5586345902748011 1.0d0) -107)
- (scale-float (float 5533721210527600 1.0d0) -162)
- (scale-float (float 6324541974446864 1.0d0) -218)
- (scale-float (float -5530738939396096 1.0d0) -273))
+ (renorm-5 (scale-float (float 6708035967474024 1.0d0) -55)
+ (scale-float (float 8929290949301876 1.0d0) -111)
+ (scale-float (float 4736664410119567 1.0d0) -165)
+ (scale-float (float -5300162952592309 1.0d0) -219)
+ (scale-float (float -7285565930602496 1.0d0) -273))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6585910288577741 1.0d0) -52)
- (scale-float (float 8176993161446191 1.0d0) -106)
- (scale-float (float -8048923049888439 1.0d0) -161)
- (scale-float (float -7609732061919437 1.0d0) -215)
- (scale-float (float -8657823220236288 1.0d0) -269))
+ (renorm-5 (scale-float (float 6765235678735172 1.0d0) -55)
+ (scale-float (float -7145520010159020 1.0d0) -113)
+ (scale-float (float -5949255065233075 1.0d0) -168)
+ (scale-float (float 4756154730286905 1.0d0) -222)
+ (scale-float (float 5274431212224512 1.0d0) -276))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6607641273510985 1.0d0) -52)
- (scale-float (float 7535617707354145 1.0d0) -108)
- (scale-float (float 8267981124035699 1.0d0) -162)
- (scale-float (float 5231058758323122 1.0d0) -219)
- (scale-float (float 6731453978116096 1.0d0) -275))
+ (renorm-5 (scale-float (float 6822468351147766 1.0d0) -55)
+ (scale-float (float -8376580639018366 1.0d0) -110)
+ (scale-float (float -4813587535252781 1.0d0) -165)
+ (scale-float (float -8879977609109973 1.0d0) -219)
+ (scale-float (float -5697320867594240 1.0d0) -273))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6629470296546116 1.0d0) -52)
- (scale-float (float -5694113360457882 1.0d0) -106)
- (scale-float (float 7867501777997419 1.0d0) -161)
- (scale-float (float 4661073714339451 1.0d0) -215)
- (scale-float (float -5569705019637760 1.0d0) -271))
+ (renorm-5 (scale-float (float 6879734282792707 1.0d0) -55)
+ (scale-float (float -8556468912319486 1.0d0) -109)
+ (scale-float (float -7506974660546488 1.0d0) -165)
+ (scale-float (float -4635918891365437 1.0d0) -224)
+ (scale-float (float 8122854904168448 1.0d0) -279))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6651398126052879 1.0d0) -52)
- (scale-float (float 5437625136686112 1.0d0) -108)
- (scale-float (float 8896126577259305 1.0d0) -165)
- (scale-float (float -7927086154208746 1.0d0) -220)
- (scale-float (float -8096798980702208 1.0d0) -275))
+ (renorm-5 (scale-float (float 6937033772410672 1.0d0) -55)
+ (scale-float (float 8240683988726849 1.0d0) -110)
+ (scale-float (float -8616281779497146 1.0d0) -165)
+ (scale-float (float 5493686639335658 1.0d0) -219)
+ (scale-float (float 7922505090433024 1.0d0) -273))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6673425538306912 1.0d0) -52)
- (scale-float (float -6355083395775152 1.0d0) -106)
- (scale-float (float 8453211253049352 1.0d0) -160)
- (scale-float (float -8691832140261531 1.0d0) -222)
- (scale-float (float -5169064211120128 1.0d0) -276))
+ (renorm-5 (scale-float (float 6994367119408617 1.0d0) -55)
+ (scale-float (float -4832167682003882 1.0d0) -110)
+ (scale-float (float 4728849073912540 1.0d0) -171)
+ (scale-float (float 7229445077727664 1.0d0) -227)
+ (scale-float (float 6143325060988928 1.0d0) -281))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6695553317592230 1.0d0) -52)
- (scale-float (float -7099652996876641 1.0d0) -107)
- (scale-float (float -5912312036174398 1.0d0) -161)
- (scale-float (float -6829599742043205 1.0d0) -215)
- (scale-float (float -7999020490719232 1.0d0) -270))
+ (renorm-5 (scale-float (float 7051734623866298 1.0d0) -55)
+ (scale-float (float 6602734696643516 1.0d0) -111)
+ (scale-float (float 7572256171155605 1.0d0) -165)
+ (scale-float (float -5832521577411901 1.0d0) -220)
+ (scale-float (float 5065668173234176 1.0d0) -274))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6717782256305316 1.0d0) -52)
- (scale-float (float 7640675240741809 1.0d0) -106)
- (scale-float (float 9004736994580097 1.0d0) -161)
- (scale-float (float 8048234290283575 1.0d0) -219)
- (scale-float (float -4616011050909696 1.0d0) -273))
+ (renorm-5 (scale-float (float 7109136586542834 1.0d0) -55)
+ (scale-float (float -6636647347540607 1.0d0) -110)
+ (scale-float (float 8117813830610382 1.0d0) -164)
+ (scale-float (float 5654996117808915 1.0d0) -218)
+ (scale-float (float 7781068388909056 1.0d0) -272))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6740113155060833 1.0d0) -52)
- (scale-float (float 5658062833881743 1.0d0) -106)
- (scale-float (float 5176537792598149 1.0d0) -160)
- (scale-float (float 6593049061175946 1.0d0) -214)
- (scale-float (float -8140125752188928 1.0d0) -268))
+ (renorm-5 (scale-float (float 7166573308883288 1.0d0) -55)
+ (scale-float (float 8714537620740422 1.0d0) -113)
+ (scale-float (float 4782399557875443 1.0d0) -167)
+ (scale-float (float -4906181603167593 1.0d0) -222)
+ (scale-float (float 6985796128079872 1.0d0) -277))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6762546822798989 1.0d0) -52)
- (scale-float (float 6542015343501424 1.0d0) -106)
- (scale-float (float 5510453757822690 1.0d0) -165)
- (scale-float (float -8660836269389139 1.0d0) -220)
- (scale-float (float -4521150734925824 1.0d0) -274))
+ (renorm-5 (scale-float (float 7224045093025286 1.0d0) -55)
+ (scale-float (float 7002193656429775 1.0d0) -110)
+ (scale-float (float 6964543791154448 1.0d0) -164)
+ (scale-float (float -7940289474261827 1.0d0) -218)
+ (scale-float (float 4826411323326464 1.0d0) -272))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6785084076894595 1.0d0) -52)
- (scale-float (float -8024134181405234 1.0d0) -107)
- (scale-float (float 5148548049104106 1.0d0) -162)
- (scale-float (float -6278138916873739 1.0d0) -216)
- (scale-float (float -6662350973861888 1.0d0) -270))
+ (renorm-5 (scale-float (float 7281552241805660 1.0d0) -55)
+ (scale-float (float 8980245436623427 1.0d0) -109)
+ (scale-float (float 6183095561836775 1.0d0) -163)
+ (scale-float (float -8016598767501366 1.0d0) -224)
+ (scale-float (float 8808835028353024 1.0d0) -279))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6807725743267832 1.0d0) -52)
- (scale-float (float 6275060935804555 1.0d0) -106)
- (scale-float (float -8635713178261019 1.0d0) -161)
- (scale-float (float -5754998230360339 1.0d0) -218)
- (scale-float (float 7456362891575296 1.0d0) -272))
+ (renorm-5 (scale-float (float 7339095058767125 1.0d0) -55)
+ (scale-float (float 5897632820997376 1.0d0) -109)
+ (scale-float (float 8629091534706665 1.0d0) -163)
+ (scale-float (float 5607425133319746 1.0d0) -217)
+ (scale-float (float 4822937505021952 1.0d0) -272))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6830472656496777 1.0d0) -52)
- (scale-float (float 7158775444717677 1.0d0) -106)
- (scale-float (float 5033196369861081 1.0d0) -160)
- (scale-float (float -4787767046091634 1.0d0) -215)
- (scale-float (float 7492117972484096 1.0d0) -269))
+ (renorm-5 (scale-float (float 7396673848164983 1.0d0) -55)
+ (scale-float (float 8922134058383169 1.0d0) -110)
+ (scale-float (float 5860943883768514 1.0d0) -167)
+ (scale-float (float 6739148691760732 1.0d0) -221)
+ (scale-float (float 7246473065398272 1.0d0) -277))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6853325659931699 1.0d0) -52)
- (scale-float (float -5590101145421790 1.0d0) -106)
- (scale-float (float 6079703184931234 1.0d0) -160)
- (scale-float (float 6859027620564742 1.0d0) -216)
- (scale-float (float 7305674740727808 1.0d0) -272))
+ (renorm-5 (scale-float (float 7454288914973862 1.0d0) -55)
+ (scale-float (float -5534265883516272 1.0d0) -110)
+ (scale-float (float -7599675863546075 1.0d0) -164)
+ (scale-float (float -5880007463065778 1.0d0) -218)
+ (scale-float (float -6842450592268288 1.0d0) -274))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6876285605811173 1.0d0) -52)
- (scale-float (float 5465150212415167 1.0d0) -106)
- (scale-float (float -5110000069201240 1.0d0) -161)
- (scale-float (float -5085577717522676 1.0d0) -218)
- (scale-float (float 8557488985866240 1.0d0) -272))
+ (renorm-5 (scale-float (float 7511940564894482 1.0d0) -55)
+ (scale-float (float -4510530079673467 1.0d0) -109)
+ (scale-float (float -5828955460602770 1.0d0) -164)
+ (scale-float (float 8455097717915642 1.0d0) -219)
+ (scale-float (float -7360031460229120 1.0d0) -274))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6899353355380049 1.0d0) -52)
- (scale-float (float 4838330837729897 1.0d0) -107)
- (scale-float (float -4738094219478219 1.0d0) -161)
- (scale-float (float 6719406853451633 1.0d0) -217)
- (scale-float (float 8861176190861312 1.0d0) -272))
+ (renorm-5 (scale-float (float 7569629104360456 1.0d0) -55)
+ (scale-float (float 5463531378599228 1.0d0) -110)
+ (scale-float (float 7442931652908749 1.0d0) -165)
+ (scale-float (float 8489615287044643 1.0d0) -219)
+ (scale-float (float -7132058411794432 1.0d0) -274))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6922529779009289 1.0d0) -52)
- (scale-float (float 7843821730419908 1.0d0) -106)
- (scale-float (float 5823970951752681 1.0d0) -160)
- (scale-float (float -8186736237649020 1.0d0) -215)
- (scale-float (float -7865276087861248 1.0d0) -271))
+ (renorm-5 (scale-float (float 7627354840545122 1.0d0) -55)
+ (scale-float (float 6830776078420744 1.0d0) -110)
+ (scale-float (float -6599513078449499 1.0d0) -166)
+ (scale-float (float -7088737710654194 1.0d0) -221)
+ (scale-float (float 6251897204244480 1.0d0) -277))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6945815756317735 1.0d0) -52)
- (scale-float (float -8579755896278066 1.0d0) -106)
- (scale-float (float 7288315308749691 1.0d0) -163)
- (scale-float (float 8365316799719055 1.0d0) -217)
- (scale-float (float -7721116629467136 1.0d0) -273))
+ (renorm-5 (scale-float (float 7685118081368404 1.0d0) -55)
+ (scale-float (float 8985004028767087 1.0d0) -109)
+ (scale-float (float -4808541751657683 1.0d0) -163)
+ (scale-float (float -5519928814936255 1.0d0) -218)
+ (scale-float (float -8319844358717440 1.0d0) -273))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6969212176295817 1.0d0) -52)
- (scale-float (float -8315922210808482 1.0d0) -106)
- (scale-float (float -5702883920033279 1.0d0) -160)
- (scale-float (float -7686770830327470 1.0d0) -214)
- (scale-float (float 7472762215374848 1.0d0) -268))
+ (renorm-5 (scale-float (float 7742919135503711 1.0d0) -55)
+ (scale-float (float 5182401773456419 1.0d0) -109)
+ (scale-float (float -6036935714297580 1.0d0) -163)
+ (scale-float (float 6598306630202497 1.0d0) -218)
+ (scale-float (float 7689169814470656 1.0d0) -272))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6992719937431264 1.0d0) -52)
- (scale-float (float -6914293524384001 1.0d0) -108)
- (scale-float (float -5867244076282738 1.0d0) -162)
- (scale-float (float 7696698117705235 1.0d0) -216)
- (scale-float (float -8220053476999168 1.0d0) -271))
+ (renorm-5 (scale-float (float 7800758312384863 1.0d0) -55)
+ (scale-float (float 4930813786379107 1.0d0) -109)
+ (scale-float (float 7750504761624279 1.0d0) -164)
+ (scale-float (float -5247586008127933 1.0d0) -219)
+ (scale-float (float 7577988707778560 1.0d0) -273))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7016339947836833 1.0d0) -52)
- (scale-float (float -8450020054804773 1.0d0) -109)
- (scale-float (float -6919436099493397 1.0d0) -164)
- (scale-float (float 5290185985792271 1.0d0) -218)
- (scale-float (float -6108474780024832 1.0d0) -272))
+ (renorm-5 (scale-float (float 7858635922213056 1.0d0) -55)
+ (scale-float (float -6376094486028435 1.0d0) -110)
+ (scale-float (float 7666507855896739 1.0d0) -164)
+ (scale-float (float 5717893804250778 1.0d0) -220)
+ (scale-float (float 6492539317911552 1.0d0) -275))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7040073125380105 1.0d0) -52)
- (scale-float (float -4550651818919722 1.0d0) -107)
- (scale-float (float 6679243867380362 1.0d0) -162)
- (scale-float (float 4912056610678102 1.0d0) -216)
- (scale-float (float 4750189385154560 1.0d0) -270))
+ (renorm-5 (scale-float (float 7916552275963855 1.0d0) -55)
+ (scale-float (float -6470851910821482 1.0d0) -109)
+ (scale-float (float -8121047700460262 1.0d0) -163)
+ (scale-float (float 4777450552030372 1.0d0) -219)
+ (scale-float (float -6416869306138624 1.0d0) -274))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7063920397815387 1.0d0) -52)
- (scale-float (float 5523738978247978 1.0d0) -106)
- (scale-float (float -7126224356225534 1.0d0) -160)
- (scale-float (float -6524323916222883 1.0d0) -214)
- (scale-float (float -5885479783497728 1.0d0) -269))
+ (renorm-5 (scale-float (float 7974507685394225 1.0d0) -55)
+ (scale-float (float 6493895228358546 1.0d0) -109)
+ (scale-float (float -7438974047349112 1.0d0) -164)
+ (scale-float (float -8200925466363753 1.0d0) -218)
+ (scale-float (float 6506186355703808 1.0d0) -273))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7087882702917760 1.0d0) -52)
- (scale-float (float 7475770277114994 1.0d0) -108)
- (scale-float (float -7704651318171570 1.0d0) -163)
- (scale-float (float -7609353640231345 1.0d0) -217)
- (scale-float (float 5202114242281472 1.0d0) -271))
+ (renorm-5 (scale-float (float 8032502463049597 1.0d0) -55)
+ (scale-float (float 6907154930094209 1.0d0) -109)
+ (scale-float (float -5342807368173606 1.0d0) -165)
+ (scale-float (float 5089095618658254 1.0d0) -224)
+ (scale-float (float -5918269059891200 1.0d0) -278))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7111960988619306 1.0d0) -52)
- (scale-float (float 8105525534785960 1.0d0) -106)
- (scale-float (float -6185671794388809 1.0d0) -160)
- (scale-float (float 7093706143124601 1.0d0) -215)
- (scale-float (float 5099017510748160 1.0d0) -269))
+ (renorm-5 (scale-float (float 8090536922270962 1.0d0) -55)
+ (scale-float (float 5811735848428788 1.0d0) -109)
+ (scale-float (float -8491959107345443 1.0d0) -163)
+ (scale-float (float 8581984814799862 1.0d0) -217)
+ (scale-float (float 7808598289006592 1.0d0) -272))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7136156213147571 1.0d0) -52)
- (scale-float (float -7818466985562942 1.0d0) -107)
- (scale-float (float -8196325047558754 1.0d0) -161)
- (scale-float (float 7327501339175382 1.0d0) -215)
- (scale-float (float 7270013848780800 1.0d0) -269))
+ (renorm-5 (scale-float (float 8148611377202007 1.0d0) -55)
+ (scale-float (float 7337690669143183 1.0d0) -109)
+ (scale-float (float -7988618593069985 1.0d0) -163)
+ (scale-float (float -6341858574449737 1.0d0) -222)
+ (scale-float (float -5614155528142848 1.0d0) -277))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7160469345166286 1.0d0) -52)
- (scale-float (float 6660981521680870 1.0d0) -107)
- (scale-float (float 8981189081472347 1.0d0) -163)
- (scale-float (float 8530922126423510 1.0d0) -217)
- (scale-float (float 4654045647994880 1.0d0) -271))
+ (renorm-5 (scale-float (float 8206726142796284 1.0d0) -55)
+ (scale-float (float 7484712771178970 1.0d0) -110)
+ (scale-float (float 4758186941620262 1.0d0) -166)
+ (scale-float (float -5279832774698596 1.0d0) -224)
+ (scale-float (float 5740846662025216 1.0d0) -281))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7184901363918415 1.0d0) -52)
- (scale-float (float -8714320796204334 1.0d0) -107)
- (scale-float (float 6929090388678396 1.0d0) -163)
- (scale-float (float 8774061564943841 1.0d0) -219)
- (scale-float (float -5660133128929280 1.0d0) -274))
+ (renorm-5 (scale-float (float 8264881534824413 1.0d0) -55)
+ (scale-float (float 6014350472706808 1.0d0) -112)
+ (scale-float (float 6384986308908024 1.0d0) -166)
+ (scale-float (float 5441212634871738 1.0d0) -221)
+ (scale-float (float 7042630377406464 1.0d0) -275))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7209453259371545 1.0d0) -52)
- (scale-float (float 8444759199683197 1.0d0) -106)
- (scale-float (float -5106966562560949 1.0d0) -160)
- (scale-float (float -6469344206533755 1.0d0) -214)
- (scale-float (float -7324907678924800 1.0d0) -269))
+ (renorm-5 (scale-float (float 8323077869881323 1.0d0) -55)
+ (scale-float (float 7716876308190961 1.0d0) -109)
+ (scale-float (float -8848505200423454 1.0d0) -163)
+ (scale-float (float -6612535561287589 1.0d0) -217)
+ (scale-float (float -7158332374417408 1.0d0) -272))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7234126032365695 1.0d0) -52)
- (scale-float (float -5905602391740602 1.0d0) -108)
- (scale-float (float -6357685931096535 1.0d0) -162)
- (scale-float (float -8561037202104213 1.0d0) -217)
- (scale-float (float 7885071340011520 1.0d0) -271))
+ (renorm-5 (scale-float (float 8381315465393531 1.0d0) -55)
+ (scale-float (float -6358807453286942 1.0d0) -112)
+ (scale-float (float 5782188539544783 1.0d0) -172)
+ (scale-float (float 5455174163373367 1.0d0) -229)
+ (scale-float (float -5587693496958976 1.0d0) -283))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7258920694763558 1.0d0) -52)
- (scale-float (float -8837989029989582 1.0d0) -106)
- (scale-float (float -7733550203613935 1.0d0) -160)
- (scale-float (float -6331548833860318 1.0d0) -214)
- (scale-float (float -6788960204709888 1.0d0) -268))
+ (renorm-5 (scale-float (float 8439594639626451 1.0d0) -55)
+ (scale-float (float -4737446417511680 1.0d0) -111)
+ (scale-float (float -8394721963901726 1.0d0) -165)
+ (scale-float (float 6105834803743561 1.0d0) -220)
+ (scale-float (float -4605459617021952 1.0d0) -281))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7283838269603253 1.0d0) -52)
- (scale-float (float -8872870132223229 1.0d0) -106)
- (scale-float (float -6009880889763839 1.0d0) -160)
- (scale-float (float 4825738412059365 1.0d0) -215)
- (scale-float (float 4589757610934272 1.0d0) -269))
+ (renorm-5 (scale-float (float 8497915711691749 1.0d0) -55)
+ (scale-float (float 7419391130086974 1.0d0) -110)
+ (scale-float (float -6486478369933276 1.0d0) -164)
+ (scale-float (float -4556550088056046 1.0d0) -221)
+ (scale-float (float -7709509161320448 1.0d0) -275))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7308879791253617 1.0d0) -52)
- (scale-float (float -8274578270836648 1.0d0) -106)
- (scale-float (float 6182491319721802 1.0d0) -160)
- (scale-float (float 5685546970461737 1.0d0) -219)
- (scale-float (float 8240459038064640 1.0d0) -277))
+ (renorm-5 (scale-float (float 8556279001554730 1.0d0) -55)
+ (scale-float (float 8834989484988432 1.0d0) -109)
+ (scale-float (float -6904453082549534 1.0d0) -163)
+ (scale-float (float -8929923407877519 1.0d0) -220)
+ (scale-float (float 6037335879712768 1.0d0) -275))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7334046305572091 1.0d0) -52)
- (scale-float (float 6538631887819978 1.0d0) -107)
- (scale-float (float 5074582270124995 1.0d0) -163)
- (scale-float (float -7399242229208454 1.0d0) -217)
- (scale-float (float 8719309077479424 1.0d0) -275))
+ (renorm-5 (scale-float (float 8614684830041765 1.0d0) -55)
+ (scale-float (float -6444318670433754 1.0d0) -109)
+ (scale-float (float -5794766695399649 1.0d0) -163)
+ (scale-float (float -7996152427272018 1.0d0) -220)
+ (scale-float (float -6974106972848128 1.0d0) -275))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7359338870065256 1.0d0) -52)
- (scale-float (float 6253263043292830 1.0d0) -106)
- (scale-float (float 8701508368181859 1.0d0) -160)
- (scale-float (float -7925731726653277 1.0d0) -216)
- (scale-float (float -4983790590722048 1.0d0) -270))
+ (renorm-5 (scale-float (float 8673133518847751 1.0d0) -55)
+ (scale-float (float 7342192056255074 1.0d0) -110)
+ (scale-float (float -8710376291718960 1.0d0) -164)
+ (scale-float (float -7330547468867136 1.0d0) -218)
+ (scale-float (float -7410057208791040 1.0d0) -272))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7384758554052061 1.0d0) -52)
- (scale-float (float 7222435099407230 1.0d0) -106)
- (scale-float (float -7026468917474546 1.0d0) -161)
- (scale-float (float -8700465992504918 1.0d0) -217)
- (scale-float (float -8377219604807680 1.0d0) -275))
+ (renorm-5 (scale-float (float 8731625390543623 1.0d0) -55)
+ (scale-float (float -6515227151142448 1.0d0) -109)
+ (scale-float (float -8228645499151671 1.0d0) -168)
+ (scale-float (float -8354259906275142 1.0d0) -224)
+ (scale-float (float 4507582171447296 1.0d0) -279))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7410306438829807 1.0d0) -52)
- (scale-float (float 4880848817813136 1.0d0) -117)
- (scale-float (float 7350430596561503 1.0d0) -171)
- (scale-float (float -6834991603195178 1.0d0) -225)
- (scale-float (float -6508972068569088 1.0d0) -282))
+ (renorm-5 (scale-float (float 8790160768583887 1.0d0) -55)
+ (scale-float (float -6639737539678400 1.0d0) -109)
+ (scale-float (float 5807702150068111 1.0d0) -163)
+ (scale-float (float -6971441697391849 1.0d0) -218)
+ (scale-float (float -6399430273630208 1.0d0) -273))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7435983617842932 1.0d0) -52)
- (scale-float (float -4936633312102464 1.0d0) -108)
- (scale-float (float -4586532790720996 1.0d0) -164)
- (scale-float (float -5995662022739528 1.0d0) -219)
- (scale-float (float -6122781272440832 1.0d0) -274))
+ (renorm-5 (scale-float (float 8848739977314208 1.0d0) -55)
+ (scale-float (float -5361335681334369 1.0d0) -110)
+ (scale-float (float 4662389135718374 1.0d0) -164)
+ (scale-float (float -6628223388109715 1.0d0) -220)
+ (scale-float (float -5660384324943872 1.0d0) -274))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7461791196854660 1.0d0) -52)
- (scale-float (float 7235481383616237 1.0d0) -106)
- (scale-float (float 6487567776731441 1.0d0) -161)
- (scale-float (float -5606196606941048 1.0d0) -215)
- (scale-float (float 7836165487624192 1.0d0) -269))
+ (renorm-5 (scale-float (float 8907363341979030 1.0d0) -55)
+ (scale-float (float -7885202077638681 1.0d0) -109)
+ (scale-float (float -4920087825332628 1.0d0) -163)
+ (scale-float (float 6730415028849300 1.0d0) -217)
+ (scale-float (float -7025253338562560 1.0d0) -272))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7487730294121567 1.0d0) -52)
- (scale-float (float -8889820063948728 1.0d0) -106)
- (scale-float (float -6530263170751758 1.0d0) -160)
- (scale-float (float 7225013578430047 1.0d0) -214)
- (scale-float (float 7944683267145728 1.0d0) -268))
+ (renorm-5 (scale-float (float 8966031188729235 1.0d0) -55)
+ (scale-float (float 8834739940364126 1.0d0) -109)
+ (scale-float (float 6589986099054557 1.0d0) -163)
+ (scale-float (float 7454927126581803 1.0d0) -218)
+ (scale-float (float -8652212748763136 1.0d0) -272))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7513802040571114 1.0d0) -52)
- (scale-float (float -7722658158794595 1.0d0) -108)
- (scale-float (float 5815132029301593 1.0d0) -166)
- (scale-float (float -6928708525599455 1.0d0) -220)
- (scale-float (float 7704045701562368 1.0d0) -274))
+ (renorm-5 (scale-float (float 4512371922314926 1.0d0) -54)
+ (scale-float (float 6094415848847015 1.0d0) -109)
+ (scale-float (float 5241322971970717 1.0d0) -164)
+ (scale-float (float -5121031000799317 1.0d0) -219)
+ (scale-float (float -6445919928451072 1.0d0) -273))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7540007579982230 1.0d0) -52)
- (scale-float (float -7569212622669446 1.0d0) -109)
- (scale-float (float 8460517646045379 1.0d0) -169)
- (scale-float (float -8599298522205394 1.0d0) -223)
- (scale-float (float -4531637106769920 1.0d0) -277))
+ (renorm-5 (scale-float (float 4541750818833897 1.0d0) -54)
+ (scale-float (float -5797423195745767 1.0d0) -108)
+ (scale-float (float 7446301587479589 1.0d0) -163)
+ (scale-float (float -5920054400259469 1.0d0) -221)
+ (scale-float (float -6269948519251968 1.0d0) -275))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7566348069168975 1.0d0) -52)
- (scale-float (float 7434517115760676 1.0d0) -107)
- (scale-float (float 7476909206662982 1.0d0) -161)
- (scale-float (float -7912632647859737 1.0d0) -216)
- (scale-float (float -8200515293413376 1.0d0) -272))
+ (renorm-5 (scale-float (float 4571152448379822 1.0d0) -54)
+ (scale-float (float -5625570255588913 1.0d0) -108)
+ (scale-float (float 7219257663238561 1.0d0) -162)
+ (scale-float (float 5223543510538164 1.0d0) -217)
+ (scale-float (float 7698724515217408 1.0d0) -271))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7592824678167370 1.0d0) -52)
- (scale-float (float 4726388825644092 1.0d0) -108)
- (scale-float (float 7734927965263806 1.0d0) -163)
- (scale-float (float 6773912128020125 1.0d0) -218)
- (scale-float (float 5041169150246912 1.0d0) -272))
+ (renorm-5 (scale-float (float 4600576975879743 1.0d0) -54)
+ (scale-float (float -5194091547317777 1.0d0) -109)
+ (scale-float (float 8249610839084712 1.0d0) -165)
+ (scale-float (float 7072510250153134 1.0d0) -220)
+ (scale-float (float -5191509610594304 1.0d0) -276))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7619438590425442 1.0d0) -52)
- (scale-float (float 5503995361504686 1.0d0) -106)
- (scale-float (float 7473486702684451 1.0d0) -164)
- (scale-float (float -6608415174617732 1.0d0) -218)
- (scale-float (float -7507524966678528 1.0d0) -272))
+ (renorm-5 (scale-float (float 4630024566733386 1.0d0) -54)
+ (scale-float (float -5791983535953253 1.0d0) -108)
+ (scale-float (float 5414210622429235 1.0d0) -162)
+ (scale-float (float 6848444124821025 1.0d0) -216)
+ (scale-float (float 8680263789420544 1.0d0) -270))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7646191002996560 1.0d0) -52)
- (scale-float (float 7233696640180094 1.0d0) -106)
- (scale-float (float -7424525764075406 1.0d0) -160)
- (scale-float (float -7087988465701772 1.0d0) -218)
- (scale-float (float -8532617565569024 1.0d0) -273))
+ (renorm-5 (scale-float (float 4659495386817115 1.0d0) -54)
+ (scale-float (float 7855398709617036 1.0d0) -108)
+ (scale-float (float 5235129028043004 1.0d0) -163)
+ (scale-float (float 5095606684970886 1.0d0) -218)
+ (scale-float (float 8216669919084544 1.0d0) -272))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7673083126736119 1.0d0) -52)
- (scale-float (float 7102258468555939 1.0d0) -108)
- (scale-float (float 5559350604454066 1.0d0) -162)
- (scale-float (float -4819800819068898 1.0d0) -217)
- (scale-float (float -7454359290642432 1.0d0) -271))
+ (renorm-5 (scale-float (float 4688989602487915 1.0d0) -54)
+ (scale-float (float -5377641559708678 1.0d0) -108)
+ (scale-float (float 7394066903993584 1.0d0) -168)
+ (scale-float (float -8480567685467516 1.0d0) -222)
+ (scale-float (float 6931801827704832 1.0d0) -276))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7700116186501645 1.0d0) -52)
- (scale-float (float 4814654823599867 1.0d0) -106)
- (scale-float (float -5312182834629036 1.0d0) -162)
- (scale-float (float 5021497915287775 1.0d0) -216)
- (scale-float (float 7232810079191040 1.0d0) -270))
+ (renorm-5 (scale-float (float 4718507380587383 1.0d0) -54)
+ (scale-float (float -6818224481140156 1.0d0) -108)
+ (scale-float (float 6139074941087105 1.0d0) -163)
+ (scale-float (float -6287394042137960 1.0d0) -218)
+ (scale-float (float 4825403320991744 1.0d0) -272))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7727291421356394 1.0d0) -52)
- (scale-float (float -6448209946056877 1.0d0) -106)
- (scale-float (float -8056123697790814 1.0d0) -160)
- (scale-float (float 8864501968791276 1.0d0) -214)
- (scale-float (float 6523215591964672 1.0d0) -268))
+ (renorm-5 (scale-float (float 4748048888445756 1.0d0) -54)
+ (scale-float (float 6671135438521520 1.0d0) -109)
+ (scale-float (float -8432447782992624 1.0d0) -164)
+ (scale-float (float 7534672896201344 1.0d0) -218)
+ (scale-float (float 7438896541466624 1.0d0) -276))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7754610084776504 1.0d0) -52)
- (scale-float (float -6055282469355262 1.0d0) -106)
- (scale-float (float -8535442044858421 1.0d0) -160)
- (scale-float (float 4932484634552268 1.0d0) -214)
- (scale-float (float 4854282506149888 1.0d0) -268))
+ (renorm-5 (scale-float (float 4777614293885954 1.0d0) -54)
+ (scale-float (float -5505918640551912 1.0d0) -108)
+ (scale-float (float 7233084325496090 1.0d0) -162)
+ (scale-float (float -4669191484899807 1.0d0) -219)
+ (scale-float (float 7707921153523712 1.0d0) -277))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7782073444861790 1.0d0) -52)
- (scale-float (float 5715688236164071 1.0d0) -106)
- (scale-float (float -7790646907288377 1.0d0) -160)
- (scale-float (float 8613967927072865 1.0d0) -218)
- (scale-float (float -5106176465829888 1.0d0) -274))
+ (renorm-5 (scale-float (float 4807203765227641 1.0d0) -54)
+ (scale-float (float -6229730022744001 1.0d0) -108)
+ (scale-float (float 5547093377552047 1.0d0) -163)
+ (scale-float (float -6133593763606207 1.0d0) -217)
+ (scale-float (float -7928192135364608 1.0d0) -271))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7809682784550244 1.0d0) -52)
- (scale-float (float -7905805098743459 1.0d0) -106)
- (scale-float (float -5542054708964861 1.0d0) -163)
- (scale-float (float -7392439062693147 1.0d0) -217)
- (scale-float (float 5914933245247488 1.0d0) -271))
+ (renorm-5 (scale-float (float 4836817471291318 1.0d0) -54)
+ (scale-float (float 5431529900780902 1.0d0) -108)
+ (scale-float (float 6298041380981058 1.0d0) -162)
+ (scale-float (float 7689531001793826 1.0d0) -216)
+ (scale-float (float -6386590265720832 1.0d0) -270))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7837439401836313 1.0d0) -52)
- (scale-float (float -5274620473453587 1.0d0) -106)
- (scale-float (float 5309487360663029 1.0d0) -160)
- (scale-float (float -6846544814492423 1.0d0) -215)
- (scale-float (float 6364497217683456 1.0d0) -269))
+ (renorm-5 (scale-float (float 4866455581402435 1.0d0) -54)
+ (scale-float (float -8087327352517896 1.0d0) -114)
+ (scale-float (float -7368169183518002 1.0d0) -169)
+ (scale-float (float 8452265808518809 1.0d0) -223)
+ (scale-float (float -5167074080980992 1.0d0) -278))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7865344609993054 1.0d0) -52)
- (scale-float (float -6960432712494099 1.0d0) -108)
- (scale-float (float -5261651726650240 1.0d0) -162)
- (scale-float (float 4570340060721171 1.0d0) -217)
- (scale-float (float -6625465896271872 1.0d0) -274))
+ (renorm-5 (scale-float (float 4896118265395521 1.0d0) -54)
+ (scale-float (float -5858372132977222 1.0d0) -108)
+ (scale-float (float 4733665516272146 1.0d0) -163)
+ (scale-float (float 6362851693766871 1.0d0) -217)
+ (scale-float (float 5305077032026112 1.0d0) -280))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7893399737798221 1.0d0) -52)
- (scale-float (float -4901543619596787 1.0d0) -106)
- (scale-float (float 5003921559019641 1.0d0) -162)
- (scale-float (float -5775690738734107 1.0d0) -216)
- (scale-float (float 4923849420832768 1.0d0) -273))
+ (renorm-5 (scale-float (float 4925805693618345 1.0d0) -54)
+ (scale-float (float -6145492754901482 1.0d0) -108)
+ (scale-float (float -7952803796369268 1.0d0) -162)
+ (scale-float (float -7703681047106349 1.0d0) -217)
+ (scale-float (float 8902810366115840 1.0d0) -274))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7921606129764380 1.0d0) -52)
- (scale-float (float -7224066045360451 1.0d0) -107)
- (scale-float (float 7179631466264596 1.0d0) -161)
- (scale-float (float 7722685805907788 1.0d0) -215)
- (scale-float (float -5336729861619712 1.0d0) -272))
+ (renorm-5 (scale-float (float 4955518036936097 1.0d0) -54)
+ (scale-float (float -4919569790715614 1.0d0) -110)
+ (scale-float (float 6027960577342663 1.0d0) -164)
+ (scale-float (float -8847907680015868 1.0d0) -218)
+ (scale-float (float -5787839612682240 1.0d0) -272))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7949965146373135 1.0d0) -52)
- (scale-float (float 4683450739878459 1.0d0) -106)
- (scale-float (float 5872464728488067 1.0d0) -160)
- (scale-float (float -7423411352728631 1.0d0) -217)
- (scale-float (float -6852393463840768 1.0d0) -271))
+ (renorm-5 (scale-float (float 4985255466735593 1.0d0) -54)
+ (scale-float (float 8089815550941344 1.0d0) -109)
+ (scale-float (float 7890943098200302 1.0d0) -163)
+ (scale-float (float 7870595316283973 1.0d0) -217)
+ (scale-float (float 4922290895634432 1.0d0) -271))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7978478164313548 1.0d0) -52)
- (scale-float (float -7539536548766330 1.0d0) -111)
- (scale-float (float -6959083601008122 1.0d0) -165)
- (scale-float (float 5147026058692382 1.0d0) -220)
- (scale-float (float -6838176295419904 1.0d0) -279))
+ (renorm-5 (scale-float (float 5015018154929504 1.0d0) -54)
+ (scale-float (float 5343521222344705 1.0d0) -110)
+ (scale-float (float 5867787354045478 1.0d0) -165)
+ (scale-float (float 4514916001696819 1.0d0) -219)
+ (scale-float (float -8573133113131008 1.0d0) -273))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8007146576724837 1.0d0) -52)
- (scale-float (float 8125689861568848 1.0d0) -106)
- (scale-float (float -4966592922510836 1.0d0) -163)
- (scale-float (float 8879542236482956 1.0d0) -217)
- (scale-float (float 5290559168249856 1.0d0) -271))
+ (renorm-5 (scale-float (float 5044806273960608 1.0d0) -54)
+ (scale-float (float 7764102156759821 1.0d0) -110)
+ (scale-float (float -7786064467293972 1.0d0) -165)
+ (scale-float (float -7886026003467305 1.0d0) -219)
+ (scale-float (float -4967375467315200 1.0d0) -274))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8035971793443456 1.0d0) -52)
- (scale-float (float 8846151859554218 1.0d0) -107)
- (scale-float (float -7097686501320745 1.0d0) -161)
- (scale-float (float -5772481724941971 1.0d0) -215)
- (scale-float (float 5504987843428352 1.0d0) -269))
+ (renorm-5 (scale-float (float 5074619996806070 1.0d0) -54)
+ (scale-float (float -7751186127428779 1.0d0) -109)
+ (scale-float (float -7146010290927952 1.0d0) -163)
+ (scale-float (float 6675897418535962 1.0d0) -217)
+ (scale-float (float -8420051655786496 1.0d0) -273))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8064955241254629 1.0d0) -52)
- (scale-float (float 8692289481797304 1.0d0) -106)
- (scale-float (float 5018213851800480 1.0d0) -161)
- (scale-float (float 8465232655080171 1.0d0) -216)
- (scale-float (float 5734681667731456 1.0d0) -270))
+ (renorm-5 (scale-float (float 5104459496981742 1.0d0) -54)
+ (scale-float (float -6010706914106587 1.0d0) -109)
+ (scale-float (float -7628409076726424 1.0d0) -163)
+ (scale-float (float -6357395433631287 1.0d0) -218)
+ (scale-float (float 8299826839945216 1.0d0) -274))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8094098364148453 1.0d0) -52)
- (scale-float (float 8683774843736916 1.0d0) -106)
- (scale-float (float 6458428269031229 1.0d0) -162)
- (scale-float (float 7868818629128906 1.0d0) -217)
- (scale-float (float 7074941657939968 1.0d0) -273))
+ (renorm-5 (scale-float (float 5134324948546493 1.0d0) -54)
+ (scale-float (float -6916953015471680 1.0d0) -108)
+ (scale-float (float 7167355886226005 1.0d0) -166)
+ (scale-float (float -8859515625169292 1.0d0) -223)
+ (scale-float (float -4529739804966912 1.0d0) -278))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8123402623580650 1.0d0) -52)
- (scale-float (float 8394666525519859 1.0d0) -106)
- (scale-float (float -8227700072422655 1.0d0) -161)
- (scale-float (float -8526292033163607 1.0d0) -216)
- (scale-float (float -6468556363726848 1.0d0) -270))
+ (renorm-5 (scale-float (float 5164216526106559 1.0d0) -54)
+ (scale-float (float -5907726073191727 1.0d0) -108)
+ (scale-float (float -7161790682323884 1.0d0) -165)
+ (scale-float (float -5380442781818173 1.0d0) -221)
+ (scale-float (float -7899266890072064 1.0d0) -275))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8152869498738078 1.0d0) -52)
- (scale-float (float 5812179079396220 1.0d0) -106)
- (scale-float (float -7676014650498385 1.0d0) -161)
- (scale-float (float -5603679704578218 1.0d0) -215)
- (scale-float (float 5669344107839488 1.0d0) -269))
+ (renorm-5 (scale-float (float 5194134404819923 1.0d0) -54)
+ (scale-float (float -5964216022171304 1.0d0) -108)
+ (scale-float (float -7665535065418988 1.0d0) -163)
+ (scale-float (float 7605865686912239 1.0d0) -217)
+ (scale-float (float 7316831097421824 1.0d0) -272))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8182500486809097 1.0d0) -52)
- (scale-float (float -5557009219055588 1.0d0) -108)
- (scale-float (float -4640331853462786 1.0d0) -162)
- (scale-float (float -8143557958925724 1.0d0) -217)
- (scale-float (float 5579415019847680 1.0d0) -273))
+ (renorm-5 (scale-float (float 5224078760400717 1.0d0) -54)
+ (scale-float (float 4560087958102505 1.0d0) -112)
+ (scale-float (float 5886848888205149 1.0d0) -166)
+ (scale-float (float 8309156517618128 1.0d0) -220)
+ (scale-float (float -5324992313819136 1.0d0) -275))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8212297103258895 1.0d0) -52)
- (scale-float (float -6877329639592607 1.0d0) -109)
- (scale-float (float -8422443193077326 1.0d0) -163)
- (scale-float (float 6129537386443126 1.0d0) -219)
- (scale-float (float 4818167232200704 1.0d0) -273))
+ (renorm-5 (scale-float (float 5254049769123653 1.0d0) -54)
+ (scale-float (float 6863384480765018 1.0d0) -108)
+ (scale-float (float 4679312891588944 1.0d0) -162)
+ (scale-float (float 7532120129297727 1.0d0) -216)
+ (scale-float (float 7565695657197568 1.0d0) -270))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8242260882109884 1.0d0) -52)
- (scale-float (float -8138600312309569 1.0d0) -107)
- (scale-float (float -5601830974017904 1.0d0) -161)
- (scale-float (float -8958193669964181 1.0d0) -216)
- (scale-float (float 5925345600241664 1.0d0) -270))
+ (renorm-5 (scale-float (float 5284047607828478 1.0d0) -54)
+ (scale-float (float 6537710083588337 1.0d0) -108)
+ (scale-float (float -5265208786779314 1.0d0) -162)
+ (scale-float (float 7965661672930252 1.0d0) -218)
+ (scale-float (float 7750394843496448 1.0d0) -274))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8272393376227267 1.0d0) -52)
- (scale-float (float 8298148560658028 1.0d0) -106)
- (scale-float (float 8508603678331331 1.0d0) -162)
- (scale-float (float -8486309418804537 1.0d0) -217)
- (scale-float (float -5147654831407104 1.0d0) -271))
+ (renorm-5 (scale-float (float 5314072453924456 1.0d0) -54)
+ (scale-float (float -7819090497685694 1.0d0) -108)
+ (scale-float (float 8331672122895500 1.0d0) -165)
+ (scale-float (float 7057899603031006 1.0d0) -219)
+ (scale-float (float 5712657984323584 1.0d0) -273))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8302696157609901 1.0d0) -52)
- (scale-float (float -6320469433768359 1.0d0) -107)
- (scale-float (float -5076438843848382 1.0d0) -162)
- (scale-float (float 8903418434077401 1.0d0) -216)
- (scale-float (float 8950448579018752 1.0d0) -271))
+ (renorm-5 (scale-float (float 5344124485394874 1.0d0) -54)
+ (scale-float (float 6006304204154579 1.0d0) -108)
+ (scale-float (float -7367237253163575 1.0d0) -162)
+ (scale-float (float 8583406004471291 1.0d0) -220)
+ (scale-float (float -5138008364810240 1.0d0) -277))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8333170817686550 1.0d0) -52)
- (scale-float (float 7546292343864592 1.0d0) -109)
- (scale-float (float -7800709243750414 1.0d0) -163)
- (scale-float (float 6598422720804850 1.0d0) -218)
- (scale-float (float 8807538521407488 1.0d0) -272))
+ (renorm-5 (scale-float (float 5374203880801585 1.0d0) -54)
+ (scale-float (float 7082807698146316 1.0d0) -108)
+ (scale-float (float 5431708439327186 1.0d0) -164)
+ (scale-float (float -5638738396141387 1.0d0) -219)
+ (scale-float (float -4570103151656960 1.0d0) -273))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8363818967617673 1.0d0) -52)
- (scale-float (float 6997754063386601 1.0d0) -106)
- (scale-float (float -8565628394307231 1.0d0) -160)
- (scale-float (float -8439939564592947 1.0d0) -214)
- (scale-float (float -7616844314025984 1.0d0) -268))
+ (renorm-5 (scale-float (float 5404310819289564 1.0d0) -54)
+ (scale-float (float -5886387432625778 1.0d0) -108)
+ (scale-float (float 7599531358932904 1.0d0) -164)
+ (scale-float (float -8884544676028892 1.0d0) -220)
+ (scale-float (float 8802287441412096 1.0d0) -275))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8394642238602842 1.0d0) -52)
- (scale-float (float 8878950056850851 1.0d0) -107)
- (scale-float (float 8723213175988695 1.0d0) -161)
- (scale-float (float -8327860237491630 1.0d0) -216)
- (scale-float (float 4980946269896704 1.0d0) -270))
+ (renorm-5 (scale-float (float 5434445480591499 1.0d0) -54)
+ (scale-float (float -8160630678973751 1.0d0) -108)
+ (scale-float (float -8952666462980655 1.0d0) -164)
+ (scale-float (float 8107005340255611 1.0d0) -218)
+ (scale-float (float -7691253319925760 1.0d0) -272))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8425642282193926 1.0d0) -52)
- (scale-float (float 4779845309893006 1.0d0) -107)
- (scale-float (float -6757676580943280 1.0d0) -161)
- (scale-float (float 8425855058608660 1.0d0) -215)
- (scale-float (float 4974898380816384 1.0d0) -269))
+ (renorm-5 (scale-float (float 5464608045032412 1.0d0) -54)
+ (scale-float (float -8286250809013992 1.0d0) -109)
+ (scale-float (float 6759604652366405 1.0d0) -163)
+ (scale-float (float 6722257583934538 1.0d0) -220)
+ (scale-float (float -5086630926876672 1.0d0) -275))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8456820770614168 1.0d0) -52)
- (scale-float (float -4972489650285567 1.0d0) -107)
- (scale-float (float -4769531766660469 1.0d0) -163)
- (scale-float (float -8001510013778334 1.0d0) -217)
- (scale-float (float 4717884663398400 1.0d0) -271))
+ (renorm-5 (scale-float (float 5494798693534303 1.0d0) -54)
+ (scale-float (float 6714812821611110 1.0d0) -108)
+ (scale-float (float 7693551393041517 1.0d0) -165)
+ (scale-float (float 4640121243443789 1.0d0) -219)
+ (scale-float (float 4944327467859968 1.0d0) -276))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8488179397083279 1.0d0) -52)
- (scale-float (float -4912112564810610 1.0d0) -106)
- (scale-float (float 7942805665757040 1.0d0) -160)
- (scale-float (float 8811895955504207 1.0d0) -214)
- (scale-float (float 8675264099876864 1.0d0) -270))
+ (renorm-5 (scale-float (float 5525017607620826 1.0d0) -54)
+ (scale-float (float -8080142529166553 1.0d0) -109)
+ (scale-float (float 8579210614091512 1.0d0) -163)
+ (scale-float (float 5260133494884443 1.0d0) -217)
+ (scale-float (float 5582301427924992 1.0d0) -271))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8519719876148687 1.0d0) -52)
- (scale-float (float -7982099506647040 1.0d0) -106)
- (scale-float (float -8841418358411833 1.0d0) -160)
- (scale-float (float 6904205857327128 1.0d0) -214)
- (scale-float (float 8443528115421184 1.0d0) -270))
+ (renorm-5 (scale-float (float 5555264969421986 1.0d0) -54)
+ (scale-float (float 7137673117952044 1.0d0) -108)
+ (scale-float (float 5075308634056774 1.0d0) -162)
+ (scale-float (float -6076460270908767 1.0d0) -216)
+ (scale-float (float 8913840331456512 1.0d0) -270))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8551443944023073 1.0d0) -52)
- (scale-float (float -5997882268187211 1.0d0) -109)
- (scale-float (float -8496346745753890 1.0d0) -163)
- (scale-float (float -4894421872165890 1.0d0) -219)
- (scale-float (float 4601465184714752 1.0d0) -273))
+ (renorm-5 (scale-float (float 5585540961678879 1.0d0) -54)
+ (scale-float (float 5110387220890711 1.0d0) -112)
+ (scale-float (float 7472526926945199 1.0d0) -166)
+ (scale-float (float 6718546070924804 1.0d0) -220)
+ (scale-float (float -5978423460626432 1.0d0) -274))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8583353358928340 1.0d0) -52)
- (scale-float (float -8814761974669894 1.0d0) -106)
- (scale-float (float 6948471023477363 1.0d0) -162)
- (scale-float (float 7328637586292604 1.0d0) -216)
- (scale-float (float -6243556978163712 1.0d0) -270))
+ (renorm-5 (scale-float (float 5615845767748444 1.0d0) -54)
+ (scale-float (float 7069981615263570 1.0d0) -109)
+ (scale-float (float -5041175894572219 1.0d0) -164)
+ (scale-float (float -6067200350673256 1.0d0) -218)
+ (scale-float (float -5337373683875840 1.0d0) -274))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8615449901446146 1.0d0) -52)
- (scale-float (float 8113149089767557 1.0d0) -107)
- (scale-float (float -7432909260246323 1.0d0) -161)
- (scale-float (float -7305551804337175 1.0d0) -217)
- (scale-float (float 6354440576040960 1.0d0) -274))
+ (renorm-5 (scale-float (float 5646179571608259 1.0d0) -54)
+ (scale-float (float -5969882006205395 1.0d0) -112)
+ (scale-float (float -5310936463543469 1.0d0) -166)
+ (scale-float (float 5250808131003894 1.0d0) -220)
+ (scale-float (float 7733801445752832 1.0d0) -274))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8647735374875169 1.0d0) -52)
- (scale-float (float 4701163981653150 1.0d0) -106)
- (scale-float (float -8491463606061709 1.0d0) -160)
- (scale-float (float -8224472126148106 1.0d0) -215)
- (scale-float (float 5892533466447872 1.0d0) -269))
+ (renorm-5 (scale-float (float 5676542557861356 1.0d0) -54)
+ (scale-float (float 7813679352548076 1.0d0) -109)
+ (scale-float (float -6999346431632929 1.0d0) -164)
+ (scale-float (float -8591741368161837 1.0d0) -220)
+ (scale-float (float -4838897577099264 1.0d0) -275))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8680211605595229 1.0d0) -52)
- (scale-float (float -6345861736784294 1.0d0) -106)
- (scale-float (float 5776467372825407 1.0d0) -160)
- (scale-float (float 7593416625580479 1.0d0) -215)
- (scale-float (float 7718840200691712 1.0d0) -270))
+ (renorm-5 (scale-float (float 5706934911741074 1.0d0) -54)
+ (scale-float (float -4591456369063391 1.0d0) -108)
+ (scale-float (float 6615031414158987 1.0d0) -163)
+ (scale-float (float -5394682262959669 1.0d0) -218)
+ (scale-float (float -7966786237235200 1.0d0) -272))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8712880443438441 1.0d0) -52)
- (scale-float (float -6342506878020311 1.0d0) -106)
- (scale-float (float -8000635766600025 1.0d0) -160)
- (scale-float (float 5719218459519351 1.0d0) -214)
- (scale-float (float -6198634980245504 1.0d0) -269))
+ (renorm-5 (scale-float (float 5737356819115934 1.0d0) -54)
+ (scale-float (float -4921304159190106 1.0d0) -108)
+ (scale-float (float -5289724371041531 1.0d0) -162)
+ (scale-float (float 8540065299573764 1.0d0) -216)
+ (scale-float (float -6246118036234240 1.0d0) -270))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8745743762067553 1.0d0) -52)
- (scale-float (float 6844417690932138 1.0d0) -106)
- (scale-float (float -6885399513169297 1.0d0) -162)
- (scale-float (float 5330164457289929 1.0d0) -217)
- (scale-float (float 5864964667473920 1.0d0) -276))
+ (renorm-5 (scale-float (float 5767808466494552 1.0d0) -54)
+ (scale-float (float 7834867164461612 1.0d0) -108)
+ (scale-float (float -6057688269140587 1.0d0) -162)
+ (scale-float (float 8931755104912459 1.0d0) -219)
+ (scale-float (float -8619033248137216 1.0d0) -273))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8778803459361628 1.0d0) -52)
- (scale-float (float 7769480413660448 1.0d0) -106)
- (scale-float (float 4990037450690366 1.0d0) -160)
- (scale-float (float 4839956142521049 1.0d0) -215)
- (scale-float (float 7867181987250176 1.0d0) -269))
+ (renorm-5 (scale-float (float 5798290041030581 1.0d0) -54)
+ (scale-float (float -8349877875856717 1.0d0) -109)
+ (scale-float (float 8163150127609112 1.0d0) -164)
+ (scale-float (float 8918413500492032 1.0d0) -219)
+ (scale-float (float -7528032969424896 1.0d0) -278))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8812061457809235 1.0d0) -52)
- (scale-float (float 7510128508333371 1.0d0) -106)
- (scale-float (float 7829409707258784 1.0d0) -163)
- (scale-float (float 7694454672518857 1.0d0) -218)
- (scale-float (float -5529384792489984 1.0d0) -272))
+ (renorm-5 (scale-float (float 5828801730527676 1.0d0) -54)
+ (scale-float (float -7543810688919708 1.0d0) -109)
+ (scale-float (float 7722482010838801 1.0d0) -164)
+ (scale-float (float -6834012364286068 1.0d0) -221)
+ (scale-float (float -5998741041446912 1.0d0) -276))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8845519704909331 1.0d0) -52)
- (scale-float (float -7611897701674087 1.0d0) -107)
- (scale-float (float 5002468143804897 1.0d0) -161)
- (scale-float (float 8089345121571351 1.0d0) -216)
- (scale-float (float -5981796730929152 1.0d0) -271))
+ (renorm-5 (scale-float (float 5859343723444504 1.0d0) -54)
+ (scale-float (float -7421385686727085 1.0d0) -108)
+ (scale-float (float -8429945996744161 1.0d0) -163)
+ (scale-float (float 7207515045379233 1.0d0) -217)
+ (scale-float (float -8228139563352064 1.0d0) -272))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8879180173579997 1.0d0) -52)
- (scale-float (float -5740489964967134 1.0d0) -106)
- (scale-float (float -6481797620571133 1.0d0) -162)
- (scale-float (float 7349818714667008 1.0d0) -216)
- (scale-float (float -4759398920978432 1.0d0) -270))
+ (renorm-5 (scale-float (float 5889916208899774 1.0d0) -54)
+ (scale-float (float -4674283487672738 1.0d0) -108)
+ (scale-float (float 5672587542123089 1.0d0) -163)
+ (scale-float (float 8422751571816060 1.0d0) -220)
+ (scale-float (float 7911739524907008 1.0d0) -276))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8913044862575220 1.0d0) -52)
- (scale-float (float 6795715640058057 1.0d0) -107)
- (scale-float (float -6816375220181127 1.0d0) -161)
- (scale-float (float 7370821425444048 1.0d0) -219)
- (scale-float (float -7203721854844928 1.0d0) -274))
+ (renorm-5 (scale-float (float 5920519376677306 1.0d0) -54)
+ (scale-float (float -5250407275313443 1.0d0) -108)
+ (scale-float (float -4605976276072331 1.0d0) -162)
+ (scale-float (float -6209485626912573 1.0d0) -216)
+ (scale-float (float -6200553119064064 1.0d0) -270))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8947115796909898 1.0d0) -52)
- (scale-float (float 7724240165188716 1.0d0) -107)
- (scale-float (float -7047535107188379 1.0d0) -161)
- (scale-float (float 7520417695255970 1.0d0) -215)
- (scale-float (float 8746954853597184 1.0d0) -269))
+ (renorm-5 (scale-float (float 5951153417231127 1.0d0) -54)
+ (scale-float (float 7856518334009793 1.0d0) -108)
+ (scale-float (float 6981911111573824 1.0d0) -163)
+ (scale-float (float -5128172752384731 1.0d0) -220)
+ (scale-float (float 8652419861315584 1.0d0) -275))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8981395028293258 1.0d0) -52)
- (scale-float (float -5211309319734257 1.0d0) -108)
- (scale-float (float 7350914624408000 1.0d0) -162)
- (scale-float (float -6930865922440237 1.0d0) -216)
- (scale-float (float 8160536897486848 1.0d0) -270))
+ (renorm-5 (scale-float (float 5981818521690606 1.0d0) -54)
+ (scale-float (float 8577060613312499 1.0d0) -108)
+ (scale-float (float -6340321397997779 1.0d0) -162)
+ (scale-float (float 5448939827810261 1.0d0) -216)
+ (scale-float (float -8901481678733312 1.0d0) -272))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4507942317785444 1.0d0) -51)
- (scale-float (float -8112920450222280 1.0d0) -108)
- (scale-float (float -4633033814833455 1.0d0) -162)
- (scale-float (float -8034998550836901 1.0d0) -217)
- (scale-float (float 8180827530199040 1.0d0) -271))
+ (renorm-5 (scale-float (float 6012514881865614 1.0d0) -54)
+ (scale-float (float -7860480778018144 1.0d0) -111)
+ (scale-float (float -8342641792577533 1.0d0) -169)
+ (scale-float (float -8693027931367903 1.0d0) -223)
+ (scale-float (float 7826147505078272 1.0d0) -280))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4525293362587790 1.0d0) -51)
- (scale-float (float 6179343154002858 1.0d0) -108)
- (scale-float (float 8703203171723310 1.0d0) -162)
- (scale-float (float -6213654595809493 1.0d0) -217)
- (scale-float (float 6632929259421696 1.0d0) -272))
+ (renorm-5 (scale-float (float 6043242690251722 1.0d0) -54)
+ (scale-float (float -6823498238092008 1.0d0) -108)
+ (scale-float (float 5156075600076135 1.0d0) -163)
+ (scale-float (float 5509330990390834 1.0d0) -217)
+ (scale-float (float -7625247047401472 1.0d0) -271))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4542751715793594 1.0d0) -51)
- (scale-float (float 8994041374757648 1.0d0) -106)
- (scale-float (float -8652637522498836 1.0d0) -160)
- (scale-float (float 7844548489486572 1.0d0) -214)
- (scale-float (float -8418484123598848 1.0d0) -269))
+ (renorm-5 (scale-float (float 6074002140035432 1.0d0) -54)
+ (scale-float (float 8851806976168487 1.0d0) -108)
+ (scale-float (float 7760436775367546 1.0d0) -163)
+ (scale-float (float 8701028159537337 1.0d0) -217)
+ (scale-float (float 6429747497533440 1.0d0) -272))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4560318458900858 1.0d0) -51)
- (scale-float (float -6865874344020962 1.0d0) -105)
- (scale-float (float -4855957659792291 1.0d0) -159)
- (scale-float (float 6840176623805998 1.0d0) -213)
- (scale-float (float 7102978793480192 1.0d0) -267))
+ (renorm-5 (scale-float (float 6104793425099445 1.0d0) -54)
+ (scale-float (float 5524941199192544 1.0d0) -110)
+ (scale-float (float 5681686620232979 1.0d0) -164)
+ (scale-float (float 7872486800685106 1.0d0) -220)
+ (scale-float (float 8442387486474240 1.0d0) -274))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4577994687904921 1.0d0) -51)
- (scale-float (float -8580167512516603 1.0d0) -105)
- (scale-float (float 7399673441574908 1.0d0) -159)
- (scale-float (float 5926983132286003 1.0d0) -214)
- (scale-float (float 7064953812008960 1.0d0) -268))
+ (renorm-5 (scale-float (float 6135616740027952 1.0d0) -54)
+ (scale-float (float -5642491117656146 1.0d0) -109)
+ (scale-float (float -6325102746319316 1.0d0) -163)
+ (scale-float (float 6843328443259586 1.0d0) -218)
+ (scale-float (float 8220318131290112 1.0d0) -275))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4595781513542561 1.0d0) -51)
- (scale-float (float 6881231372859908 1.0d0) -105)
- (scale-float (float 7023693700156889 1.0d0) -160)
- (scale-float (float 5922424877162099 1.0d0) -214)
- (scale-float (float 8225388493799424 1.0d0) -273))
+ (renorm-5 (scale-float (float 6166472280111972 1.0d0) -54)
+ (scale-float (float 8472944951004593 1.0d0) -112)
+ (scale-float (float -6347226898935615 1.0d0) -167)
+ (scale-float (float 7351557195299797 1.0d0) -221)
+ (scale-float (float 7019053524713472 1.0d0) -277))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4613680061541043 1.0d0) -51)
- (scale-float (float 5881634407042754 1.0d0) -106)
- (scale-float (float -8930023400584930 1.0d0) -160)
- (scale-float (float -5146291796594786 1.0d0) -215)
- (scale-float (float 6706515274235904 1.0d0) -271))
+ (renorm-5 (scale-float (float 6197360241354719 1.0d0) -54)
+ (scale-float (float 7537680294401546 1.0d0) -109)
+ (scale-float (float -7101841700322343 1.0d0) -163)
+ (scale-float (float -8915761922702705 1.0d0) -217)
+ (scale-float (float -7990456879382528 1.0d0) -272))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4631691472872225 1.0d0) -51)
- (scale-float (float 5890776712056895 1.0d0) -107)
- (scale-float (float 5832063788390196 1.0d0) -162)
- (scale-float (float 6591451445563752 1.0d0) -216)
- (scale-float (float 6280061233135616 1.0d0) -272))
+ (renorm-5 (scale-float (float 6228280820477004 1.0d0) -54)
+ (scale-float (float -5288687005014418 1.0d0) -110)
+ (scale-float (float -5218694617980360 1.0d0) -165)
+ (scale-float (float 8090026348149549 1.0d0) -222)
+ (scale-float (float -8214983313719296 1.0d0) -279))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4649816904011860 1.0d0) -51)
- (scale-float (float 5454348993952511 1.0d0) -107)
- (scale-float (float -7838288711848346 1.0d0) -162)
- (scale-float (float 5071818222172620 1.0d0) -216)
- (scale-float (float -7119121918722048 1.0d0) -272))
+ (renorm-5 (scale-float (float 6259234214922672 1.0d0) -54)
+ (scale-float (float -4927270964553817 1.0d0) -108)
+ (scale-float (float 8470215160096662 1.0d0) -162)
+ (scale-float (float 5678894538463109 1.0d0) -216)
+ (scale-float (float 7437533125492736 1.0d0) -270))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4668057527204202 1.0d0) -51)
- (scale-float (float -4943368423135290 1.0d0) -108)
- (scale-float (float -8511787137486369 1.0d0) -163)
- (scale-float (float 8141491753938557 1.0d0) -220)
- (scale-float (float 7907892751499264 1.0d0) -275))
+ (renorm-5 (scale-float (float 6290220622864077 1.0d0) -54)
+ (scale-float (float -5699189270528091 1.0d0) -110)
+ (scale-float (float -5530242526137833 1.0d0) -165)
+ (scale-float (float -7285944726698883 1.0d0) -219)
+ (scale-float (float -7840080984604672 1.0d0) -273))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4686414530732050 1.0d0) -51)
- (scale-float (float -7568115761223155 1.0d0) -105)
- (scale-float (float -8799439543744175 1.0d0) -159)
- (scale-float (float 7952737685838994 1.0d0) -215)
- (scale-float (float -4677091422633984 1.0d0) -272))
+ (renorm-5 (scale-float (float 6321240243207592 1.0d0) -54)
+ (scale-float (float 7696310263633004 1.0d0) -108)
+ (scale-float (float 7652206004191095 1.0d0) -162)
+ (scale-float (float 8455646026028582 1.0d0) -217)
+ (scale-float (float -4640241842241536 1.0d0) -271))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4704889119192359 1.0d0) -51)
- (scale-float (float -6625139056032962 1.0d0) -105)
- (scale-float (float 6340817092719046 1.0d0) -160)
- (scale-float (float 7277739084036241 1.0d0) -214)
- (scale-float (float -5234923158634496 1.0d0) -270))
+ (renorm-5 (scale-float (float 6352293275599156 1.0d0) -54)
+ (scale-float (float 5622380131022882 1.0d0) -112)
+ (scale-float (float -7701356562694401 1.0d0) -166)
+ (scale-float (float 5774374304450041 1.0d0) -221)
+ (scale-float (float -5027086140440576 1.0d0) -275))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4723482513777556 1.0d0) -51)
- (scale-float (float -4525892343443549 1.0d0) -105)
- (scale-float (float -8032296315579629 1.0d0) -160)
- (scale-float (float -6720437390993336 1.0d0) -215)
- (scale-float (float -7408496692232192 1.0d0) -270))
+ (renorm-5 (scale-float (float 6383379920429853 1.0d0) -54)
+ (scale-float (float 6082395000110047 1.0d0) -108)
+ (scale-float (float -8260835158694014 1.0d0) -162)
+ (scale-float (float 6462056623447527 1.0d0) -217)
+ (scale-float (float 8210404139991040 1.0d0) -272))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4742195952562693 1.0d0) -51)
- (scale-float (float -8775649112842370 1.0d0) -106)
- (scale-float (float -7028344224447296 1.0d0) -160)
- (scale-float (float 5430706302837071 1.0d0) -214)
- (scale-float (float -7032435558858752 1.0d0) -268))
+ (renorm-5 (scale-float (float 6414500378841538 1.0d0) -54)
+ (scale-float (float 8932943429439749 1.0d0) -116)
+ (scale-float (float -8724350632606608 1.0d0) -170)
+ (scale-float (float 7394655254021948 1.0d0) -226)
+ (scale-float (float -6418771346456576 1.0d0) -282))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4761030690798583 1.0d0) -51)
- (scale-float (float 6700890742573426 1.0d0) -106)
- (scale-float (float 8517663623061862 1.0d0) -160)
- (scale-float (float -8351123014271912 1.0d0) -214)
- (scale-float (float -8523717545361408 1.0d0) -270))
+ (renorm-5 (scale-float (float 6445654852732489 1.0d0) -54)
+ (scale-float (float 6630692343746876 1.0d0) -109)
+ (scale-float (float 5596906211564236 1.0d0) -163)
+ (scale-float (float 7000775141288093 1.0d0) -217)
+ (scale-float (float 6712199320223744 1.0d0) -271))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4779988001211067 1.0d0) -51)
- (scale-float (float -7412695062535691 1.0d0) -107)
- (scale-float (float -8333778395735522 1.0d0) -161)
- (scale-float (float -8005396742108668 1.0d0) -216)
- (scale-float (float 8555360010043392 1.0d0) -270))
+ (renorm-5 (scale-float (float 6476843544763107 1.0d0) -54)
+ (scale-float (float -6567463300180201 1.0d0) -113)
+ (scale-float (float 6081636173794535 1.0d0) -167)
+ (scale-float (float 5752987244692832 1.0d0) -221)
+ (scale-float (float 5566285230637056 1.0d0) -275))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4799069174306553 1.0d0) -51)
- (scale-float (float -6654620461486504 1.0d0) -106)
- (scale-float (float 5802603391804805 1.0d0) -160)
- (scale-float (float 5008422188327585 1.0d0) -214)
- (scale-float (float -8284430063616000 1.0d0) -268))
+ (renorm-5 (scale-float (float 6508066658361646 1.0d0) -54)
+ (scale-float (float 7976136740103962 1.0d0) -115)
+ (scale-float (float -4792327024289416 1.0d0) -169)
+ (scale-float (float 7472671226932633 1.0d0) -223)
+ (scale-float (float -7703599982313472 1.0d0) -277))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4818275518683994 1.0d0) -51)
- (scale-float (float -5754383055639459 1.0d0) -109)
- (scale-float (float 6874777385534123 1.0d0) -164)
- (scale-float (float 4732414121178789 1.0d0) -219)
- (scale-float (float -7692481904771072 1.0d0) -273))
+ (renorm-5 (scale-float (float 6539324397729987 1.0d0) -54)
+ (scale-float (float 6832979917352444 1.0d0) -108)
+ (scale-float (float 6972702137833669 1.0d0) -162)
+ (scale-float (float -8943357378665776 1.0d0) -216)
+ (scale-float (float -6456432423354368 1.0d0) -270))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4837608361353453 1.0d0) -51)
- (scale-float (float 8074256282507404 1.0d0) -105)
- (scale-float (float 8107238484430522 1.0d0) -160)
- (scale-float (float -7665576932769853 1.0d0) -214)
- (scale-float (float -5550231555932160 1.0d0) -269))
+ (renorm-5 (scale-float (float 6570616967849450 1.0d0) -54)
+ (scale-float (float -7071935743463450 1.0d0) -109)
+ (scale-float (float -7085858170847411 1.0d0) -163)
+ (scale-float (float 8167119248956248 1.0d0) -217)
+ (scale-float (float 5159071191269376 1.0d0) -274))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4857069048061424 1.0d0) -51)
- (scale-float (float 5573662177923259 1.0d0) -107)
- (scale-float (float -6190898135404773 1.0d0) -169)
- (scale-float (float 4861250181949393 1.0d0) -227)
- (scale-float (float -7189879406460928 1.0d0) -282))
+ (renorm-5 (scale-float (float 6601944574486640 1.0d0) -54)
+ (scale-float (float -4730863724076487 1.0d0) -108)
+ (scale-float (float 5593924526336144 1.0d0) -162)
+ (scale-float (float 8821645198570676 1.0d0) -216)
+ (scale-float (float -5909003596537856 1.0d0) -270))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4876658943623070 1.0d0) -51)
- (scale-float (float -5797488569663105 1.0d0) -106)
- (scale-float (float 5943397845313088 1.0d0) -161)
- (scale-float (float -7659456383056697 1.0d0) -215)
- (scale-float (float 8033132261146624 1.0d0) -270))
+ (renorm-5 (scale-float (float 6633307424199341 1.0d0) -54)
+ (scale-float (float 5123807745717619 1.0d0) -108)
+ (scale-float (float 7828852147362391 1.0d0) -162)
+ (scale-float (float -6607069960518047 1.0d0) -216)
+ (scale-float (float 7502492267184128 1.0d0) -272))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4896379432261561 1.0d0) -51)
- (scale-float (float 6176610507957441 1.0d0) -107)
- (scale-float (float -4777461322713456 1.0d0) -163)
- (scale-float (float -5986621159816620 1.0d0) -217)
- (scale-float (float -6453729645559808 1.0d0) -273))
+ (renorm-5 (scale-float (float 6664705724342446 1.0d0) -54)
+ (scale-float (float 5179129996467248 1.0d0) -110)
+ (scale-float (float 6591497583888178 1.0d0) -165)
+ (scale-float (float 8412536519395334 1.0d0) -219)
+ (scale-float (float 5472424847605760 1.0d0) -274))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4916231917954681 1.0d0) -51)
- (scale-float (float 8588141350290096 1.0d0) -107)
- (scale-float (float -6538137139653070 1.0d0) -161)
- (scale-float (float -5367876147221190 1.0d0) -215)
- (scale-float (float -6211316813987840 1.0d0) -270))
+ (renorm-5 (scale-float (float 6696139683073924 1.0d0) -54)
+ (scale-float (float -8695911602891660 1.0d0) -108)
+ (scale-float (float 8796934384215369 1.0d0) -164)
+ (scale-float (float 8287182831733458 1.0d0) -219)
+ (scale-float (float -7570246986629120 1.0d0) -279))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4936217824788886 1.0d0) -51)
- (scale-float (float 8955588813284292 1.0d0) -105)
- (scale-float (float 8192617247222676 1.0d0) -159)
- (scale-float (float 5480451822051539 1.0d0) -214)
- (scale-float (float 8108249688489984 1.0d0) -268))
+ (renorm-5 (scale-float (float 6727609509360832 1.0d0) -54)
+ (scale-float (float -4792140185736031 1.0d0) -109)
+ (scale-float (float 5029912584640126 1.0d0) -163)
+ (scale-float (float 8375655587728771 1.0d0) -218)
+ (scale-float (float -6010696214642688 1.0d0) -273))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4956338597321009 1.0d0) -51)
- (scale-float (float -8625892916963286 1.0d0) -106)
- (scale-float (float -8693836795712583 1.0d0) -161)
- (scale-float (float 6871050900024872 1.0d0) -215)
- (scale-float (float -7711352672518144 1.0d0) -269))
+ (renorm-5 (scale-float (float 6759115412985370 1.0d0) -54)
+ (scale-float (float 7049383263602121 1.0d0) -108)
+ (scale-float (float 7966500032978979 1.0d0) -164)
+ (scale-float (float -4946373334089235 1.0d0) -218)
+ (scale-float (float -5303541100707840 1.0d0) -272))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4976595700947791 1.0d0) -51)
- (scale-float (float -5616750136770440 1.0d0) -105)
- (scale-float (float 6510467057312425 1.0d0) -163)
- (scale-float (float -7628369649567092 1.0d0) -218)
- (scale-float (float 5955369073377280 1.0d0) -272))
+ (renorm-5 (scale-float (float 6790657604550973 1.0d0) -54)
+ (scale-float (float 4562351160898659 1.0d0) -109)
+ (scale-float (float 7117762674089876 1.0d0) -163)
+ (scale-float (float -6050459464943318 1.0d0) -217)
+ (scale-float (float -6194175991496704 1.0d0) -271))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4996990622283456 1.0d0) -51)
- (scale-float (float -7942191285095059 1.0d0) -106)
- (scale-float (float -6064273275229659 1.0d0) -160)
- (scale-float (float -5319119386674314 1.0d0) -215)
- (scale-float (float -7646359613997056 1.0d0) -271))
+ (renorm-5 (scale-float (float 6822236295488445 1.0d0) -54)
+ (scale-float (float -7959086277234874 1.0d0) -108)
+ (scale-float (float 7116815396353598 1.0d0) -163)
+ (scale-float (float 6417940948877921 1.0d0) -221)
+ (scale-float (float 4917787165720576 1.0d0) -275))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5017524869545515 1.0d0) -51)
- (scale-float (float 8104421411399551 1.0d0) -105)
- (scale-float (float 5198629989954815 1.0d0) -160)
- (scale-float (float 6631968396190026 1.0d0) -215)
- (scale-float (float 5353559158325248 1.0d0) -269))
+ (renorm-5 (scale-float (float 6853851698062138 1.0d0) -54)
+ (scale-float (float -6460794880831946 1.0d0) -108)
+ (scale-float (float 8627544627817744 1.0d0) -162)
+ (scale-float (float 7782632443999495 1.0d0) -217)
+ (scale-float (float 7698335235620864 1.0d0) -271))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5038199972949024 1.0d0) -51)
- (scale-float (float 7017576463989287 1.0d0) -105)
- (scale-float (float -7547375243341514 1.0d0) -159)
- (scale-float (float -7426093200599037 1.0d0) -213)
- (scale-float (float -4839153031282688 1.0d0) -269))
+ (renorm-5 (scale-float (float 6885504025376175 1.0d0) -54)
+ (scale-float (float -7875200407081130 1.0d0) -108)
+ (scale-float (float -8817586453762137 1.0d0) -162)
+ (scale-float (float 6791034107818861 1.0d0) -217)
+ (scale-float (float 5785633163706368 1.0d0) -274))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5059017485109501 1.0d0) -51)
- (scale-float (float -5256502056897405 1.0d0) -105)
- (scale-float (float 8051618487691050 1.0d0) -166)
- (scale-float (float -4880892799359926 1.0d0) -220)
- (scale-float (float -7939247772270592 1.0d0) -274))
+ (renorm-5 (scale-float (float 6917193491380711 1.0d0) -54)
+ (scale-float (float -6354209598707159 1.0d0) -108)
+ (scale-float (float -5547257667359391 1.0d0) -164)
+ (scale-float (float 7480953384043884 1.0d0) -219)
+ (scale-float (float -8601638328205312 1.0d0) -274))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5079978981454734 1.0d0) -51)
- (scale-float (float -5227066467451071 1.0d0) -106)
- (scale-float (float -5522085046755756 1.0d0) -160)
- (scale-float (float 7783388497565455 1.0d0) -216)
- (scale-float (float 5765530325352448 1.0d0) -271))
+ (renorm-5 (scale-float (float 6948920310878242 1.0d0) -54)
+ (scale-float (float -6529425724220061 1.0d0) -109)
+ (scale-float (float -6770777863446063 1.0d0) -165)
+ (scale-float (float -4601927600113987 1.0d0) -219)
+ (scale-float (float 8743288922570752 1.0d0) -274))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5101086060645710 1.0d0) -51)
- (scale-float (float -8038288147332616 1.0d0) -107)
- (scale-float (float -5028989851674966 1.0d0) -161)
- (scale-float (float -6526043318984233 1.0d0) -216)
- (scale-float (float 8204474594361344 1.0d0) -270))
+ (renorm-5 (scale-float (float 6980684699529956 1.0d0) -54)
+ (scale-float (float 8911111487182626 1.0d0) -112)
+ (scale-float (float 7866043195791426 1.0d0) -166)
+ (scale-float (float 8793868358744477 1.0d0) -221)
+ (scale-float (float -7412261453824000 1.0d0) -277))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5122340345006890 1.0d0) -51)
- (scale-float (float 8534489371591094 1.0d0) -105)
- (scale-float (float -8422091584111265 1.0d0) -159)
- (scale-float (float -5283450070500595 1.0d0) -213)
- (scale-float (float -6431827347800064 1.0d0) -269))
+ (renorm-5 (scale-float (float 7012486873862129 1.0d0) -54)
+ (scale-float (float 5958377739269213 1.0d0) -110)
+ (scale-float (float -7126019962434707 1.0d0) -164)
+ (scale-float (float 4824810954656316 1.0d0) -219)
+ (scale-float (float -8754419670319104 1.0d0) -274))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5143743480966089 1.0d0) -51)
- (scale-float (float 6313120262388408 1.0d0) -110)
- (scale-float (float -7505846896165875 1.0d0) -164)
- (scale-float (float 4740247571734401 1.0d0) -219)
- (scale-float (float -6660853340831744 1.0d0) -273))
+ (renorm-5 (scale-float (float 7044327051272565 1.0d0) -54)
+ (scale-float (float 8724280902124377 1.0d0) -109)
+ (scale-float (float 4631327155432459 1.0d0) -167)
+ (scale-float (float -4535605803026965 1.0d0) -222)
+ (scale-float (float -7769500766175232 1.0d0) -279))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5165297139504195 1.0d0) -51)
- (scale-float (float -7776064178571584 1.0d0) -105)
- (scale-float (float 8675871213227517 1.0d0) -159)
- (scale-float (float 6062006298668271 1.0d0) -213)
- (scale-float (float 8013315401146368 1.0d0) -267))
+ (renorm-5 (scale-float (float 7076205450037083 1.0d0) -54)
+ (scale-float (float 7469881275853812 1.0d0) -110)
+ (scale-float (float 8708125460348437 1.0d0) -164)
+ (scale-float (float -7998827950423527 1.0d0) -218)
+ (scale-float (float -8476933266341888 1.0d0) -272))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5187003016615002 1.0d0) -51)
- (scale-float (float -7118173844446244 1.0d0) -106)
- (scale-float (float -4845291921963261 1.0d0) -160)
- (scale-float (float 8891161534297773 1.0d0) -217)
- (scale-float (float -5602645897248768 1.0d0) -271))
+ (renorm-5 (scale-float (float 7108122289316047 1.0d0) -54)
+ (scale-float (float 7844065984858103 1.0d0) -110)
+ (scale-float (float -6265580730468145 1.0d0) -164)
+ (scale-float (float 5578640096157721 1.0d0) -219)
+ (scale-float (float -6708594653265920 1.0d0) -274))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5208862833775413 1.0d0) -51)
- (scale-float (float -6765045630603889 1.0d0) -106)
- (scale-float (float 6079755601626192 1.0d0) -162)
- (scale-float (float 8597325995288489 1.0d0) -217)
- (scale-float (float 8163453345857536 1.0d0) -271))
+ (renorm-5 (scale-float (float 7140077789160945 1.0d0) -54)
+ (scale-float (float 5965174660247916 1.0d0) -109)
+ (scale-float (float -8979964131353364 1.0d0) -163)
+ (scale-float (float -5163836372762478 1.0d0) -217)
+ (scale-float (float 8878184495742976 1.0d0) -272))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5230878338426285 1.0d0) -51)
- (scale-float (float -6910322926908159 1.0d0) -107)
- (scale-float (float 8551121322420234 1.0d0) -163)
- (scale-float (float -6138896908024698 1.0d0) -217)
- (scale-float (float -5736017005379584 1.0d0) -272))
+ (renorm-5 (scale-float (float 7172072170521013 1.0d0) -54)
+ (scale-float (float -7076061197762374 1.0d0) -109)
+ (scale-float (float 5765333970830459 1.0d0) -164)
+ (scale-float (float -6406058352004189 1.0d0) -218)
+ (scale-float (float -7318116292624384 1.0d0) -273))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5253051304464207 1.0d0) -51)
- (scale-float (float -8187725108832186 1.0d0) -105)
- (scale-float (float 6310392441460258 1.0d0) -159)
- (scale-float (float 6622489199440459 1.0d0) -213)
- (scale-float (float -5400949404868608 1.0d0) -267))
+ (renorm-5 (scale-float (float 7204105655249904 1.0d0) -54)
+ (scale-float (float 5590020707555993 1.0d0) -108)
+ (scale-float (float -6275769150676932 1.0d0) -162)
+ (scale-float (float 4524690169176737 1.0d0) -216)
+ (scale-float (float 5981746075271168 1.0d0) -271))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5275383532744492 1.0d0) -51)
- (scale-float (float 6710235860012905 1.0d0) -105)
- (scale-float (float 6946167165217878 1.0d0) -159)
- (scale-float (float -8190714099250867 1.0d0) -214)
- (scale-float (float 8653598270357504 1.0d0) -268))
+ (renorm-5 (scale-float (float 7236178466112411 1.0d0) -54)
+ (scale-float (float 5287135525880444 1.0d0) -108)
+ (scale-float (float 6884703324941259 1.0d0) -162)
+ (scale-float (float -7030092162738900 1.0d0) -216)
+ (scale-float (float 5449045606326272 1.0d0) -270))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5297876851595697 1.0d0) -51)
- (scale-float (float -6104299294155149 1.0d0) -112)
- (scale-float (float -7871097816959897 1.0d0) -167)
- (scale-float (float 7564633731288480 1.0d0) -223)
- (scale-float (float -5458923029004288 1.0d0) -277))
+ (renorm-5 (scale-float (float 7268290826791229 1.0d0) -54)
+ (scale-float (float 8908878693758047 1.0d0) -110)
+ (scale-float (float 6583205550288448 1.0d0) -165)
+ (scale-float (float -7063133806406844 1.0d0) -219)
+ (scale-float (float -8497968332931072 1.0d0) -275))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5320533117345957 1.0d0) -51)
- (scale-float (float -8110104653789814 1.0d0) -105)
- (scale-float (float -6095125970748473 1.0d0) -161)
- (scale-float (float -8417660405993412 1.0d0) -217)
- (scale-float (float 6981803257495552 1.0d0) -271))
+ (renorm-5 (scale-float (float 7300442961893772 1.0d0) -54)
+ (scale-float (float -5189387157646678 1.0d0) -108)
+ (scale-float (float 6394955726653622 1.0d0) -164)
+ (scale-float (float -5970634234690477 1.0d0) -218)
+ (scale-float (float -7827681844756480 1.0d0) -272))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5343354214861476 1.0d0) -51)
- (scale-float (float 7055846370374930 1.0d0) -105)
- (scale-float (float 5207656993073958 1.0d0) -159)
- (scale-float (float -8526235223130475 1.0d0) -214)
- (scale-float (float 4895808563183616 1.0d0) -272))
+ (renorm-5 (scale-float (float 7332635096959035 1.0d0) -54)
+ (scale-float (float 6145511953117053 1.0d0) -110)
+ (scale-float (float 4849814450306723 1.0d0) -164)
+ (scale-float (float 7224717405471284 1.0d0) -218)
+ (scale-float (float 6818068026753024 1.0d0) -274))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5366342058097493 1.0d0) -51)
- (scale-float (float 5050089741084139 1.0d0) -105)
- (scale-float (float 5213531896513175 1.0d0) -159)
- (scale-float (float -8516093744548960 1.0d0) -213)
- (scale-float (float -7818972591054848 1.0d0) -267))
+ (renorm-5 (scale-float (float 7364867458464510 1.0d0) -54)
+ (scale-float (float 8068821842627122 1.0d0) -109)
+ (scale-float (float 7885942447230440 1.0d0) -163)
+ (scale-float (float 8809025038724724 1.0d0) -220)
+ (scale-float (float 4604826755792896 1.0d0) -275))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5389498590662050 1.0d0) -51)
- (scale-float (float 7841269413863276 1.0d0) -105)
- (scale-float (float 6486469616282850 1.0d0) -159)
- (scale-float (float -6622029625462178 1.0d0) -219)
- (scale-float (float -5554733397835776 1.0d0) -278))
+ (renorm-5 (scale-float (float 7397140273833146 1.0d0) -54)
+ (scale-float (float -6624004835597461 1.0d0) -108)
+ (scale-float (float 5198896387382290 1.0d0) -162)
+ (scale-float (float -5012278774128324 1.0d0) -218)
+ (scale-float (float -6712284233859072 1.0d0) -274))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5412825786392934 1.0d0) -51)
- (scale-float (float 8974515617660484 1.0d0) -105)
- (scale-float (float 7720037443034322 1.0d0) -162)
- (scale-float (float -7250042294309602 1.0d0) -216)
- (scale-float (float 8683802057048064 1.0d0) -270))
+ (renorm-5 (scale-float (float 7429453771440360 1.0d0) -54)
+ (scale-float (float 8489043669316735 1.0d0) -110)
+ (scale-float (float -8272354051739522 1.0d0) -164)
+ (scale-float (float -7527576378627699 1.0d0) -218)
+ (scale-float (float 6127773839654912 1.0d0) -273))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5436325649948134 1.0d0) -51)
- (scale-float (float 5085679199899093 1.0d0) -105)
- (scale-float (float 6048680740045173 1.0d0) -160)
+ (renorm-5 (scale-float (float 7461808180621106 1.0d0) -54)
+ (scale-float (float 4656636580228777 1.0d0) -108)
+ (scale-float (float 6180324450698708 1.0d0) -162)
(scale-float (float 5197737643093849 1.0d0) -216)
- (scale-float (float 6206530074443776 1.0d0) -273))
+ (scale-float (float 6206530073722880 1.0d0) -273))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5460000217410192 1.0d0) -51)
- (scale-float (float 8973148485816752 1.0d0) -105)
- (scale-float (float 8450781311989665 1.0d0) -159)
- (scale-float (float 6062324972963764 1.0d0) -213)
- (scale-float (float -5653993235595264 1.0d0) -267))
+ (renorm-5 (scale-float (float 7494203731676985 1.0d0) -54)
+ (scale-float (float 6244875916705196 1.0d0) -111)
+ (scale-float (float 8987612493169679 1.0d0) -169)
+ (scale-float (float -8944438406190422 1.0d0) -223)
+ (scale-float (float 7609318509641728 1.0d0) -279))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5483851556904833 1.0d0) -51)
- (scale-float (float 5996905394696639 1.0d0) -105)
- (scale-float (float 5196356464997887 1.0d0) -159)
- (scale-float (float 5712707906316225 1.0d0) -213)
- (scale-float (float 4830730584612864 1.0d0) -267))
+ (renorm-5 (scale-float (float 7526640655883412 1.0d0) -54)
+ (scale-float (float 6331346795363729 1.0d0) -109)
+ (scale-float (float -6617581128370878 1.0d0) -165)
+ (scale-float (float 7868923505990833 1.0d0) -219)
+ (scale-float (float -5540407925800960 1.0d0) -275))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5507881769234261 1.0d0) -51)
- (scale-float (float -4715026875390648 1.0d0) -106)
- (scale-float (float 5398898725927355 1.0d0) -160)
- (scale-float (float -5070766412321352 1.0d0) -216)
- (scale-float (float 7752820875853824 1.0d0) -273))
+ (renorm-5 (scale-float (float 7559119185496837 1.0d0) -54)
+ (scale-float (float -8382315125784704 1.0d0) -108)
+ (scale-float (float -4847750917965505 1.0d0) -163)
+ (scale-float (float 6892943650010337 1.0d0) -218)
+ (scale-float (float -8819192773771264 1.0d0) -272))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5532092988525536 1.0d0) -51)
- (scale-float (float -4859330332975918 1.0d0) -106)
- (scale-float (float -4535998530621815 1.0d0) -160)
- (scale-float (float -7628146934727197 1.0d0) -214)
- (scale-float (float -7268228718526464 1.0d0) -270))
+ (renorm-5 (scale-float (float 7591639553762011 1.0d0) -54)
+ (scale-float (float 5287089863916958 1.0d0) -108)
+ (scale-float (float 5269373324311889 1.0d0) -162)
+ (scale-float (float -6075335453453672 1.0d0) -217)
+ (scale-float (float 4750037185069056 1.0d0) -271))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5556487382894451 1.0d0) -51)
- (scale-float (float 7398907756334830 1.0d0) -105)
- (scale-float (float -7502586526034506 1.0d0) -159)
- (scale-float (float -7861850574598044 1.0d0) -214)
- (scale-float (float -6690007956193280 1.0d0) -268))
+ (renorm-5 (scale-float (float 7624201994919318 1.0d0) -54)
+ (scale-float (float 7236926661985700 1.0d0) -109)
+ (scale-float (float -8860397313852292 1.0d0) -163)
+ (scale-float (float 6876867734450069 1.0d0) -218)
+ (scale-float (float -7957423847571456 1.0d0) -273))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5581067155125341 1.0d0) -51)
- (scale-float (float 7691681711198996 1.0d0) -105)
- (scale-float (float -7115388140873694 1.0d0) -161)
- (scale-float (float -6173322695373787 1.0d0) -216)
- (scale-float (float 8667376767008768 1.0d0) -270))
+ (renorm-5 (scale-float (float 7656806744212146 1.0d0) -54)
+ (scale-float (float -8383026502611194 1.0d0) -108)
+ (scale-float (float -8658391280494411 1.0d0) -162)
+ (scale-float (float -6672759996370751 1.0d0) -217)
+ (scale-float (float -6648095027888128 1.0d0) -274))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5605834543367270 1.0d0) -51)
- (scale-float (float -5650666465953453 1.0d0) -107)
- (scale-float (float 6442418102644520 1.0d0) -162)
- (scale-float (float 6220973504925671 1.0d0) -219)
- (scale-float (float 7032008885665792 1.0d0) -274))
+ (renorm-5 (scale-float (float 7689454037894320 1.0d0) -54)
+ (scale-float (float 8767228658734370 1.0d0) -109)
+ (scale-float (float 7454538244443051 1.0d0) -163)
+ (scale-float (float -5789239105644557 1.0d0) -219)
+ (scale-float (float -7784663327834112 1.0d0) -274))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5630791821847063 1.0d0) -51)
- (scale-float (float 6495800535873934 1.0d0) -105)
- (scale-float (float 7160337352712604 1.0d0) -160)
- (scale-float (float -4913981280107361 1.0d0) -215)
- (scale-float (float -4717585707106304 1.0d0) -269))
+ (renorm-5 (scale-float (float 7722144113237595 1.0d0) -54)
+ (scale-float (float -7347395286237679 1.0d0) -109)
+ (scale-float (float -6807613003826818 1.0d0) -163)
+ (scale-float (float -7183269477031958 1.0d0) -218)
+ (scale-float (float 7486604118687744 1.0d0) -272))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5655941301599663 1.0d0) -51)
- (scale-float (float 8865630141503023 1.0d0) -105)
- (scale-float (float 7224643194944885 1.0d0) -160)
- (scale-float (float -8464404145528280 1.0d0) -214)
- (scale-float (float 5566125709950976 1.0d0) -269))
+ (renorm-5 (scale-float (float 7754877208539189 1.0d0) -54)
+ (scale-float (float 4809543627913825 1.0d0) -108)
+ (scale-float (float 7770423194575532 1.0d0) -162)
+ (scale-float (float 6555719213481071 1.0d0) -216)
+ (scale-float (float 5707868316991488 1.0d0) -271))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5681285331216293 1.0d0) -51)
- (scale-float (float 8667538878825471 1.0d0) -105)
- (scale-float (float -5170118114604015 1.0d0) -159)
- (scale-float (float -6912059689396079 1.0d0) -213)
- (scale-float (float -6314400139616256 1.0d0) -267))
+ (renorm-5 (scale-float (float 7787653563129389 1.0d0) -54)
+ (scale-float (float 6679707993927243 1.0d0) -109)
+ (scale-float (float -5557463966156467 1.0d0) -163)
+ (scale-float (float 7831816151390989 1.0d0) -217)
+ (scale-float (float -5901536695484416 1.0d0) -272))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5706826297610946 1.0d0) -51)
- (scale-float (float 5531964275807128 1.0d0) -105)
- (scale-float (float -7551658916899182 1.0d0) -161)
- (scale-float (float 6419683413669191 1.0d0) -215)
- (scale-float (float -6650380303532032 1.0d0) -270))
+ (renorm-5 (scale-float (float 7820473417379200 1.0d0) -54)
+ (scale-float (float -5610002486131308 1.0d0) -108)
+ (scale-float (float 8875542468436136 1.0d0) -165)
+ (scale-float (float 4575301741714284 1.0d0) -219)
+ (scale-float (float 6957289345777664 1.0d0) -274))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5732566626805721 1.0d0) -51)
- (scale-float (float 4623367017186410 1.0d0) -107)
- (scale-float (float 5669387184151161 1.0d0) -163)
- (scale-float (float -7546306897435610 1.0d0) -218)
- (scale-float (float -7361787774107648 1.0d0) -274))
+ (renorm-5 (scale-float (float 7853337012708057 1.0d0) -54)
+ (scale-float (float -8654849815135912 1.0d0) -108)
+ (scale-float (float 7625770177442808 1.0d0) -162)
+ (scale-float (float -5031752653758568 1.0d0) -218)
+ (scale-float (float 6180074740023296 1.0d0) -272))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5758508784735550 1.0d0) -51)
- (scale-float (float 7776333632546842 1.0d0) -107)
- (scale-float (float -7468320812394801 1.0d0) -164)
- (scale-float (float 6616495651735432 1.0d0) -218)
- (scale-float (float -7799059100729344 1.0d0) -272))
+ (renorm-5 (scale-float (float 7886244591591594 1.0d0) -54)
+ (scale-float (float 7529633780378438 1.0d0) -108)
+ (scale-float (float 5970704415981979 1.0d0) -163)
+ (scale-float (float -8821473076797850 1.0d0) -218)
+ (scale-float (float 4870462016585728 1.0d0) -273))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5784655278072878 1.0d0) -51)
- (scale-float (float -8487524648621328 1.0d0) -108)
- (scale-float (float -8746245465599726 1.0d0) -162)
- (scale-float (float -5379186649194166 1.0d0) -221)
- (scale-float (float 6650728865071104 1.0d0) -275))
+ (renorm-5 (scale-float (float 7919196397569473 1.0d0) -54)
+ (scale-float (float 8245678006873045 1.0d0) -108)
+ (scale-float (float 8669879557377221 1.0d0) -162)
+ (scale-float (float 8187375233298366 1.0d0) -216)
+ (scale-float (float -7732782811553792 1.0d0) -270))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5811008655072871 1.0d0) -51)
- (scale-float (float 6311463727248441 1.0d0) -105)
- (scale-float (float 8779841134514476 1.0d0) -159)
- (scale-float (float -7243825179367515 1.0d0) -213)
- (scale-float (float -6481905193451520 1.0d0) -270))
+ (renorm-5 (scale-float (float 7952192675253264 1.0d0) -54)
+ (scale-float (float -7871632387737584 1.0d0) -110)
+ (scale-float (float -4721494877770882 1.0d0) -164)
+ (scale-float (float -5760355777703592 1.0d0) -220)
+ (scale-float (float -8430539578015744 1.0d0) -274))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5837571506439760 1.0d0) -51)
- (scale-float (float -6804171393563275 1.0d0) -105)
- (scale-float (float 7045798592656872 1.0d0) -162)
- (scale-float (float -6822079463935728 1.0d0) -219)
- (scale-float (float -5813075772964864 1.0d0) -275))
+ (renorm-5 (scale-float (float 7985233670334390 1.0d0) -54)
+ (scale-float (float 8995652793986095 1.0d0) -111)
+ (scale-float (float 7174036095151749 1.0d0) -166)
+ (scale-float (float 6888926189976943 1.0d0) -220)
+ (scale-float (float -4585856335085568 1.0d0) -274))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5864346466214924 1.0d0) -51)
- (scale-float (float -5184981689329813 1.0d0) -105)
- (scale-float (float -8422052236864799 1.0d0) -162)
- (scale-float (float -5073156352586921 1.0d0) -216)
- (scale-float (float 6764228161306624 1.0d0) -271))
+ (renorm-5 (scale-float (float 8018319629592134 1.0d0) -54)
+ (scale-float (float -8809657438135170 1.0d0) -112)
+ (scale-float (float -7480916566417747 1.0d0) -167)
+ (scale-float (float 4981701802431024 1.0d0) -222)
+ (scale-float (float -6969389765099520 1.0d0) -277))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5891336212687374 1.0d0) -51)
- (scale-float (float 5857775210754033 1.0d0) -108)
- (scale-float (float 6653884317228603 1.0d0) -170)
- (scale-float (float 8042430601619832 1.0d0) -225)
- (scale-float (float -5599598642987008 1.0d0) -280))
+ (renorm-5 (scale-float (float 8051450800901699 1.0d0) -54)
+ (scale-float (float 5434691875846169 1.0d0) -111)
+ (scale-float (float 8472824791907198 1.0d0) -165)
+ (scale-float (float -4993174229589980 1.0d0) -219)
+ (scale-float (float -8153916873375744 1.0d0) -275))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5918543469327278 1.0d0) -51)
- (scale-float (float 6720416503876543 1.0d0) -106)
- (scale-float (float 7278392337773370 1.0d0) -161)
- (scale-float (float -8580570494647867 1.0d0) -215)
- (scale-float (float 4700821298085888 1.0d0) -269))
+ (renorm-5 (scale-float (float 8084627433242335 1.0d0) -54)
+ (scale-float (float -5348243161213007 1.0d0) -108)
+ (scale-float (float -5207677165003738 1.0d0) -163)
+ (scale-float (float 5128329117851419 1.0d0) -219)
+ (scale-float (float -5280568687984640 1.0d0) -273))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5945971005743222 1.0d0) -51)
- (scale-float (float 5747872957565350 1.0d0) -106)
- (scale-float (float 7237512575569957 1.0d0) -160)
- (scale-float (float 7519916400400684 1.0d0) -214)
- (scale-float (float 7026029074186240 1.0d0) -271))
+ (renorm-5 (scale-float (float 8117849776705522 1.0d0) -54)
+ (scale-float (float 6927007138186838 1.0d0) -108)
+ (scale-float (float -5385777587490323 1.0d0) -162)
+ (scale-float (float 7882637401110373 1.0d0) -216)
+ (scale-float (float 6123034978058240 1.0d0) -272))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5973621638663912 1.0d0) -51)
- (scale-float (float 7603750326698922 1.0d0) -106)
- (scale-float (float 6652072696777216 1.0d0) -163)
- (scale-float (float 7989394499417516 1.0d0) -219)
- (scale-float (float 8104150199959552 1.0d0) -274))
+ (renorm-5 (scale-float (float 8151118082503223 1.0d0) -54)
+ (scale-float (float 8010217738834082 1.0d0) -108)
+ (scale-float (float 6233869504436171 1.0d0) -163)
+ (scale-float (float 6579181500662535 1.0d0) -217)
+ (scale-float (float 8541736362459136 1.0d0) -271))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6001498232945048 1.0d0) -51)
- (scale-float (float 5596161946714234 1.0d0) -105)
- (scale-float (float -5657098515459172 1.0d0) -159)
- (scale-float (float 6818458972753785 1.0d0) -214)
- (scale-float (float -5850059272421376 1.0d0) -268))
+ (renorm-5 (scale-float (float 8184432602976190 1.0d0) -54)
+ (scale-float (float -4678009856973107 1.0d0) -108)
+ (scale-float (float -6212101755560147 1.0d0) -163)
+ (scale-float (float 5386673916374896 1.0d0) -217)
+ (scale-float (float -6497159264468992 1.0d0) -274))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6029603702602126 1.0d0) -51)
- (scale-float (float -8661095485909429 1.0d0) -105)
- (scale-float (float 7964107159598417 1.0d0) -160)
- (scale-float (float 7268034324556626 1.0d0) -214)
- (scale-float (float 8202707095896064 1.0d0) -268))
+ (renorm-5 (scale-float (float 8217793591602337 1.0d0) -54)
+ (scale-float (float 6670368160536144 1.0d0) -108)
+ (scale-float (float -5213186646564335 1.0d0) -162)
+ (scale-float (float 8005924993100813 1.0d0) -218)
+ (scale-float (float 4589742073348096 1.0d0) -272))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6057941011869946 1.0d0) -51)
- (scale-float (float -7814804856545473 1.0d0) -105)
- (scale-float (float -8827798623861726 1.0d0) -160)
- (scale-float (float 7429499671020655 1.0d0) -216)
- (scale-float (float -6367692999884800 1.0d0) -271))
+ (renorm-5 (scale-float (float 8251201303005184 1.0d0) -54)
+ (scale-float (float 8472289190784020 1.0d0) -109)
+ (scale-float (float -6804170038942413 1.0d0) -163)
+ (scale-float (float -8481091176831416 1.0d0) -217)
+ (scale-float (float -8274927296708608 1.0d0) -273))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6086513176289648 1.0d0) -51)
- (scale-float (float 4578034378383201 1.0d0) -108)
- (scale-float (float 6982181288388044 1.0d0) -164)
- (scale-float (float -8494698295370626 1.0d0) -221)
- (scale-float (float 5957737645080576 1.0d0) -276))
+ (renorm-5 (scale-float (float 8284655992962352 1.0d0) -54)
+ (scale-float (float 8737697740526153 1.0d0) -112)
+ (scale-float (float 4989327011412342 1.0d0) -166)
+ (scale-float (float -8654144241045042 1.0d0) -220)
+ (scale-float (float -7940971920490496 1.0d0) -274))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6115323263824099 1.0d0) -51)
- (scale-float (float -5629808809415017 1.0d0) -105)
- (scale-float (float -5789479587879729 1.0d0) -159)
- (scale-float (float 6539899976723531 1.0d0) -213)
- (scale-float (float 5728472811929600 1.0d0) -267))
+ (renorm-5 (scale-float (float 8318157918414133 1.0d0) -54)
+ (scale-float (float 5393702223165852 1.0d0) -108)
+ (scale-float (float -6738619460628835 1.0d0) -166)
+ (scale-float (float 8111910404216900 1.0d0) -220)
+ (scale-float (float -7565201631084544 1.0d0) -276))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6144374396002502 1.0d0) -51)
- (scale-float (float -6897434225732640 1.0d0) -106)
- (scale-float (float 6336648630615878 1.0d0) -161)
- (scale-float (float 5703276546834140 1.0d0) -215)
- (scale-float (float -7928987398176768 1.0d0) -269))
+ (renorm-5 (scale-float (float 8351707337472124 1.0d0) -54)
+ (scale-float (float 6580886723114489 1.0d0) -109)
+ (scale-float (float 7770629039908958 1.0d0) -163)
+ (scale-float (float 4539051284252494 1.0d0) -221)
+ (scale-float (float -7660419082616832 1.0d0) -277))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6173669749095134 1.0d0) -51)
- (scale-float (float -5664846035779868 1.0d0) -105)
- (scale-float (float 8724016140480060 1.0d0) -161)
- (scale-float (float 6023810855636000 1.0d0) -215)
- (scale-float (float -8972796615917568 1.0d0) -270))
+ (renorm-5 (scale-float (float 8385304509427924 1.0d0) -54)
+ (scale-float (float -8991308292048439 1.0d0) -108)
+ (scale-float (float 7468341065508424 1.0d0) -165)
+ (scale-float (float 5818796494072124 1.0d0) -219)
+ (scale-float (float -5028710098403328 1.0d0) -275))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6203212555319126 1.0d0) -51)
- (scale-float (float 6605071462957030 1.0d0) -106)
- (scale-float (float -7037152943512478 1.0d0) -160)
- (scale-float (float 8602728544719004 1.0d0) -214)
- (scale-float (float -4829848980717568 1.0d0) -268))
+ (renorm-5 (scale-float (float 8418949694761899 1.0d0) -54)
+ (scale-float (float -6374091378859262 1.0d0) -109)
+ (scale-float (float -5374943449723078 1.0d0) -165)
+ (scale-float (float 4555101501983793 1.0d0) -219)
+ (scale-float (float -7702943139364864 1.0d0) -273))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6233006104076262 1.0d0) -51)
- (scale-float (float 5418068427722583 1.0d0) -107)
- (scale-float (float -7512046825645834 1.0d0) -161)
- (scale-float (float 7364970826292161 1.0d0) -217)
- (scale-float (float 8518978910683136 1.0d0) -271))
+ (renorm-5 (scale-float (float 8452643155152020 1.0d0) -54)
+ (scale-float (float 6202274721011577 1.0d0) -109)
+ (scale-float (float -6491377662184166 1.0d0) -165)
+ (scale-float (float -7017573449004785 1.0d0) -219)
+ (scale-float (float 5590855932182528 1.0d0) -273))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6263053743223778 1.0d0) -51)
- (scale-float (float 5338290581447600 1.0d0) -107)
- (scale-float (float -6774962939360783 1.0d0) -164)
- (scale-float (float -5068052199625959 1.0d0) -218)
- (scale-float (float 5680139766595584 1.0d0) -273))
+ (renorm-5 (scale-float (float 8486385153482762 1.0d0) -54)
+ (scale-float (float 8766047713785899 1.0d0) -112)
+ (scale-float (float -8232917648720740 1.0d0) -166)
+ (scale-float (float 8248969779935131 1.0d0) -222)
+ (scale-float (float -7864480035241984 1.0d0) -276))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6293358880379207 1.0d0) -51)
- (scale-float (float 7541088478502348 1.0d0) -108)
- (scale-float (float -6928433475633757 1.0d0) -162)
- (scale-float (float 6925116340197341 1.0d0) -220)
- (scale-float (float -5618580581253120 1.0d0) -274))
+ (renorm-5 (scale-float (float 8520175953854074 1.0d0) -54)
+ (scale-float (float 5652739356775365 1.0d0) -108)
+ (scale-float (float 7725888744126575 1.0d0) -163)
+ (scale-float (float 6266873194749620 1.0d0) -217)
+ (scale-float (float -4692701312122880 1.0d0) -271))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6323924984260328 1.0d0) -51)
- (scale-float (float -7957025817072767 1.0d0) -108)
- (scale-float (float 5238640849290498 1.0d0) -162)
- (scale-float (float -7237193257262058 1.0d0) -217)
- (scale-float (float 8963926809378816 1.0d0) -271))
+ (renorm-5 (scale-float (float 8554015821590423 1.0d0) -54)
+ (scale-float (float -5572600197130009 1.0d0) -113)
+ (scale-float (float -6831622091652219 1.0d0) -167)
+ (scale-float (float -8563553322584176 1.0d0) -221)
+ (scale-float (float 6205059659202560 1.0d0) -275))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6354755586061330 1.0d0) -51)
- (scale-float (float 6035977658673238 1.0d0) -105)
- (scale-float (float 5909115808556134 1.0d0) -161)
- (scale-float (float 5448585342718612 1.0d0) -216)
- (scale-float (float -7638585966329856 1.0d0) -272))
+ (renorm-5 (scale-float (float 8587905023249901 1.0d0) -54)
+ (scale-float (float 7612881592390848 1.0d0) -112)
+ (scale-float (float 5922087062680907 1.0d0) -167)
+ (scale-float (float -7007212083047902 1.0d0) -221)
+ (scale-float (float 8116629915828224 1.0d0) -276))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6385854280866341 1.0d0) -51)
- (scale-float (float -7329837226546584 1.0d0) -106)
- (scale-float (float -6237428625754562 1.0d0) -163)
- (scale-float (float 4654869573460842 1.0d0) -217)
- (scale-float (float 4724821654896640 1.0d0) -271))
+ (renorm-5 (scale-float (float 8621843826633410 1.0d0) -54)
+ (scale-float (float 6322337749047105 1.0d0) -108)
+ (scale-float (float 7560634196812342 1.0d0) -164)
+ (scale-float (float 7870288845622429 1.0d0) -221)
+ (scale-float (float -5998834309136384 1.0d0) -275))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6417224729101500 1.0d0) -51)
- (scale-float (float -8215297978981489 1.0d0) -106)
- (scale-float (float -5072007063126597 1.0d0) -160)
- (scale-float (float 6698464313634628 1.0d0) -215)
- (scale-float (float -6190594246344704 1.0d0) -269))
+ (renorm-5 (scale-float (float 8655832500793916 1.0d0) -54)
+ (scale-float (float -8363952213368707 1.0d0) -108)
+ (scale-float (float -5396004779500850 1.0d0) -162)
+ (scale-float (float 5885940877540764 1.0d0) -216)
+ (scale-float (float -5256022017605632 1.0d0) -272))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6448870658026821 1.0d0) -51)
- (scale-float (float 7234551941005534 1.0d0) -106)
- (scale-float (float 8326847540415379 1.0d0) -162)
- (scale-float (float -8295425596065759 1.0d0) -216)
- (scale-float (float 5520826882588672 1.0d0) -271))
+ (renorm-5 (scale-float (float 8689871316045770 1.0d0) -54)
+ (scale-float (float -7432889515702178 1.0d0) -110)
+ (scale-float (float 8866649053132337 1.0d0) -166)
+ (scale-float (float 4767266423799998 1.0d0) -220)
+ (scale-float (float -8296562063704064 1.0d0) -274))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6480795863269112 1.0d0) -51)
- (scale-float (float 5813548228359865 1.0d0) -105)
- (scale-float (float 5956902973334625 1.0d0) -161)
- (scale-float (float 8663020857685117 1.0d0) -217)
- (scale-float (float 4505446199459840 1.0d0) -271))
+ (renorm-5 (scale-float (float 8723960543974115 1.0d0) -54)
+ (scale-float (float -4842581324068868 1.0d0) -108)
+ (scale-float (float -7076387154038018 1.0d0) -162)
+ (scale-float (float 8373442959647582 1.0d0) -217)
+ (scale-float (float -5502449543413760 1.0d0) -274))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6513004210397278 1.0d0) -51)
- (scale-float (float 6466923411169698 1.0d0) -106)
- (scale-float (float -5267289208280170 1.0d0) -163)
- (scale-float (float 4609478115949264 1.0d0) -217)
- (scale-float (float 4739939846848512 1.0d0) -272))
+ (renorm-5 (scale-float (float 8758100457444352 1.0d0) -54)
+ (scale-float (float 7341009967788563 1.0d0) -108)
+ (scale-float (float -7592821898804018 1.0d0) -162)
+ (scale-float (float -5116645296225785 1.0d0) -217)
+ (scale-float (float 6627560141357056 1.0d0) -273))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6545499636541384 1.0d0) -51)
- (scale-float (float 7093153950789948 1.0d0) -105)
- (scale-float (float 8073936291697341 1.0d0) -159)
- (scale-float (float -5963469835091489 1.0d0) -213)
- (scale-float (float -6208799993217024 1.0d0) -267))
+ (renorm-5 (scale-float (float 8792291330611694 1.0d0) -54)
+ (scale-float (float 6027011009825708 1.0d0) -111)
+ (scale-float (float 7328159808672179 1.0d0) -166)
+ (scale-float (float -5158623149089477 1.0d0) -227)
+ (scale-float (float -7541098192830464 1.0d0) -281))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6578286152056903 1.0d0) -51)
- (scale-float (float -6247597367189225 1.0d0) -107)
- (scale-float (float 5166374476986216 1.0d0) -163)
- (scale-float (float -7446463954218782 1.0d0) -217)
- (scale-float (float -8826492783951872 1.0d0) -278))
+ (renorm-5 (scale-float (float 8826533438930782 1.0d0) -54)
+ (scale-float (float 8877873613918524 1.0d0) -108)
+ (scale-float (float -5947216410343675 1.0d0) -162)
+ (scale-float (float 6224794289481471 1.0d0) -218)
+ (scale-float (float -7516413266264064 1.0d0) -272))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6611367842235619 1.0d0) -51)
- (scale-float (float -5963923807595087 1.0d0) -105)
- (scale-float (float -7361707976966807 1.0d0) -159)
- (scale-float (float -8007427361941428 1.0d0) -213)
- (scale-float (float -5322375616880640 1.0d0) -267))
+ (renorm-5 (scale-float (float 8860827059165391 1.0d0) -54)
+ (scale-float (float 7605474188324829 1.0d0) -108)
+ (scale-float (float -6361355458841842 1.0d0) -164)
+ (scale-float (float -8265341481836926 1.0d0) -218)
+ (scale-float (float -7951326072799232 1.0d0) -274))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6644748869064731 1.0d0) -51)
- (scale-float (float -7144219676664510 1.0d0) -105)
- (scale-float (float -7128087720892246 1.0d0) -159)
- (scale-float (float 8414661721104555 1.0d0) -213)
- (scale-float (float -7483960229576704 1.0d0) -267))
+ (renorm-5 (scale-float (float 8895172469398201 1.0d0) -54)
+ (scale-float (float 6205080002828305 1.0d0) -109)
+ (scale-float (float 5411233389563850 1.0d0) -164)
+ (scale-float (float 8722910855031143 1.0d0) -220)
+ (scale-float (float -8225830325321728 1.0d0) -274))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6678433473035738 1.0d0) -51)
- (scale-float (float 7126836505406673 1.0d0) -105)
- (scale-float (float -7383799656035430 1.0d0) -159)
- (scale-float (float 7771064719831640 1.0d0) -213)
- (scale-float (float 6834613159329792 1.0d0) -267))
+ (renorm-5 (scale-float (float 8929569949040652 1.0d0) -54)
+ (scale-float (float 7985823067656771 1.0d0) -109)
+ (scale-float (float -7312356250659901 1.0d0) -165)
+ (scale-float (float 8966079680896307 1.0d0) -220)
+ (scale-float (float -6226556696133632 1.0d0) -274))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6712425975004767 1.0d0) -51)
- (scale-float (float -8313042875753344 1.0d0) -105)
- (scale-float (float -6688704901746663 1.0d0) -159)
- (scale-float (float 8301123678722637 1.0d0) -213)
- (scale-float (float -7721636949917696 1.0d0) -269))
+ (renorm-5 (scale-float (float 8964019778842877 1.0d0) -54)
+ (scale-float (float -6541485911088680 1.0d0) -113)
+ (scale-float (float -5666681644673596 1.0d0) -172)
+ (scale-float (float -5551580701507223 1.0d0) -226)
+ (scale-float (float 6001647847211008 1.0d0) -280))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6746730778106040 1.0d0) -51)
- (scale-float (float 6304322779476888 1.0d0) -105)
- (scale-float (float 7826894828906743 1.0d0) -160)
- (scale-float (float 8530425707514419 1.0d0) -214)
- (scale-float (float -6413262201864192 1.0d0) -268))
+ (renorm-5 (scale-float (float 8998522240903711 1.0d0) -54)
+ (scale-float (float -8693690530636151 1.0d0) -109)
+ (scale-float (float -6017760811640363 1.0d0) -163)
+ (scale-float (float -8364834800251897 1.0d0) -217)
+ (scale-float (float -4597957294981120 1.0d0) -271))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6781352369720294 1.0d0) -51)
- (scale-float (float 8983160734907249 1.0d0) -107)
- (scale-float (float -8664733214681189 1.0d0) -162)
- (scale-float (float -7960550074052480 1.0d0) -216)
- (scale-float (float -5650496022380544 1.0d0) -271))
+ (renorm-5 (scale-float (float 4516538809340391 1.0d0) -53)
+ (scale-float (float 4712323320191029 1.0d0) -107)
+ (scale-float (float 8117587223700539 1.0d0) -161)
+ (scale-float (float 8624475480540327 1.0d0) -216)
+ (scale-float (float 8192504200003584 1.0d0) -271))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6816295323499960 1.0d0) -51)
- (scale-float (float 7658952711249613 1.0d0) -107)
- (scale-float (float 4620256611705977 1.0d0) -161)
- (scale-float (float 5339882517437881 1.0d0) -215)
- (scale-float (float 6825061989482496 1.0d0) -272))
+ (renorm-5 (scale-float (float 4533843098500343 1.0d0) -53)
+ (scale-float (float 4714495066670999 1.0d0) -107)
+ (scale-float (float 5844489966106497 1.0d0) -161)
+ (scale-float (float 5721123954595768 1.0d0) -216)
+ (scale-float (float -5969894765461504 1.0d0) -270))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6851564301453058 1.0d0) -51)
- (scale-float (float 7273932892417493 1.0d0) -105)
- (scale-float (float 7813099383492531 1.0d0) -160)
- (scale-float (float -6761861727721979 1.0d0) -214)
- (scale-float (float -5350302622810112 1.0d0) -271))
+ (renorm-5 (scale-float (float 4551174131034618 1.0d0) -53)
+ (scale-float (float -6272022655175315 1.0d0) -107)
+ (scale-float (float 7666413529628192 1.0d0) -164)
+ (scale-float (float 7367618744276558 1.0d0) -219)
+ (scale-float (float -7733125290917888 1.0d0) -273))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6887164056087783 1.0d0) -51)
- (scale-float (float -8193605673865315 1.0d0) -105)
- (scale-float (float -8157229188379241 1.0d0) -159)
- (scale-float (float -6981673042370715 1.0d0) -225)
- (scale-float (float 6263709437526016 1.0d0) -282))
+ (renorm-5 (scale-float (float 4568532050740898 1.0d0) -53)
+ (scale-float (float -8241010225918141 1.0d0) -107)
+ (scale-float (float 5569596895828755 1.0d0) -163)
+ (scale-float (float 4990389010213445 1.0d0) -217)
+ (scale-float (float -5293832305573888 1.0d0) -271))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6923099432619853 1.0d0) -51)
- (scale-float (float 7311538058821719 1.0d0) -106)
- (scale-float (float 4900713516174706 1.0d0) -161)
- (scale-float (float 8730943236205763 1.0d0) -216)
- (scale-float (float 5571612107079680 1.0d0) -273))
+ (renorm-5 (scale-float (float 4585917002116852 1.0d0) -53)
+ (scale-float (float 5078639334726385 1.0d0) -108)
+ (scale-float (float 7422036535454205 1.0d0) -163)
+ (scale-float (float 8431631450077783 1.0d0) -218)
+ (scale-float (float -6462825830678528 1.0d0) -272))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6959375371244794 1.0d0) -51)
- (scale-float (float -7096258238654345 1.0d0) -107)
- (scale-float (float -5770947297319723 1.0d0) -161)
- (scale-float (float 8800175558598180 1.0d0) -221)
- (scale-float (float -5336386655748096 1.0d0) -278))
+ (renorm-5 (scale-float (float 4603329130365388 1.0d0) -53)
+ (scale-float (float -5452657142606152 1.0d0) -113)
+ (scale-float (float -5572966958953144 1.0d0) -167)
+ (scale-float (float 4896067438188759 1.0d0) -221)
+ (scale-float (float 6056677421350912 1.0d0) -275))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6995996909477367 1.0d0) -51)
- (scale-float (float 7135698892090420 1.0d0) -105)
- (scale-float (float 5966326990220529 1.0d0) -163)
- (scale-float (float 6252634847559452 1.0d0) -217)
- (scale-float (float -5590957230653440 1.0d0) -274))
+ (renorm-5 (scale-float (float 4620768581399943 1.0d0) -53)
+ (scale-float (float -6394889512408980 1.0d0) -107)
+ (scale-float (float -5248674441708195 1.0d0) -161)
+ (scale-float (float 8031626806578780 1.0d0) -215)
+ (scale-float (float -6772328549416960 1.0d0) -269))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7032969184560500 1.0d0) -51)
- (scale-float (float 5293838285907909 1.0d0) -107)
- (scale-float (float 8790224413870813 1.0d0) -161)
- (scale-float (float 8088085434372655 1.0d0) -218)
- (scale-float (float -6446348639928320 1.0d0) -273))
+ (renorm-5 (scale-float (float 4638235501849821 1.0d0) -53)
+ (scale-float (float 7342849852426935 1.0d0) -109)
+ (scale-float (float 4940420208140210 1.0d0) -166)
+ (scale-float (float -4950318263085061 1.0d0) -220)
+ (scale-float (float -4625648551985152 1.0d0) -274))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7070297435946114 1.0d0) -51)
- (scale-float (float 6411619724802408 1.0d0) -105)
- (scale-float (float -4939979436820681 1.0d0) -159)
- (scale-float (float 7212244304314212 1.0d0) -213)
- (scale-float (float -7270907064745984 1.0d0) -270))
+ (renorm-5 (scale-float (float 4655730039065576 1.0d0) -53)
+ (scale-float (float -7385125698097314 1.0d0) -107)
+ (scale-float (float -6384809890151543 1.0d0) -163)
+ (scale-float (float -5800383841029970 1.0d0) -220)
+ (scale-float (float -6188260689969152 1.0d0) -274))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7107987007850386 1.0d0) -51)
- (scale-float (float -7986454439992759 1.0d0) -107)
- (scale-float (float -7149323724943389 1.0d0) -165)
- (scale-float (float 5017022337912441 1.0d0) -219)
- (scale-float (float -8661650026528768 1.0d0) -277))
+ (renorm-5 (scale-float (float 4673252341124429 1.0d0) -53)
+ (scale-float (float -5924877989770359 1.0d0) -111)
+ (scale-float (float 7048520143305684 1.0d0) -167)
+ (scale-float (float 6111597169126294 1.0d0) -221)
+ (scale-float (float 5050432387809280 1.0d0) -276))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7146043351886043 1.0d0) -51)
- (scale-float (float 8494996469924568 1.0d0) -105)
- (scale-float (float 8211382279563909 1.0d0) -159)
- (scale-float (float -8621970676835046 1.0d0) -217)
- (scale-float (float 5061263191179264 1.0d0) -272))
+ (renorm-5 (scale-float (float 4690802556835742 1.0d0) -53)
+ (scale-float (float 6332623197245562 1.0d0) -107)
+ (scale-float (float -7492074553469258 1.0d0) -162)
+ (scale-float (float -6754431030774425 1.0d0) -219)
+ (scale-float (float -5812764733865984 1.0d0) -273))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7184472029774435 1.0d0) -51)
- (scale-float (float 8261201322528939 1.0d0) -105)
- (scale-float (float 8494826551139706 1.0d0) -159)
- (scale-float (float -5252592996148024 1.0d0) -215)
- (scale-float (float 4585238951624704 1.0d0) -272))
+ (renorm-5 (scale-float (float 4708380835746527 1.0d0) -53)
+ (scale-float (float 5051916109759041 1.0d0) -108)
+ (scale-float (float -5679535756966327 1.0d0) -162)
+ (scale-float (float -6625043549544358 1.0d0) -217)
+ (scale-float (float -5153473959624704 1.0d0) -271))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7223278716140197 1.0d0) -51)
- (scale-float (float -8823560495097450 1.0d0) -110)
- (scale-float (float 7033690483373051 1.0d0) -165)
- (scale-float (float 4597906315467119 1.0d0) -219)
- (scale-float (float -8669887290408960 1.0d0) -273))
+ (renorm-5 (scale-float (float 4725987328147002 1.0d0) -53)
+ (scale-float (float 5351540980857506 1.0d0) -107)
+ (scale-float (float 5017698638689441 1.0d0) -161)
+ (scale-float (float -7113428247683296 1.0d0) -215)
+ (scale-float (float -6001342382342144 1.0d0) -274))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7262469201391468 1.0d0) -51)
- (scale-float (float 4650384302815730 1.0d0) -108)
- (scale-float (float 5605504769622637 1.0d0) -164)
- (scale-float (float -8189277670227551 1.0d0) -218)
- (scale-float (float -7025344805601280 1.0d0) -272))
+ (renorm-5 (scale-float (float 4743622185076197 1.0d0) -53)
+ (scale-float (float -4748758349123609 1.0d0) -109)
+ (scale-float (float -5492849729385543 1.0d0) -165)
+ (scale-float (float 5442895358036660 1.0d0) -219)
+ (scale-float (float -5758552221941760 1.0d0) -274))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7302049394688733 1.0d0) -51)
- (scale-float (float 7279713193953038 1.0d0) -105)
- (scale-float (float -7208763068417898 1.0d0) -161)
- (scale-float (float -4768695581327986 1.0d0) -216)
- (scale-float (float 5237711203991552 1.0d0) -274))
+ (renorm-5 (scale-float (float 4761285558327599 1.0d0) -53)
+ (scale-float (float -7001910292957345 1.0d0) -109)
+ (scale-float (float 7369944209338672 1.0d0) -164)
+ (scale-float (float 4733316477155528 1.0d0) -220)
+ (scale-float (float -7265936393895936 1.0d0) -274))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7342025327005482 1.0d0) -51)
- (scale-float (float 5357997003469114 1.0d0) -105)
- (scale-float (float 8695503966818441 1.0d0) -159)
- (scale-float (float -7471504103356836 1.0d0) -214)
- (scale-float (float 6788700404973568 1.0d0) -270))
+ (renorm-5 (scale-float (float 4778977600454850 1.0d0) -53)
+ (scale-float (float -8163617702390692 1.0d0) -108)
+ (scale-float (float 8888228832011218 1.0d0) -163)
+ (scale-float (float -8419129775633155 1.0d0) -217)
+ (scale-float (float -5492767800557568 1.0d0) -272))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7382403154284018 1.0d0) -51)
- (scale-float (float -4962274709422180 1.0d0) -105)
- (scale-float (float 6670621399198282 1.0d0) -161)
- (scale-float (float 5070027530331753 1.0d0) -217)
- (scale-float (float 8690824917024768 1.0d0) -271))
+ (renorm-5 (scale-float (float 4796698464777487 1.0d0) -53)
+ (scale-float (float -5714826189455742 1.0d0) -107)
+ (scale-float (float 8099898202192098 1.0d0) -162)
+ (scale-float (float 7041527205063924 1.0d0) -217)
+ (scale-float (float 8188407241244672 1.0d0) -272))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7423189160689885 1.0d0) -51)
- (scale-float (float -7734054192845246 1.0d0) -106)
- (scale-float (float -6816372342739885 1.0d0) -160)
- (scale-float (float 6535733956045124 1.0d0) -214)
- (scale-float (float 4509157468127232 1.0d0) -268))
+ (renorm-5 (scale-float (float 4814448305386732 1.0d0) -53)
+ (scale-float (float -8539132865176413 1.0d0) -107)
+ (scale-float (float 5822439319087047 1.0d0) -162)
+ (scale-float (float 5825333419334273 1.0d0) -217)
+ (scale-float (float -5781450953359360 1.0d0) -271))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7464389761968532 1.0d0) -51)
- (scale-float (float 6893014061925633 1.0d0) -107)
- (scale-float (float -4977734513509468 1.0d0) -161)
- (scale-float (float -6025926871313080 1.0d0) -216)
- (scale-float (float -6946865583226880 1.0d0) -272))
+ (renorm-5 (scale-float (float 4832227277151328 1.0d0) -53)
+ (scale-float (float -8438381943499715 1.0d0) -111)
+ (scale-float (float -8372592215131924 1.0d0) -165)
+ (scale-float (float 8679567552715980 1.0d0) -219)
+ (scale-float (float 6272998587891712 1.0d0) -273))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7506011508907973 1.0d0) -51)
- (scale-float (float -5168444478203074 1.0d0) -106)
- (scale-float (float 6136656779657905 1.0d0) -162)
- (scale-float (float -6767814868545424 1.0d0) -218)
- (scale-float (float -5126616077041664 1.0d0) -272))
+ (renorm-5 (scale-float (float 4850035535723427 1.0d0) -53)
+ (scale-float (float -7945180857706407 1.0d0) -108)
+ (scale-float (float 7714728014554843 1.0d0) -164)
+ (scale-float (float 5808308686522136 1.0d0) -219)
+ (scale-float (float 8751604008878080 1.0d0) -273))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7548061090911371 1.0d0) -51)
- (scale-float (float 8602300988368704 1.0d0) -105)
- (scale-float (float 6621940108869347 1.0d0) -159)
- (scale-float (float -8287253242683244 1.0d0) -213)
- (scale-float (float -7136389171322880 1.0d0) -267))
+ (renorm-5 (scale-float (float 4867873237544520 1.0d0) -53)
+ (scale-float (float -5019721500009499 1.0d0) -109)
+ (scale-float (float 8026920363984100 1.0d0) -164)
+ (scale-float (float -6714864918368138 1.0d0) -219)
+ (scale-float (float -6406155998855168 1.0d0) -274))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7590545339683649 1.0d0) -51)
- (scale-float (float -4916189126172257 1.0d0) -105)
- (scale-float (float -6355932773319006 1.0d0) -159)
- (scale-float (float -7098041782917320 1.0d0) -215)
- (scale-float (float -6767458156216320 1.0d0) -269))
+ (renorm-5 (scale-float (float 4885740539851424 1.0d0) -53)
+ (scale-float (float 4655630896099995 1.0d0) -110)
+ (scale-float (float -5361624528102949 1.0d0) -166)
+ (scale-float (float -8600022955113898 1.0d0) -220)
+ (scale-float (float -8315235169468416 1.0d0) -277))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7633471233036373 1.0d0) -51)
- (scale-float (float 8721089986462790 1.0d0) -105)
- (scale-float (float -8552815325940330 1.0d0) -162)
- (scale-float (float 4876931181892126 1.0d0) -217)
- (scale-float (float 7797539261382656 1.0d0) -272))
+ (renorm-5 (scale-float (float 4903637600682314 1.0d0) -53)
+ (scale-float (float -8343593797004275 1.0d0) -107)
+ (scale-float (float -6880464660655384 1.0d0) -163)
+ (scale-float (float -5161724039003758 1.0d0) -218)
+ (scale-float (float -8758778528661504 1.0d0) -272))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7676845898815393 1.0d0) -51)
- (scale-float (float -4742638373772551 1.0d0) -105)
- (scale-float (float 7916583400175240 1.0d0) -159)
- (scale-float (float 8460862899289455 1.0d0) -213)
- (scale-float (float 5308269820141568 1.0d0) -267))
+ (renorm-5 (scale-float (float 4921564578882804 1.0d0) -53)
+ (scale-float (float 4558698905876837 1.0d0) -107)
+ (scale-float (float -6675770933383906 1.0d0) -163)
+ (scale-float (float -6175485009200689 1.0d0) -218)
+ (scale-float (float 5416315432468480 1.0d0) -274))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7720676618955844 1.0d0) -51)
- (scale-float (float -5979798443394226 1.0d0) -109)
- (scale-float (float 6850854280922486 1.0d0) -164)
- (scale-float (float 5976401171513954 1.0d0) -220)
- (scale-float (float -6835992994512896 1.0d0) -275))
+ (renorm-5 (scale-float (float 4939521634112088 1.0d0) -53)
+ (scale-float (float -5768107888022972 1.0d0) -107)
+ (scale-float (float -6517650997167120 1.0d0) -162)
+ (scale-float (float 7307944886714264 1.0d0) -218)
+ (scale-float (float 7980825110249472 1.0d0) -273))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7764970833669396 1.0d0) -51)
- (scale-float (float 5543007123611566 1.0d0) -107)
- (scale-float (float -5911100238100129 1.0d0) -163)
- (scale-float (float -6020602519605240 1.0d0) -218)
- (scale-float (float 8861062094651392 1.0d0) -272))
+ (renorm-5 (scale-float (float 4957508926849117 1.0d0) -53)
+ (scale-float (float -5880729525638918 1.0d0) -107)
+ (scale-float (float -5880387024013551 1.0d0) -161)
+ (scale-float (float 8057969928250970 1.0d0) -215)
+ (scale-float (float 6944751229255680 1.0d0) -270))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7809736145768777 1.0d0) -51)
- (scale-float (float -8674035310357218 1.0d0) -105)
- (scale-float (float 5148421548762854 1.0d0) -162)
- (scale-float (float -5680543539602354 1.0d0) -216)
- (scale-float (float -5047891664568320 1.0d0) -271))
+ (renorm-5 (scale-float (float 4975526618398843 1.0d0) -53)
+ (scale-float (float -6577772829195700 1.0d0) -111)
+ (scale-float (float -7049929814140454 1.0d0) -165)
+ (scale-float (float -5584941222299087 1.0d0) -219)
+ (scale-float (float -6585434108854272 1.0d0) -273))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7854980325134865 1.0d0) -51)
- (scale-float (float 5454493626848983 1.0d0) -105)
- (scale-float (float -5934139456574024 1.0d0) -160)
- (scale-float (float -6886896215496900 1.0d0) -216)
- (scale-float (float 8171164072935424 1.0d0) -270))
+ (renorm-5 (scale-float (float 4993574870898507 1.0d0) -53)
+ (scale-float (float 5062895028490683 1.0d0) -108)
+ (scale-float (float 8217973798328345 1.0d0) -162)
+ (scale-float (float 5371979073867810 1.0d0) -217)
+ (scale-float (float -8517496665931776 1.0d0) -272))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7900711313331869 1.0d0) -51)
- (scale-float (float 6225563646010790 1.0d0) -107)
- (scale-float (float 5318576075952789 1.0d0) -161)
- (scale-float (float 8951089425954890 1.0d0) -216)
- (scale-float (float -7900121062703104 1.0d0) -272))
+ (renorm-5 (scale-float (float 5011653847323981 1.0d0) -53)
+ (scale-float (float 6662133346642981 1.0d0) -107)
+ (scale-float (float -7386942265315174 1.0d0) -162)
+ (scale-float (float -6222074877515867 1.0d0) -216)
+ (scale-float (float -4907384985075712 1.0d0) -270))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7946937228376334 1.0d0) -51)
- (scale-float (float 4860551429143179 1.0d0) -105)
- (scale-float (float -6679183222842464 1.0d0) -159)
- (scale-float (float 8986203990266944 1.0d0) -213)
- (scale-float (float -7800362304159744 1.0d0) -267))
+ (renorm-5 (scale-float (float 5029763711496166 1.0d0) -53)
+ (scale-float (float -5433443448605480 1.0d0) -108)
+ (scale-float (float 7332416874678522 1.0d0) -162)
+ (scale-float (float -6100455288116160 1.0d0) -216)
+ (scale-float (float -4762855684489216 1.0d0) -270))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7993666369666015 1.0d0) -51)
- (scale-float (float 5060857131832143 1.0d0) -107)
- (scale-float (float 5977334033607903 1.0d0) -163)
- (scale-float (float -7012630978595163 1.0d0) -217)
- (scale-float (float -8051553535000576 1.0d0) -272))
+ (renorm-5 (scale-float (float 5047904628087439 1.0d0) -53)
+ (scale-float (float 6026828497807981 1.0d0) -109)
+ (scale-float (float -6878535050593153 1.0d0) -163)
+ (scale-float (float -8177381643089568 1.0d0) -217)
+ (scale-float (float 5873772891799552 1.0d0) -272))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8040907223074883 1.0d0) -51)
- (scale-float (float 7840365419538151 1.0d0) -110)
- (scale-float (float 5803342974358266 1.0d0) -167)
- (scale-float (float 5514076964040409 1.0d0) -223)
- (scale-float (float -8234034912034816 1.0d0) -278))
+ (renorm-5 (scale-float (float 5066076762628163 1.0d0) -53)
+ (scale-float (float -6507542383268338 1.0d0) -108)
+ (scale-float (float -5513687939405299 1.0d0) -163)
+ (scale-float (float -5818442986183336 1.0d0) -218)
+ (scale-float (float 5663989782020096 1.0d0) -272))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8088668466220848 1.0d0) -51)
- (scale-float (float 7402466421814509 1.0d0) -105)
- (scale-float (float 7796836038387986 1.0d0) -160)
- (scale-float (float -8349623045440600 1.0d0) -216)
- (scale-float (float 7996981865086976 1.0d0) -273))
+ (renorm-5 (scale-float (float 5084280281513242 1.0d0) -53)
+ (scale-float (float 7467568404310058 1.0d0) -109)
+ (scale-float (float 7834463879395691 1.0d0) -164)
+ (scale-float (float -6214698115088728 1.0d0) -218)
+ (scale-float (float 7834731090018304 1.0d0) -273))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8136958973913063 1.0d0) -51)
- (scale-float (float 6613989967363466 1.0d0) -108)
- (scale-float (float 4672363052762850 1.0d0) -162)
- (scale-float (float 5321008906127303 1.0d0) -216)
- (scale-float (float -6662496561135616 1.0d0) -271))
+ (renorm-5 (scale-float (float 5102515352008741 1.0d0) -53)
+ (scale-float (float 7579413498622770 1.0d0) -110)
+ (scale-float (float 8133827303462379 1.0d0) -165)
+ (scale-float (float -6468784855578576 1.0d0) -221)
+ (scale-float (float -6064180980875264 1.0d0) -275))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8185787823785987 1.0d0) -51)
- (scale-float (float 5815321815605723 1.0d0) -105)
- (scale-float (float 5052728278216073 1.0d0) -159)
- (scale-float (float 6743977587935015 1.0d0) -215)
- (scale-float (float 6233590479749120 1.0d0) -269))
+ (renorm-5 (scale-float (float 5120782142258555 1.0d0) -53)
+ (scale-float (float -7003545277399288 1.0d0) -109)
+ (scale-float (float 9004947866668099 1.0d0) -165)
+ (scale-float (float -4888525092852748 1.0d0) -221)
+ (scale-float (float 8141576595308544 1.0d0) -275))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8235164302127735 1.0d0) -51)
- (scale-float (float 6987608580827249 1.0d0) -105)
- (scale-float (float -5030607182998876 1.0d0) -159)
- (scale-float (float -6524005548070875 1.0d0) -213)
- (scale-float (float -6102268045000704 1.0d0) -269))
+ (renorm-5 (scale-float (float 5139080821291139 1.0d0) -53)
+ (scale-float (float -5195165037288157 1.0d0) -109)
+ (scale-float (float -5919373685808232 1.0d0) -165)
+ (scale-float (float -8464948068835386 1.0d0) -219)
+ (scale-float (float 4984409489932288 1.0d0) -273))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8285097909910559 1.0d0) -51)
- (scale-float (float 6590135828404160 1.0d0) -106)
- (scale-float (float 6742766983522102 1.0d0) -161)
- (scale-float (float 8188011768648261 1.0d0) -215)
- (scale-float (float -8228188902981632 1.0d0) -269))
+ (renorm-5 (scale-float (float 5157411559026295 1.0d0) -53)
+ (scale-float (float -6869926425063928 1.0d0) -108)
+ (scale-float (float -5065083946326269 1.0d0) -162)
+ (scale-float (float 5740385651574615 1.0d0) -219)
+ (scale-float (float -6017247978717184 1.0d0) -273))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8335598369031698 1.0d0) -51)
- (scale-float (float 4662302940215681 1.0d0) -109)
- (scale-float (float -7415916869142093 1.0d0) -163)
- (scale-float (float 7158239008047361 1.0d0) -219)
- (scale-float (float -4888138247831552 1.0d0) -273))
+ (renorm-5 (scale-float (float 5175774526282015 1.0d0) -53)
+ (scale-float (float 8151256617197900 1.0d0) -110)
+ (scale-float (float -5090237931201716 1.0d0) -166)
+ (scale-float (float 4822061880865465 1.0d0) -221)
+ (scale-float (float -7849799357825024 1.0d0) -275))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8386675628773205 1.0d0) -51)
- (scale-float (float 7564119385564749 1.0d0) -107)
- (scale-float (float 8015230080300989 1.0d0) -161)
- (scale-float (float 5998257482665129 1.0d0) -215)
- (scale-float (float 7929347722969088 1.0d0) -272))
+ (renorm-5 (scale-float (float 5194169894781386 1.0d0) -53)
+ (scale-float (float 5720248741678870 1.0d0) -109)
+ (scale-float (float 8476785785156408 1.0d0) -163)
+ (scale-float (float 6427013979864677 1.0d0) -218)
+ (scale-float (float 5803423157452800 1.0d0) -274))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8438339872489768 1.0d0) -51)
- (scale-float (float -7603073825222678 1.0d0) -106)
- (scale-float (float 6808761766149567 1.0d0) -160)
- (scale-float (float 8149354660853537 1.0d0) -214)
- (scale-float (float 7625273014435840 1.0d0) -268))
+ (renorm-5 (scale-float (float 5212597837159551 1.0d0) -53)
+ (scale-float (float -8620836191453318 1.0d0) -107)
+ (scale-float (float 5502489131210675 1.0d0) -162)
+ (scale-float (float -7155086140526867 1.0d0) -216)
+ (scale-float (float -5458023103414272 1.0d0) -270))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8490601524533965 1.0d0) -51)
- (scale-float (float -8689470578362239 1.0d0) -108)
- (scale-float (float -6187768527572901 1.0d0) -165)
- (scale-float (float -7008250757235598 1.0d0) -219)
- (scale-float (float -7684954594476032 1.0d0) -273))
+ (renorm-5 (scale-float (float 5231058526970729 1.0d0) -53)
+ (scale-float (float 8501416089415538 1.0d0) -107)
+ (scale-float (float -7323763124249820 1.0d0) -161)
+ (scale-float (float -7091310731773024 1.0d0) -215)
+ (scale-float (float -8850570112040960 1.0d0) -270))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8543471257428855 1.0d0) -51)
- (scale-float (float -7813605099909875 1.0d0) -106)
- (scale-float (float -6796497038942889 1.0d0) -160)
- (scale-float (float -5539743128678295 1.0d0) -216)
- (scale-float (float -6736160705675264 1.0d0) -270))
+ (renorm-5 (scale-float (float 5249552138695305 1.0d0) -53)
+ (scale-float (float 6446250485425073 1.0d0) -108)
+ (scale-float (float 7083381607740477 1.0d0) -164)
+ (scale-float (float -5327682890406449 1.0d0) -221)
+ (scale-float (float 6771644567650304 1.0d0) -279))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8596959999298260 1.0d0) -51)
- (scale-float (float 5021611987741080 1.0d0) -105)
- (scale-float (float 8770067323245082 1.0d0) -159)
- (scale-float (float -6967837632154810 1.0d0) -213)
- (scale-float (float 5315713377173504 1.0d0) -267))
+ (renorm-5 (scale-float (float 5268078847746965 1.0d0) -53)
+ (scale-float (float -7510185916055648 1.0d0) -109)
+ (scale-float (float 6448163352840430 1.0d0) -167)
+ (scale-float (float 6325767741577631 1.0d0) -223)
+ (scale-float (float 4857990289031168 1.0d0) -277))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8651078941565619 1.0d0) -51)
- (scale-float (float -6477829563185041 1.0d0) -106)
- (scale-float (float -7920204658193574 1.0d0) -161)
- (scale-float (float 6147178406352208 1.0d0) -215)
- (scale-float (float 6351786322886656 1.0d0) -269))
+ (renorm-5 (scale-float (float 5286638830479906 1.0d0) -53)
+ (scale-float (float 8984572682883449 1.0d0) -107)
+ (scale-float (float 8908915364579007 1.0d0) -162)
+ (scale-float (float -8223388342784113 1.0d0) -216)
+ (scale-float (float 5798531723657216 1.0d0) -270))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8705839546932790 1.0d0) -51)
- (scale-float (float -7529630816817007 1.0d0) -107)
- (scale-float (float 5735561243294849 1.0d0) -162)
- (scale-float (float 8942864457589964 1.0d0) -218)
- (scale-float (float -7502983972257792 1.0d0) -272))
+ (renorm-5 (scale-float (float 5305232264196107 1.0d0) -53)
+ (scale-float (float -8609900257612480 1.0d0) -107)
+ (scale-float (float -5052626816997173 1.0d0) -161)
+ (scale-float (float -7143976190293253 1.0d0) -216)
+ (scale-float (float 6384342274637824 1.0d0) -271))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8761253557650770 1.0d0) -51)
- (scale-float (float 4780698761224885 1.0d0) -106)
- (scale-float (float -5470212898494580 1.0d0) -160)
- (scale-float (float -4827378085896671 1.0d0) -214)
- (scale-float (float 7022379013521408 1.0d0) -268))
+ (renorm-5 (scale-float (float 5323859327152651 1.0d0) -53)
+ (scale-float (float 4755051264805225 1.0d0) -107)
+ (scale-float (float -5319438623619327 1.0d0) -161)
+ (scale-float (float 7827806197208571 1.0d0) -215)
+ (scale-float (float 8992059237531648 1.0d0) -272))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8817333004094852 1.0d0) -51)
- (scale-float (float -6645730691547394 1.0d0) -105)
- (scale-float (float 5209284030250115 1.0d0) -159)
- (scale-float (float -8939693872217468 1.0d0) -213)
- (scale-float (float 6883043139567616 1.0d0) -268))
+ (renorm-5 (scale-float (float 5342520198569132 1.0d0) -53)
+ (scale-float (float -6754203398931628 1.0d0) -107)
+ (scale-float (float 5271617458007905 1.0d0) -161)
+ (scale-float (float -6616588986438304 1.0d0) -215)
+ (scale-float (float -7840693537767424 1.0d0) -271))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8874090213657379 1.0d0) -51)
- (scale-float (float -8367030626203290 1.0d0) -105)
- (scale-float (float 6388696937998469 1.0d0) -159)
- (scale-float (float -8406146726255517 1.0d0) -214)
- (scale-float (float 6399905418280960 1.0d0) -269))
+ (renorm-5 (scale-float (float 5361215058635102 1.0d0) -53)
+ (scale-float (float 6270609391735678 1.0d0) -107)
+ (scale-float (float -5698788142442072 1.0d0) -161)
+ (scale-float (float 8842738579911480 1.0d0) -217)
+ (scale-float (float 5166792707047424 1.0d0) -271))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8931537819971910 1.0d0) -51)
- (scale-float (float 8524875977603628 1.0d0) -105)
- (scale-float (float -5848434731404509 1.0d0) -159)
- (scale-float (float -5667130485761682 1.0d0) -214)
- (scale-float (float 7217108479901696 1.0d0) -271))
+ (renorm-5 (scale-float (float 5379944088517606 1.0d0) -53)
+ (scale-float (float 6052877702039045 1.0d0) -107)
+ (scale-float (float 7111566148157146 1.0d0) -161)
+ (scale-float (float -8776373810154238 1.0d0) -219)
+ (scale-float (float -8095346564005888 1.0d0) -275))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8989688772483292 1.0d0) -51)
- (scale-float (float -6931103927484219 1.0d0) -107)
- (scale-float (float 5204888733770148 1.0d0) -164)
- (scale-float (float 6152375870965018 1.0d0) -218)
- (scale-float (float -4689379163111424 1.0d0) -272))
+ (renorm-5 (scale-float (float 5398707470368765 1.0d0) -53)
+ (scale-float (float -4797461858526456 1.0d0) -107)
+ (scale-float (float 6732965623139239 1.0d0) -162)
+ (scale-float (float 7749442918798755 1.0d0) -217)
+ (scale-float (float -6473382152568832 1.0d0) -272))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4524278173189428 1.0d0) -50)
- (scale-float (float -7857932784079837 1.0d0) -108)
- (scale-float (float -5220155662344333 1.0d0) -162)
- (scale-float (float -8705893866989820 1.0d0) -216)
- (scale-float (float -7330523124596736 1.0d0) -270))
+ (renorm-5 (scale-float (float 5417505387333433 1.0d0) -53)
+ (scale-float (float 8398376083975219 1.0d0) -107)
+ (scale-float (float 8156124031565761 1.0d0) -165)
+ (scale-float (float -7691301946366969 1.0d0) -219)
+ (scale-float (float 5984958108270592 1.0d0) -273))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4554077076448381 1.0d0) -50)
- (scale-float (float 5512839027679925 1.0d0) -105)
- (scale-float (float -7796765614716848 1.0d0) -164)
- (scale-float (float 8566408185532710 1.0d0) -218)
- (scale-float (float -4847576310349824 1.0d0) -273))
+ (renorm-5 (scale-float (float 5436338023556927 1.0d0) -53)
+ (scale-float (float -4676226270750820 1.0d0) -109)
+ (scale-float (float -7332101047345434 1.0d0) -163)
+ (scale-float (float 7501454629761823 1.0d0) -219)
+ (scale-float (float 5036410457423872 1.0d0) -273))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4584248075014142 1.0d0) -50)
- (scale-float (float 7778065609684159 1.0d0) -106)
- (scale-float (float -8267409846106549 1.0d0) -160)
- (scale-float (float 4825445499532236 1.0d0) -214)
- (scale-float (float -5874337337835520 1.0d0) -271))
+ (renorm-5 (scale-float (float 5455205564192810 1.0d0) -53)
+ (scale-float (float -7520232765810273 1.0d0) -107)
+ (scale-float (float 5106219158126203 1.0d0) -161)
+ (scale-float (float -6069406356390033 1.0d0) -215)
+ (scale-float (float -6621799189684224 1.0d0) -269))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4614798326815861 1.0d0) -50)
- (scale-float (float -7886745239856818 1.0d0) -105)
- (scale-float (float 6139448757204664 1.0d0) -159)
- (scale-float (float 4905901705808241 1.0d0) -214)
- (scale-float (float -6473661257318400 1.0d0) -268))
+ (renorm-5 (scale-float (float 5474108195410756 1.0d0) -53)
+ (scale-float (float 5963009621159524 1.0d0) -110)
+ (scale-float (float 8753520270311418 1.0d0) -168)
+ (scale-float (float 8476234578374146 1.0d0) -222)
+ (scale-float (float 6616462837940224 1.0d0) -277))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4645735174488265 1.0d0) -50)
- (scale-float (float -7391766335195762 1.0d0) -106)
- (scale-float (float -6949685806131419 1.0d0) -161)
- (scale-float (float -5091796544777519 1.0d0) -215)
- (scale-float (float -4733728074891264 1.0d0) -270))
+ (renorm-5 (scale-float (float 5493046104404481 1.0d0) -53)
+ (scale-float (float -7240953236880992 1.0d0) -107)
+ (scale-float (float 6687816297030731 1.0d0) -163)
+ (scale-float (float 6177251312029357 1.0d0) -219)
+ (scale-float (float 5062687302352896 1.0d0) -274))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4677066151368610 1.0d0) -50)
- (scale-float (float -4787054302984548 1.0d0) -106)
- (scale-float (float 7329507444535018 1.0d0) -161)
- (scale-float (float 8058361876170577 1.0d0) -218)
- (scale-float (float -7270852575887360 1.0d0) -276))
+ (renorm-5 (scale-float (float 5512019479399737 1.0d0) -53)
+ (scale-float (float -5337476887189881 1.0d0) -107)
+ (scale-float (float 8132746143439031 1.0d0) -162)
+ (scale-float (float 6203706505607338 1.0d0) -219)
+ (scale-float (float 8549331347439616 1.0d0) -275))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4708798987728803 1.0d0) -50)
- (scale-float (float 8750319080912930 1.0d0) -104)
- (scale-float (float 4772777117450483 1.0d0) -159)
- (scale-float (float -7709029592768861 1.0d0) -214)
- (scale-float (float -7500734252023808 1.0d0) -268))
+ (renorm-5 (scale-float (float 5531028509662387 1.0d0) -53)
+ (scale-float (float 5006253830174276 1.0d0) -107)
+ (scale-float (float -6064611521532516 1.0d0) -163)
+ (scale-float (float 5075026078773125 1.0d0) -220)
+ (scale-float (float -8088168960098304 1.0d0) -277))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4740941617253534 1.0d0) -50)
- (scale-float (float 7836652996916187 1.0d0) -104)
- (scale-float (float 7029551319114224 1.0d0) -158)
- (scale-float (float 7474721444715091 1.0d0) -212)
- (scale-float (float 4571996889481216 1.0d0) -268))
+ (renorm-5 (scale-float (float 5550073385506547 1.0d0) -53)
+ (scale-float (float -7963748165533310 1.0d0) -107)
+ (scale-float (float 5408021657844878 1.0d0) -164)
+ (scale-float (float -6897421132571305 1.0d0) -218)
+ (scale-float (float 5961352389984256 1.0d0) -273))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4773502183775811 1.0d0) -50)
- (scale-float (float 7666250788945536 1.0d0) -106)
- (scale-float (float -4973721619222805 1.0d0) -160)
- (scale-float (float -6547947312642659 1.0d0) -214)
- (scale-float (float 7501570719612928 1.0d0) -277))
+ (renorm-5 (scale-float (float 5569154298302794 1.0d0) -53)
+ (scale-float (float 4615503510353601 1.0d0) -107)
+ (scale-float (float -7540979643400192 1.0d0) -172)
+ (scale-float (float 7836118583884861 1.0d0) -228)
+ (scale-float (float -6583101056614400 1.0d0) -282))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4806489048281921 1.0d0) -50)
- (scale-float (float -5716680014470084 1.0d0) -105)
- (scale-float (float -8783805053184800 1.0d0) -159)
- (scale-float (float -8831983638861787 1.0d0) -217)
- (scale-float (float 6957023344197632 1.0d0) -271))
+ (renorm-5 (scale-float (float 5588271440486463 1.0d0) -53)
+ (scale-float (float -7308982168651133 1.0d0) -108)
+ (scale-float (float 6922685267173202 1.0d0) -162)
+ (scale-float (float -7857914317401664 1.0d0) -217)
+ (scale-float (float 5791752692269056 1.0d0) -271))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4839910796198468 1.0d0) -50)
- (scale-float (float 6594642138244419 1.0d0) -104)
- (scale-float (float 5288964033025966 1.0d0) -158)
- (scale-float (float 8634063999222374 1.0d0) -213)
- (scale-float (float -8893718092922880 1.0d0) -267))
+ (renorm-5 (scale-float (float 5607425005565998 1.0d0) -53)
+ (scale-float (float 7456123125286854 1.0d0) -107)
+ (scale-float (float -6354016403351228 1.0d0) -163)
+ (scale-float (float -4731131524276583 1.0d0) -221)
+ (scale-float (float -8326281708961792 1.0d0) -276))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4873776244974835 1.0d0) -50)
- (scale-float (float -8639979433695208 1.0d0) -104)
- (scale-float (float 4828621720356606 1.0d0) -158)
- (scale-float (float -5877036457540954 1.0d0) -216)
- (scale-float (float -8180534148333568 1.0d0) -271))
+ (renorm-5 (scale-float (float 5626615188131397 1.0d0) -53)
+ (scale-float (float -7513025945375216 1.0d0) -109)
+ (scale-float (float -6658975433691672 1.0d0) -163)
+ (scale-float (float 6802116939384472 1.0d0) -217)
+ (scale-float (float -8678364394618880 1.0d0) -272))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4908094451975123 1.0d0) -50)
- (scale-float (float -4828304883868757 1.0d0) -108)
- (scale-float (float -6270316524648948 1.0d0) -162)
- (scale-float (float 5225900337775959 1.0d0) -218)
- (scale-float (float -8854315413274624 1.0d0) -272))
+ (renorm-5 (scale-float (float 5645842183862715 1.0d0) -53)
+ (scale-float (float -7743478944270931 1.0d0) -108)
+ (scale-float (float -6353264113068006 1.0d0) -166)
+ (scale-float (float -8340573167581726 1.0d0) -220)
+ (scale-float (float 5344765958422528 1.0d0) -274))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4942874722694433 1.0d0) -50)
- (scale-float (float 8311431571623252 1.0d0) -104)
- (scale-float (float -5850013926105659 1.0d0) -160)
- (scale-float (float 5033857637343171 1.0d0) -217)
- (scale-float (float -5846683619426304 1.0d0) -274))
+ (renorm-5 (scale-float (float 5665106189538657 1.0d0) -53)
+ (scale-float (float -5978929548864813 1.0d0) -108)
+ (scale-float (float -5463588819488222 1.0d0) -163)
+ (scale-float (float 6003114251484877 1.0d0) -218)
+ (scale-float (float 7222947287400448 1.0d0) -274))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4978126619315118 1.0d0) -50)
- (scale-float (float 8651259418657351 1.0d0) -104)
- (scale-float (float 8356913624992857 1.0d0) -159)
- (scale-float (float -8997010089735028 1.0d0) -214)
- (scale-float (float -8852131818700800 1.0d0) -268))
+ (renorm-5 (scale-float (float 5684407403045241 1.0d0) -53)
+ (scale-float (float -8294272085087370 1.0d0) -107)
+ (scale-float (float -8381390268267532 1.0d0) -161)
+ (scale-float (float 5416108916544789 1.0d0) -217)
+ (scale-float (float 6054767888465920 1.0d0) -271))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5013859969619551 1.0d0) -50)
- (scale-float (float -8698474462696510 1.0d0) -105)
- (scale-float (float -5523882703258717 1.0d0) -159)
- (scale-float (float 6821949825607191 1.0d0) -213)
- (scale-float (float 4868488751235072 1.0d0) -267))
+ (renorm-5 (scale-float (float 5703746023384539 1.0d0) -53)
+ (scale-float (float -7456086796685430 1.0d0) -107)
+ (scale-float (float 7120442194564315 1.0d0) -163)
+ (scale-float (float -8693281305931273 1.0d0) -219)
+ (scale-float (float -6974898897551360 1.0d0) -273))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5050084876276853 1.0d0) -50)
- (scale-float (float -4800311499441744 1.0d0) -104)
- (scale-float (float 6845021933519717 1.0d0) -159)
- (scale-float (float -5685142016707295 1.0d0) -213)
- (scale-float (float -8727124494548992 1.0d0) -267))
+ (renorm-5 (scale-float (float 5723122250683500 1.0d0) -53)
+ (scale-float (float 5093982224413668 1.0d0) -110)
+ (scale-float (float -8917924974158974 1.0d0) -164)
+ (scale-float (float -8201133831457905 1.0d0) -218)
+ (scale-float (float 4813372552380416 1.0d0) -272))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5086811726522023 1.0d0) -50)
- (scale-float (float -5345881373634279 1.0d0) -109)
- (scale-float (float -6685493706246338 1.0d0) -169)
- (scale-float (float -5501064813076920 1.0d0) -223)
- (scale-float (float 4551987802669056 1.0d0) -280))
+ (renorm-5 (scale-float (float 5742536286202851 1.0d0) -53)
+ (scale-float (float 8097550956249641 1.0d0) -109)
+ (scale-float (float -6700769854112535 1.0d0) -163)
+ (scale-float (float -8486352386985402 1.0d0) -220)
+ (scale-float (float -6325315755835392 1.0d0) -275))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5124051202246940 1.0d0) -50)
- (scale-float (float 5343290894274956 1.0d0) -104)
- (scale-float (float 4609766441216761 1.0d0) -158)
- (scale-float (float -5255239983854309 1.0d0) -212)
- (scale-float (float 6168102361399296 1.0d0) -268))
+ (renorm-5 (scale-float (float 5761988332346076 1.0d0) -53)
+ (scale-float (float 8070044467396410 1.0d0) -107)
+ (scale-float (float 7521571299958967 1.0d0) -162)
+ (scale-float (float -7360931258275250 1.0d0) -216)
+ (scale-float (float -8041194637131776 1.0d0) -271))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5161814290523839 1.0d0) -50)
- (scale-float (float 8189635444913318 1.0d0) -106)
- (scale-float (float 8577718390294588 1.0d0) -160)
- (scale-float (float -7603337344007599 1.0d0) -216)
- (scale-float (float -7685941649997824 1.0d0) -273))
+ (renorm-5 (scale-float (float 5781478592668482 1.0d0) -53)
+ (scale-float (float -6348649609093203 1.0d0) -107)
+ (scale-float (float -7865776481343855 1.0d0) -163)
+ (scale-float (float -7414322417664008 1.0d0) -217)
+ (scale-float (float -7923972996399104 1.0d0) -271))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5200112294583036 1.0d0) -50)
- (scale-float (float -4721808481078608 1.0d0) -104)
- (scale-float (float -5816123228221285 1.0d0) -162)
- (scale-float (float 8620514424462029 1.0d0) -217)
- (scale-float (float 7757670207193088 1.0d0) -271))
+ (renorm-5 (scale-float (float 5801007271886338 1.0d0) -53)
+ (scale-float (float 4883452379124426 1.0d0) -109)
+ (scale-float (float 5517722868438546 1.0d0) -166)
+ (scale-float (float 7452721618571625 1.0d0) -223)
+ (scale-float (float -7797708580454400 1.0d0) -277))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5238956845267947 1.0d0) -50)
- (scale-float (float -8744191081096657 1.0d0) -105)
- (scale-float (float -6127764073690772 1.0d0) -160)
- (scale-float (float 8200948064908668 1.0d0) -215)
- (scale-float (float -4881870132609024 1.0d0) -272))
+ (renorm-5 (scale-float (float 5820574575886111 1.0d0) -53)
+ (scale-float (float -5544453050321818 1.0d0) -107)
+ (scale-float (float -6019990252576236 1.0d0) -161)
+ (scale-float (float -5241780552283328 1.0d0) -215)
+ (scale-float (float -4599632823230464 1.0d0) -269))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5278359912991787 1.0d0) -50)
- (scale-float (float 8687334381320225 1.0d0) -108)
- (scale-float (float -6068684457660176 1.0d0) -162)
- (scale-float (float -6207766203371522 1.0d0) -217)
- (scale-float (float 8485621868265472 1.0d0) -272))
+ (renorm-5 (scale-float (float 5840180711733770 1.0d0) -53)
+ (scale-float (float 5617607438242589 1.0d0) -112)
+ (scale-float (float 6400824792886757 1.0d0) -166)
+ (scale-float (float -6353522462595121 1.0d0) -221)
+ (scale-float (float 6875531474632704 1.0d0) -276))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5318333820221769 1.0d0) -50)
- (scale-float (float -5523609802630350 1.0d0) -106)
- (scale-float (float -8560352922485173 1.0d0) -162)
- (scale-float (float 5920709932808206 1.0d0) -217)
- (scale-float (float -8637451779702784 1.0d0) -271))
+ (renorm-5 (scale-float (float 5859825887684189 1.0d0) -53)
+ (scale-float (float -6902423295780859 1.0d0) -108)
+ (scale-float (float 8888330413005266 1.0d0) -162)
+ (scale-float (float 7535209701492570 1.0d0) -216)
+ (scale-float (float -8860849506877440 1.0d0) -273))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5358891254518155 1.0d0) -50)
- (scale-float (float -4890941832729782 1.0d0) -104)
- (scale-float (float 8524554922066444 1.0d0) -158)
- (scale-float (float 5619661652289697 1.0d0) -212)
- (scale-float (float 6579991304568832 1.0d0) -267))
+ (renorm-5 (scale-float (float 5879510313190625 1.0d0) -53)
+ (scale-float (float -6814694338286297 1.0d0) -108)
+ (scale-float (float -8801549044228897 1.0d0) -162)
+ (scale-float (float 4999351469611069 1.0d0) -216)
+ (scale-float (float 8673660416131072 1.0d0) -270))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5400045282157147 1.0d0) -50)
- (scale-float (float 8864323672088947 1.0d0) -106)
- (scale-float (float -8445021323397316 1.0d0) -160)
- (scale-float (float 8492097350381435 1.0d0) -215)
- (scale-float (float 6155854513045504 1.0d0) -270))
+ (renorm-5 (scale-float (float 5899234198914290 1.0d0) -53)
+ (scale-float (float 6283006921937045 1.0d0) -109)
+ (scale-float (float 6200229083739520 1.0d0) -164)
+ (scale-float (float 4977927589994460 1.0d0) -218)
+ (scale-float (float -7605320988360704 1.0d0) -273))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5441809362368346 1.0d0) -50)
- (scale-float (float -5842943949056910 1.0d0) -110)
- (scale-float (float 5009571930499495 1.0d0) -164)
- (scale-float (float -7519500500875788 1.0d0) -218)
- (scale-float (float -5085596283830272 1.0d0) -272))
+ (renorm-5 (scale-float (float 5918997756734008 1.0d0) -53)
+ (scale-float (float 6988684443349567 1.0d0) -108)
+ (scale-float (float -6152520313082565 1.0d0) -162)
+ (scale-float (float -7782308246609974 1.0d0) -219)
+ (scale-float (float 8754796978765824 1.0d0) -275))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5484197362219362 1.0d0) -50)
- (scale-float (float 4899532164520227 1.0d0) -104)
- (scale-float (float 6603314574193900 1.0d0) -158)
- (scale-float (float -4552978725019522 1.0d0) -212)
- (scale-float (float -8641795423010816 1.0d0) -268))
+ (renorm-5 (scale-float (float 5938801199755960 1.0d0) -53)
+ (scale-float (float -5926394093514177 1.0d0) -115)
+ (scale-float (float 7620890547647189 1.0d0) -169)
+ (scale-float (float 8680018638312400 1.0d0) -223)
+ (scale-float (float -4624686801485824 1.0d0) -278))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5527223572182170 1.0d0) -50)
- (scale-float (float -6055838300213851 1.0d0) -104)
- (scale-float (float -6362698856028721 1.0d0) -160)
- (scale-float (float -8109194223806676 1.0d0) -215)
- (scale-float (float -7886760551383040 1.0d0) -270))
+ (renorm-5 (scale-float (float 5958644742323519 1.0d0) -53)
+ (scale-float (float 5837499729476640 1.0d0) -108)
+ (scale-float (float 5805594171748389 1.0d0) -169)
+ (scale-float (float 6841182626183782 1.0d0) -224)
+ (scale-float (float 5399122601312256 1.0d0) -278))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5570902722417903 1.0d0) -50)
- (scale-float (float 5084679226584164 1.0d0) -104)
- (scale-float (float 7089728589645293 1.0d0) -158)
- (scale-float (float -5190801840792408 1.0d0) -216)
- (scale-float (float -5339212592709632 1.0d0) -272))
+ (renorm-5 (scale-float (float 5978528600027178 1.0d0) -53)
+ (scale-float (float 4703174464159792 1.0d0) -107)
+ (scale-float (float -5390198599519672 1.0d0) -162)
+ (scale-float (float -6489710829442164 1.0d0) -221)
+ (scale-float (float -4908450896150528 1.0d0) -275))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5615249999819091 1.0d0) -50)
- (scale-float (float -6686020099209120 1.0d0) -104)
- (scale-float (float -7196983245802506 1.0d0) -158)
- (scale-float (float 8552126782874617 1.0d0) -213)
- (scale-float (float -5338697915203584 1.0d0) -268))
+ (renorm-5 (scale-float (float 5998452989714567 1.0d0) -53)
+ (scale-float (float -8096041220161000 1.0d0) -107)
+ (scale-float (float -7835598253830714 1.0d0) -161)
+ (scale-float (float -7012132770705025 1.0d0) -216)
+ (scale-float (float -7817595773452288 1.0d0) -270))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5660281065850737 1.0d0) -50)
- (scale-float (float 4792801230552846 1.0d0) -107)
- (scale-float (float 7943899304054448 1.0d0) -161)
- (scale-float (float 6000933608322297 1.0d0) -217)
- (scale-float (float -7416525918044160 1.0d0) -273))
+ (renorm-5 (scale-float (float 6018418129500560 1.0d0) -53)
+ (scale-float (float 6659489087534709 1.0d0) -107)
+ (scale-float (float 8345502268995181 1.0d0) -162)
+ (scale-float (float -8150710203863600 1.0d0) -218)
+ (scale-float (float 7666645967306752 1.0d0) -272))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5706012075234297 1.0d0) -50)
- (scale-float (float -7952366272028203 1.0d0) -106)
- (scale-float (float 8808581243530676 1.0d0) -161)
- (scale-float (float 5876141118921453 1.0d0) -215)
- (scale-float (float -7669317861769216 1.0d0) -269))
+ (renorm-5 (scale-float (float 6038424238777487 1.0d0) -53)
+ (scale-float (float 7781913615198190 1.0d0) -108)
+ (scale-float (float 7611681214395614 1.0d0) -162)
+ (scale-float (float 7024337346699218 1.0d0) -217)
+ (scale-float (float -7959062663266304 1.0d0) -272))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5752459695521358 1.0d0) -50)
- (scale-float (float -5755781022198304 1.0d0) -104)
- (scale-float (float 6235408287345925 1.0d0) -158)
- (scale-float (float 8125829755427516 1.0d0) -212)
- (scale-float (float 7651930072711168 1.0d0) -267))
+ (renorm-5 (scale-float (float 6058471538225425 1.0d0) -53)
+ (scale-float (float -8636030985155905 1.0d0) -107)
+ (scale-float (float 6386033233360409 1.0d0) -161)
+ (scale-float (float -8264358932081060 1.0d0) -216)
+ (scale-float (float -8851278994014208 1.0d0) -270))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5799641127606861 1.0d0) -50)
- (scale-float (float -5331669837522491 1.0d0) -104)
- (scale-float (float 8828359409000453 1.0d0) -159)
- (scale-float (float -7330718632146391 1.0d0) -213)
- (scale-float (float 4894007987437568 1.0d0) -267))
+ (renorm-5 (scale-float (float 6078560249822594 1.0d0) -53)
+ (scale-float (float 6154024088984338 1.0d0) -108)
+ (scale-float (float 5145445860402320 1.0d0) -162)
+ (scale-float (float 6519894297640498 1.0d0) -218)
+ (scale-float (float 7430925104119808 1.0d0) -272))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5847574127234897 1.0d0) -50)
- (scale-float (float -4765276063086402 1.0d0) -105)
- (scale-float (float 7588657903329273 1.0d0) -159)
- (scale-float (float -5458415408401000 1.0d0) -216)
- (scale-float (float 4637968444555264 1.0d0) -270))
+ (renorm-5 (scale-float (float 6098690596855854 1.0d0) -53)
+ (scale-float (float -5742416278425873 1.0d0) -108)
+ (scale-float (float -8701688771941415 1.0d0) -163)
+ (scale-float (float 6856703381738876 1.0d0) -218)
+ (scale-float (float 8330054362464256 1.0d0) -274))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5896277027553566 1.0d0) -50)
- (scale-float (float -7925399423902561 1.0d0) -104)
- (scale-float (float -8205732894593822 1.0d0) -159)
- (scale-float (float 6439815312103899 1.0d0) -213)
- (scale-float (float -8312359159857152 1.0d0) -268))
+ (renorm-5 (scale-float (float 6118862803931286 1.0d0) -53)
+ (scale-float (float 7287168916884525 1.0d0) -108)
+ (scale-float (float 6700569177866219 1.0d0) -162)
+ (scale-float (float -7056829416081209 1.0d0) -217)
+ (scale-float (float 7133017988202496 1.0d0) -272))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5945768762779089 1.0d0) -50)
- (scale-float (float -4604541852401179 1.0d0) -104)
- (scale-float (float -8127518754929395 1.0d0) -158)
- (scale-float (float 6989430539955643 1.0d0) -213)
- (scale-float (float 5123010860154880 1.0d0) -270))
+ (renorm-5 (scale-float (float 6139077096984887 1.0d0) -53)
+ (scale-float (float 7601354138854478 1.0d0) -109)
+ (scale-float (float 7827836787722962 1.0d0) -163)
+ (scale-float (float -8707805869477676 1.0d0) -217)
+ (scale-float (float -7011207342981120 1.0d0) -277))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5996068893033352 1.0d0) -50)
- (scale-float (float 4707612555350960 1.0d0) -106)
- (scale-float (float 7425587011449122 1.0d0) -160)
- (scale-float (float 5352922239701652 1.0d0) -214)
- (scale-float (float 6950289070620672 1.0d0) -268))
+ (renorm-5 (scale-float (float 6159333703293354 1.0d0) -53)
+ (scale-float (float -6300013242813811 1.0d0) -108)
+ (scale-float (float -7055273727637067 1.0d0) -163)
+ (scale-float (float 6354926587916120 1.0d0) -218)
+ (scale-float (float 7172218111066112 1.0d0) -272))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6047197630423323 1.0d0) -50)
- (scale-float (float -8923246722605432 1.0d0) -106)
- (scale-float (float -6168958763822143 1.0d0) -161)
- (scale-float (float -4619840048743219 1.0d0) -216)
- (scale-float (float 5481386463854592 1.0d0) -270))
+ (renorm-5 (scale-float (float 6179632851484974 1.0d0) -53)
+ (scale-float (float 8851058764858042 1.0d0) -107)
+ (scale-float (float -5393991416546434 1.0d0) -161)
+ (scale-float (float -7087928934921133 1.0d0) -218)
+ (scale-float (float -7137013930983424 1.0d0) -272))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6099175866435397 1.0d0) -50)
- (scale-float (float -8221018383842792 1.0d0) -105)
- (scale-float (float 6231283718599270 1.0d0) -162)
- (scale-float (float 8248289034415291 1.0d0) -217)
- (scale-float (float 4583417639600128 1.0d0) -271))
+ (renorm-5 (scale-float (float 6199974771550620 1.0d0) -53)
+ (scale-float (float -6095652345689366 1.0d0) -108)
+ (scale-float (float 7608163058261834 1.0d0) -164)
+ (scale-float (float 7860502758117739 1.0d0) -220)
+ (scale-float (float -8199903066980352 1.0d0) -277))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6152025200722677 1.0d0) -50)
- (scale-float (float -5024973585206614 1.0d0) -105)
- (scale-float (float 4919147755933202 1.0d0) -164)
- (scale-float (float -5009014416736221 1.0d0) -218)
- (scale-float (float 6163397020745728 1.0d0) -272))
+ (renorm-5 (scale-float (float 6220359694854838 1.0d0) -53)
+ (scale-float (float 6523866044383337 1.0d0) -107)
+ (scale-float (float -6173852507803036 1.0d0) -164)
+ (scale-float (float 7082191144354423 1.0d0) -218)
+ (scale-float (float 6277452351078400 1.0d0) -272))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6205767971368524 1.0d0) -50)
- (scale-float (float -6652234810155037 1.0d0) -104)
- (scale-float (float 4924533252939154 1.0d0) -158)
- (scale-float (float 6993553090393191 1.0d0) -212)
- (scale-float (float 7498201661579264 1.0d0) -266))
+ (renorm-5 (scale-float (float 6240787854147056 1.0d0) -53)
+ (scale-float (float 7281230495326443 1.0d0) -108)
+ (scale-float (float 4638527086501368 1.0d0) -162)
+ (scale-float (float -8570506498232121 1.0d0) -216)
+ (scale-float (float -6718319458402304 1.0d0) -270))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6260427286715461 1.0d0) -50)
- (scale-float (float -5261794858909198 1.0d0) -104)
- (scale-float (float 8088564039653977 1.0d0) -158)
- (scale-float (float 5860056599597916 1.0d0) -214)
- (scale-float (float 8300108917899264 1.0d0) -268))
+ (renorm-5 (scale-float (float 6261259483572883 1.0d0) -53)
+ (scale-float (float -6213603737296974 1.0d0) -107)
+ (scale-float (float 8828115745955665 1.0d0) -163)
+ (scale-float (float -5444066038342533 1.0d0) -221)
+ (scale-float (float -6460963274883072 1.0d0) -275))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6316027058854719 1.0d0) -50)
- (scale-float (float 4912305611875474 1.0d0) -107)
- (scale-float (float 8247457332486304 1.0d0) -161)
- (scale-float (float 7179067211439716 1.0d0) -215)
- (scale-float (float 8680078238613504 1.0d0) -269))
+ (renorm-5 (scale-float (float 6281774818685523 1.0d0) -53)
+ (scale-float (float -8190142974415872 1.0d0) -108)
+ (scale-float (float 8922183346235503 1.0d0) -163)
+ (scale-float (float 7614728183057357 1.0d0) -219)
+ (scale-float (float -7801636618895360 1.0d0) -273))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6372592038878388 1.0d0) -50)
- (scale-float (float 8934256162385481 1.0d0) -104)
- (scale-float (float -8150754196643953 1.0d0) -158)
- (scale-float (float -6395337638343832 1.0d0) -214)
- (scale-float (float 8819950786838528 1.0d0) -270))
+ (renorm-5 (scale-float (float 6302334096457298 1.0d0) -53)
+ (scale-float (float 6139409532121475 1.0d0) -109)
+ (scale-float (float -8459381361295595 1.0d0) -163)
+ (scale-float (float 4819516272065152 1.0d0) -218)
+ (scale-float (float -6501872342401024 1.0d0) -272))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6430147854003365 1.0d0) -50)
- (scale-float (float 5339761977269331 1.0d0) -106)
- (scale-float (float 8307957748230247 1.0d0) -161)
- (scale-float (float -7731042475045646 1.0d0) -216)
- (scale-float (float -7285563473133568 1.0d0) -270))
+ (renorm-5 (scale-float (float 6322937555291277 1.0d0) -53)
+ (scale-float (float -4996575910228414 1.0d0) -107)
+ (scale-float (float -8723418418458635 1.0d0) -165)
+ (scale-float (float -8209894426869078 1.0d0) -220)
+ (scale-float (float -5793670850150400 1.0d0) -274))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6488721046684081 1.0d0) -50)
- (scale-float (float -4800641097989748 1.0d0) -104)
- (scale-float (float -7689871963688738 1.0d0) -159)
- (scale-float (float 7248983184352869 1.0d0) -213)
- (scale-float (float -4648751244509184 1.0d0) -269))
+ (renorm-5 (scale-float (float 6343585435033014 1.0d0) -53)
+ (scale-float (float 5692979910274044 1.0d0) -108)
+ (scale-float (float 5238809827312188 1.0d0) -164)
+ (scale-float (float 7473693542399043 1.0d0) -218)
+ (scale-float (float 8524454948110336 1.0d0) -272))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6548339115839435 1.0d0) -50)
- (scale-float (float -7678179087946984 1.0d0) -105)
- (scale-float (float 7447364613352970 1.0d0) -159)
- (scale-float (float -7077479988484817 1.0d0) -213)
- (scale-float (float 8079517972267008 1.0d0) -267))
+ (renorm-5 (scale-float (float 6364277976982406 1.0d0) -53)
+ (scale-float (float -6416140146841029 1.0d0) -108)
+ (scale-float (float 6012843359468366 1.0d0) -162)
+ (scale-float (float 5190870914433327 1.0d0) -216)
+ (scale-float (float -6720177234771968 1.0d0) -273))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6609030560328467 1.0d0) -50)
- (scale-float (float -6307303545390465 1.0d0) -105)
- (scale-float (float -4741362620342740 1.0d0) -160)
- (scale-float (float -8962967231728929 1.0d0) -216)
- (scale-float (float 6287728779460608 1.0d0) -271))
+ (renorm-5 (scale-float (float 6385015423905653 1.0d0) -53)
+ (scale-float (float -5299888057943309 1.0d0) -108)
+ (scale-float (float 7218658897639641 1.0d0) -163)
+ (scale-float (float -7564399872162399 1.0d0) -218)
+ (scale-float (float -6012036790878208 1.0d0) -274))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6670824924819186 1.0d0) -50)
- (scale-float (float -6857094799294079 1.0d0) -105)
- (scale-float (float -6283805258449109 1.0d0) -160)
- (scale-float (float -4579983583681872 1.0d0) -220)
- (scale-float (float 7609977640321024 1.0d0) -275))
+ (renorm-5 (scale-float (float 6405798020047342 1.0d0) -53)
+ (scale-float (float 4771437957468797 1.0d0) -107)
+ (scale-float (float 7922057994526591 1.0d0) -164)
+ (scale-float (float 6305434990390014 1.0d0) -221)
+ (scale-float (float -5603070020943872 1.0d0) -275))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6733752848205667 1.0d0) -50)
- (scale-float (float 5487320384991960 1.0d0) -104)
- (scale-float (float -5968471068963710 1.0d0) -158)
- (scale-float (float -4642200669305259 1.0d0) -213)
- (scale-float (float -5801923254386688 1.0d0) -268))
+ (renorm-5 (scale-float (float 6426626011142643 1.0d0) -53)
+ (scale-float (float -6161275590724442 1.0d0) -108)
+ (scale-float (float 7252093914251728 1.0d0) -165)
+ (scale-float (float 5781418451220263 1.0d0) -220)
+ (scale-float (float -5961254394920960 1.0d0) -274))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6797846114740128 1.0d0) -50)
- (scale-float (float -7965896037018844 1.0d0) -108)
- (scale-float (float 6838643187043039 1.0d0) -169)
- (scale-float (float -8719148014921162 1.0d0) -223)
- (scale-float (float -5719747131867136 1.0d0) -278))
+ (renorm-5 (scale-float (float 6447499644429618 1.0d0) -53)
+ (scale-float (float -4504718518993321 1.0d0) -111)
+ (scale-float (float -8429352747261720 1.0d0) -165)
+ (scale-float (float 5543335249515187 1.0d0) -220)
+ (scale-float (float 8089805902577664 1.0d0) -277))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6863137708059268 1.0d0) -50)
- (scale-float (float 5254691613734420 1.0d0) -104)
- (scale-float (float 4814953101967566 1.0d0) -159)
- (scale-float (float -5055906382036925 1.0d0) -213)
- (scale-float (float -5354935406133248 1.0d0) -267))
+ (renorm-5 (scale-float (float 6468419168661657 1.0d0) -53)
+ (scale-float (float 7838903660495786 1.0d0) -109)
+ (scale-float (float -5571298332786114 1.0d0) -163)
+ (scale-float (float -6383341328115460 1.0d0) -217)
+ (scale-float (float -6749775945596928 1.0d0) -271))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6929661868297835 1.0d0) -50)
- (scale-float (float -5249416198130502 1.0d0) -104)
- (scale-float (float 7530283165629458 1.0d0) -160)
- (scale-float (float -7043970844927767 1.0d0) -214)
- (scale-float (float 7099149547405312 1.0d0) -269))
+ (renorm-5 (scale-float (float 6489384834120026 1.0d0) -53)
+ (scale-float (float 8970208082772124 1.0d0) -107)
+ (scale-float (float -7422249931715393 1.0d0) -161)
+ (scale-float (float -5719080457162672 1.0d0) -215)
+ (scale-float (float 8945949534576640 1.0d0) -269))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6997454152497195 1.0d0) -50)
- (scale-float (float -5852054827841794 1.0d0) -105)
- (scale-float (float -5958966439822559 1.0d0) -159)
- (scale-float (float 8342575618968944 1.0d0) -215)
- (scale-float (float -5673665823768576 1.0d0) -278))
+ (renorm-5 (scale-float (float 6510396892626541 1.0d0) -53)
+ (scale-float (float 7552727392259982 1.0d0) -107)
+ (scale-float (float -6859084330124199 1.0d0) -161)
+ (scale-float (float 8323952238069947 1.0d0) -215)
+ (scale-float (float -5007933334437888 1.0d0) -270))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7066551498532859 1.0d0) -50)
- (scale-float (float -6504596222793428 1.0d0) -104)
- (scale-float (float -6352301105293032 1.0d0) -158)
- (scale-float (float -6835671604903275 1.0d0) -214)
- (scale-float (float 6344252063907840 1.0d0) -268))
+ (renorm-5 (scale-float (float 6531455597556361 1.0d0) -53)
+ (scale-float (float -6776786845362370 1.0d0) -107)
+ (scale-float (float 5537658314917462 1.0d0) -161)
+ (scale-float (float 6558024436949175 1.0d0) -215)
+ (scale-float (float -7010751320473600 1.0d0) -269))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7136992292802442 1.0d0) -50)
- (scale-float (float -4870302911349459 1.0d0) -105)
- (scale-float (float -6461504691059873 1.0d0) -160)
- (scale-float (float -7615712784955118 1.0d0) -215)
- (scale-float (float 4854685916069888 1.0d0) -270))
+ (renorm-5 (scale-float (float 6552561203850905 1.0d0) -53)
+ (scale-float (float -5075608684518640 1.0d0) -107)
+ (scale-float (float 6077079132341169 1.0d0) -161)
+ (scale-float (float -6051523991378174 1.0d0) -218)
+ (scale-float (float 6256815439020032 1.0d0) -272))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7208816441934696 1.0d0) -50)
- (scale-float (float 8755298938682695 1.0d0) -104)
- (scale-float (float -4896101517312375 1.0d0) -158)
- (scale-float (float 8256456025958531 1.0d0) -212)
- (scale-float (float 8825528422293504 1.0d0) -266))
+ (renorm-5 (scale-float (float 6573713968030900 1.0d0) -53)
+ (scale-float (float -6610258687383610 1.0d0) -108)
+ (scale-float (float -5026765429437363 1.0d0) -165)
+ (scale-float (float 4817855703864593 1.0d0) -221)
+ (scale-float (float -5767616137789440 1.0d0) -275))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7282065448801083 1.0d0) -50)
- (scale-float (float -7637297660145052 1.0d0) -105)
- (scale-float (float 8294171045418444 1.0d0) -160)
- (scale-float (float -4805088089848024 1.0d0) -217)
- (scale-float (float -8684191584354304 1.0d0) -271))
+ (renorm-5 (scale-float (float 6594914148209548 1.0d0) -53)
+ (scale-float (float -6479939408032255 1.0d0) -109)
+ (scale-float (float 8747802440996474 1.0d0) -163)
+ (scale-float (float -8305150090361413 1.0d0) -218)
+ (scale-float (float -8449931072503808 1.0d0) -273))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7356782493134103 1.0d0) -50)
- (scale-float (float 4595001399306702 1.0d0) -104)
- (scale-float (float 5664962187334257 1.0d0) -158)
- (scale-float (float 7155643428856045 1.0d0) -212)
- (scale-float (float 6332163332702208 1.0d0) -267))
+ (renorm-5 (scale-float (float 6616162004105825 1.0d0) -53)
+ (scale-float (float 7449763630728054 1.0d0) -107)
+ (scale-float (float 6861855559321431 1.0d0) -162)
+ (scale-float (float 5079944506709764 1.0d0) -216)
+ (scale-float (float -4923941043568640 1.0d0) -274))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7433012517081453 1.0d0) -50)
- (scale-float (float -6207052766373585 1.0d0) -104)
- (scale-float (float -5726040873116938 1.0d0) -158)
- (scale-float (float -5744932538006929 1.0d0) -213)
- (scale-float (float -7124278212657152 1.0d0) -268))
+ (renorm-5 (scale-float (float 6637457797057911 1.0d0) -53)
+ (scale-float (float 6533869147616686 1.0d0) -107)
+ (scale-float (float -7774676911384651 1.0d0) -162)
+ (scale-float (float 6559091031019990 1.0d0) -231)
+ (scale-float (float -5937883017904128 1.0d0) -285))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7510802316052177 1.0d0) -50)
- (scale-float (float 4504599034960326 1.0d0) -104)
- (scale-float (float 6214828861631402 1.0d0) -159)
- (scale-float (float 4705990701910521 1.0d0) -213)
- (scale-float (float -5000866475016192 1.0d0) -273))
+ (renorm-5 (scale-float (float 6658801790036747 1.0d0) -53)
+ (scale-float (float -8645917834399834 1.0d0) -108)
+ (scale-float (float -6459175220449992 1.0d0) -164)
+ (scale-float (float 5425107217767832 1.0d0) -218)
+ (scale-float (float 5490230981033984 1.0d0) -272))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7590200635240719 1.0d0) -50)
- (scale-float (float -7568587671493133 1.0d0) -105)
- (scale-float (float 6241425333405656 1.0d0) -164)
- (scale-float (float -7651285879370675 1.0d0) -218)
- (scale-float (float -4635717366972416 1.0d0) -273))
+ (renorm-5 (scale-float (float 6680194247659727 1.0d0) -53)
+ (scale-float (float -7502326705482134 1.0d0) -107)
+ (scale-float (float 5122373436187108 1.0d0) -162)
+ (scale-float (float 4659855717958087 1.0d0) -216)
+ (scale-float (float -6282496273154048 1.0d0) -270))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7671258272247214 1.0d0) -50)
- (scale-float (float -8623978487160342 1.0d0) -105)
- (scale-float (float 8349476327862151 1.0d0) -161)
- (scale-float (float 7494318504549410 1.0d0) -216)
- (scale-float (float -7181102652850176 1.0d0) -271))
+ (renorm-5 (scale-float (float 6701635436204526 1.0d0) -53)
+ (scale-float (float -6792633099855874 1.0d0) -113)
+ (scale-float (float -6718785746107185 1.0d0) -168)
+ (scale-float (float -8090407294887994 1.0d0) -225)
+ (scale-float (float 6302818184986624 1.0d0) -280))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7754028186248024 1.0d0) -50)
- (scale-float (float 5921107024594400 1.0d0) -104)
- (scale-float (float -5621732277816876 1.0d0) -158)
- (scale-float (float -5779119339137049 1.0d0) -213)
- (scale-float (float -8722031943647232 1.0d0) -267))
+ (renorm-5 (scale-float (float 6723125623623062 1.0d0) -53)
+ (scale-float (float 5348210264711913 1.0d0) -107)
+ (scale-float (float 4565069343244453 1.0d0) -162)
+ (scale-float (float -7777670701490282 1.0d0) -216)
+ (scale-float (float 8128569594937344 1.0d0) -272))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7838565614209529 1.0d0) -50)
- (scale-float (float 6578428132991252 1.0d0) -105)
- (scale-float (float 8003597548422836 1.0d0) -159)
- (scale-float (float 6363377530585056 1.0d0) -213)
- (scale-float (float -7805092724293632 1.0d0) -267))
+ (renorm-5 (scale-float (float 6744665079555594 1.0d0) -53)
+ (scale-float (float 8390468820650359 1.0d0) -108)
+ (scale-float (float -7523599844690822 1.0d0) -162)
+ (scale-float (float -8138474779450287 1.0d0) -217)
+ (scale-float (float 7537177927876608 1.0d0) -276))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7924928194681074 1.0d0) -50)
- (scale-float (float 8614003572664764 1.0d0) -104)
- (scale-float (float 5598145495971156 1.0d0) -158)
- (scale-float (float -8037027712831091 1.0d0) -213)
- (scale-float (float 8787734523445248 1.0d0) -267))
+ (renorm-5 (scale-float (float 6766254075344960 1.0d0) -53)
+ (scale-float (float 7124161662288890 1.0d0) -108)
+ (scale-float (float -5315676331877133 1.0d0) -162)
+ (scale-float (float 4586058689724245 1.0d0) -216)
+ (scale-float (float 6389392412737536 1.0d0) -271))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8013176099750097 1.0d0) -50)
- (scale-float (float 7354797866751837 1.0d0) -105)
- (scale-float (float -5803387611186421 1.0d0) -159)
- (scale-float (float 4781754483793883 1.0d0) -215)
- (scale-float (float 5214983144931328 1.0d0) -269))
+ (renorm-5 (scale-float (float 6787892884050957 1.0d0) -53)
+ (scale-float (float 6589788053269867 1.0d0) -113)
+ (scale-float (float 8191606233670341 1.0d0) -167)
+ (scale-float (float -6831189017752290 1.0d0) -223)
+ (scale-float (float 6177450232905728 1.0d0) -278))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8103372175794257 1.0d0) -50)
- (scale-float (float -7194188268812371 1.0d0) -104)
- (scale-float (float -4844467840881682 1.0d0) -158)
- (scale-float (float 7778970615641888 1.0d0) -215)
- (scale-float (float 8051647654330368 1.0d0) -269))
+ (renorm-5 (scale-float (float 6809581780464861 1.0d0) -53)
+ (scale-float (float -5815316960378802 1.0d0) -108)
+ (scale-float (float -4802061841594552 1.0d0) -163)
+ (scale-float (float 6961324585030021 1.0d0) -217)
+ (scale-float (float 8617582846738432 1.0d0) -272))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8195582093722473 1.0d0) -50)
- (scale-float (float 5080708612307624 1.0d0) -105)
- (scale-float (float 6499432302200239 1.0d0) -160)
- (scale-float (float 6368980990068618 1.0d0) -215)
- (scale-float (float -5084896891764736 1.0d0) -271))
+ (renorm-5 (scale-float (float 6831321041124092 1.0d0) -53)
+ (scale-float (float 5868374287455696 1.0d0) -110)
+ (scale-float (float -8513605422168076 1.0d0) -164)
+ (scale-float (float 8336743130121122 1.0d0) -219)
+ (scale-float (float 5844242957991936 1.0d0) -273))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8289874509459675 1.0d0) -50)
- (scale-float (float -8250952382522686 1.0d0) -104)
- (scale-float (float -8455685004262270 1.0d0) -161)
- (scale-float (float -8265729016802429 1.0d0) -217)
- (scale-float (float 7915945365864448 1.0d0) -271))
+ (renorm-5 (scale-float (float 6853110944327025 1.0d0) -53)
+ (scale-float (float 7995813491300551 1.0d0) -107)
+ (scale-float (float 5669745357521053 1.0d0) -162)
+ (scale-float (float -5983191241064722 1.0d0) -216)
+ (scale-float (float -7244438658875392 1.0d0) -273))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8386321235499455 1.0d0) -50)
- (scale-float (float 8303732635517882 1.0d0) -106)
- (scale-float (float -7620138409168773 1.0d0) -162)
- (scale-float (float -7343834892629589 1.0d0) -216)
- (scale-float (float -8589164570214400 1.0d0) -274))
+ (renorm-5 (scale-float (float 6874951770147948 1.0d0) -53)
+ (scale-float (float -5211889442734905 1.0d0) -109)
+ (scale-float (float -7994391083689276 1.0d0) -163)
+ (scale-float (float 5294798515156797 1.0d0) -221)
+ (scale-float (float -5041489973346304 1.0d0) -276))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8484997424425525 1.0d0) -50)
- (scale-float (float 4611668826314095 1.0d0) -105)
- (scale-float (float -5909091437288483 1.0d0) -159)
- (scale-float (float 6642726400911220 1.0d0) -213)
- (scale-float (float 5366889213165568 1.0d0) -268))
+ (renorm-5 (scale-float (float 6896843800452165 1.0d0) -53)
+ (scale-float (float -7972678450271797 1.0d0) -110)
+ (scale-float (float -8343345213530639 1.0d0) -164)
+ (scale-float (float 8514274148005680 1.0d0) -223)
+ (scale-float (float -5308832372752384 1.0d0) -277))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8585981765387615 1.0d0) -50)
- (scale-float (float 8364211109868830 1.0d0) -105)
- (scale-float (float 8104420497043001 1.0d0) -160)
- (scale-float (float 6997637222700747 1.0d0) -214)
- (scale-float (float -8468906328555520 1.0d0) -268))
+ (renorm-5 (scale-float (float 6918787318911258 1.0d0) -53)
+ (scale-float (float -8592506738174507 1.0d0) -108)
+ (scale-float (float 5852661501860042 1.0d0) -162)
+ (scale-float (float 4857986091060286 1.0d0) -216)
+ (scale-float (float 5239371004280832 1.0d0) -270))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8689356694611374 1.0d0) -50)
- (scale-float (float -8308032601175505 1.0d0) -106)
- (scale-float (float -8092082710083755 1.0d0) -161)
- (scale-float (float -6638969541410807 1.0d0) -215)
- (scale-float (float -7372315960279040 1.0d0) -270))
+ (renorm-5 (scale-float (float 6940782611018493 1.0d0) -53)
+ (scale-float (float 6912589129476135 1.0d0) -108)
+ (scale-float (float 6744530868863774 1.0d0) -163)
+ (scale-float (float -4989319458478924 1.0d0) -219)
+ (scale-float (float 6940701453320192 1.0d0) -273))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8795208621125848 1.0d0) -50)
- (scale-float (float -8466372619290203 1.0d0) -104)
- (scale-float (float 5941370226429769 1.0d0) -158)
- (scale-float (float -4811373108529117 1.0d0) -212)
- (scale-float (float -6673186804056064 1.0d0) -266))
+ (renorm-5 (scale-float (float 6962829964104388 1.0d0) -53)
+ (scale-float (float -6838882142879123 1.0d0) -107)
+ (scale-float (float 8833998898921057 1.0d0) -161)
+ (scale-float (float 8054222522316531 1.0d0) -216)
+ (scale-float (float -4519279887253504 1.0d0) -270))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8903628169007605 1.0d0) -50)
- (scale-float (float 8776836797087053 1.0d0) -104)
- (scale-float (float 7999848126381412 1.0d0) -159)
- (scale-float (float -8775543322363202 1.0d0) -214)
- (scale-float (float 7724496350347264 1.0d0) -269))
+ (renorm-5 (scale-float (float 6984929667352427 1.0d0) -53)
+ (scale-float (float 5071590174998387 1.0d0) -108)
+ (scale-float (float -7947223231970943 1.0d0) -165)
+ (scale-float (float -6151955209191225 1.0d0) -221)
+ (scale-float (float -7526765473824768 1.0d0) -275))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4507355218784437 1.0d0) -49)
- (scale-float (float -7205798416896588 1.0d0) -106)
- (scale-float (float -7015587535281554 1.0d0) -161)
- (scale-float (float -7356449236273485 1.0d0) -215)
- (scale-float (float 7786774315270144 1.0d0) -269))
+ (renorm-5 (scale-float (float 7007082011814946 1.0d0) -53)
+ (scale-float (float -6189386596240567 1.0d0) -107)
+ (scale-float (float -6199821917316083 1.0d0) -161)
+ (scale-float (float 7404596430114969 1.0d0) -215)
+ (scale-float (float -8302313716678656 1.0d0) -271))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4564277640529890 1.0d0) -49)
- (scale-float (float -8244376128276527 1.0d0) -104)
- (scale-float (float 7920645601437474 1.0d0) -160)
- (scale-float (float -7464953264467531 1.0d0) -214)
- (scale-float (float -6832176693903360 1.0d0) -268))
+ (renorm-5 (scale-float (float 7029287290429163 1.0d0) -53)
+ (scale-float (float -6627817883510584 1.0d0) -108)
+ (scale-float (float 8857892683323228 1.0d0) -163)
+ (scale-float (float 8693268109448113 1.0d0) -218)
+ (scale-float (float 4689364096122880 1.0d0) -274))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4622633804806901 1.0d0) -49)
- (scale-float (float -6426498859852973 1.0d0) -105)
- (scale-float (float 6286414974293041 1.0d0) -159)
- (scale-float (float 6055628403240541 1.0d0) -213)
- (scale-float (float 5193970548211712 1.0d0) -275))
+ (renorm-5 (scale-float (float 7051545798033384 1.0d0) -53)
+ (scale-float (float -5711999757009983 1.0d0) -107)
+ (scale-float (float -5825962407702506 1.0d0) -162)
+ (scale-float (float -6196166392955384 1.0d0) -216)
+ (scale-float (float 8664340208123904 1.0d0) -271))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4682478856671437 1.0d0) -49)
- (scale-float (float 6673630797752163 1.0d0) -103)
- (scale-float (float -7884194045319478 1.0d0) -158)
- (scale-float (float 5894329904575727 1.0d0) -216)
- (scale-float (float 6485690748764160 1.0d0) -270))
+ (renorm-5 (scale-float (float 7073857831383362 1.0d0) -53)
+ (scale-float (float 8881086912650455 1.0d0) -110)
+ (scale-float (float 8835372864906445 1.0d0) -164)
+ (scale-float (float 4562394845940881 1.0d0) -222)
+ (scale-float (float 5715850790174720 1.0d0) -276))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4743870805843326 1.0d0) -49)
- (scale-float (float 8164246650167072 1.0d0) -104)
- (scale-float (float -5216463620110085 1.0d0) -158)
- (scale-float (float -4961813917373847 1.0d0) -214)
- (scale-float (float -7663652377133056 1.0d0) -268))
+ (renorm-5 (scale-float (float 7096223689168829 1.0d0) -53)
+ (scale-float (float 7786181296922526 1.0d0) -107)
+ (scale-float (float 7593542376663890 1.0d0) -163)
+ (scale-float (float -6824515861621019 1.0d0) -218)
+ (scale-float (float -8097078091055104 1.0d0) -272))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4806870715170990 1.0d0) -49)
- (scale-float (float -7522320940190383 1.0d0) -105)
- (scale-float (float 8994946860597597 1.0d0) -159)
- (scale-float (float 8017382725273567 1.0d0) -213)
- (scale-float (float -5238324859502592 1.0d0) -269))
+ (renorm-5 (scale-float (float 7118643672030191 1.0d0) -53)
+ (scale-float (float 8441419455363968 1.0d0) -107)
+ (scale-float (float 8816723865288410 1.0d0) -161)
+ (scale-float (float 7080773938790631 1.0d0) -220)
+ (scale-float (float 6527379443810304 1.0d0) -274))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4871542904173360 1.0d0) -49)
- (scale-float (float 8555826975728450 1.0d0) -105)
- (scale-float (float 6059688777454006 1.0d0) -160)
- (scale-float (float -6249704986778178 1.0d0) -214)
- (scale-float (float 6380739929047040 1.0d0) -269))
+ (renorm-5 (scale-float (float 7141118082575394 1.0d0) -53)
+ (scale-float (float 5201259377433963 1.0d0) -108)
+ (scale-float (float 8502483145406469 1.0d0) -163)
+ (scale-float (float -7797854467647834 1.0d0) -221)
+ (scale-float (float 8393617992318976 1.0d0) -275))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4937955169085190 1.0d0) -49)
- (scale-float (float 4972862905629400 1.0d0) -103)
- (scale-float (float 6025982028507577 1.0d0) -157)
- (scale-float (float -6270890530919483 1.0d0) -213)
- (scale-float (float -8025612088246272 1.0d0) -269))
+ (renorm-5 (scale-float (float 7163647225396961 1.0d0) -53)
+ (scale-float (float 8235912743688556 1.0d0) -107)
+ (scale-float (float -7957914224696733 1.0d0) -161)
+ (scale-float (float 8092188431032028 1.0d0) -217)
+ (scale-float (float -5763890071207936 1.0d0) -275))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5006179020988284 1.0d0) -49)
- (scale-float (float -5814341173818329 1.0d0) -103)
- (scale-float (float -4805012562340711 1.0d0) -160)
- (scale-float (float 4720273162440715 1.0d0) -214)
- (scale-float (float 4517988474552320 1.0d0) -269))
+ (renorm-5 (scale-float (float 7186231407089207 1.0d0) -53)
+ (scale-float (float -6125628591049317 1.0d0) -108)
+ (scale-float (float 6463709282529567 1.0d0) -163)
+ (scale-float (float -7089380904209025 1.0d0) -219)
+ (scale-float (float 6480532824391680 1.0d0) -273))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5076289943786991 1.0d0) -49)
- (scale-float (float -8224579237253861 1.0d0) -104)
- (scale-float (float 6305502084383431 1.0d0) -158)
- (scale-float (float 5148877315266984 1.0d0) -212)
- (scale-float (float -7805967186395136 1.0d0) -269))
+ (renorm-5 (scale-float (float 7208870936265620 1.0d0) -53)
+ (scale-float (float 4969155040377850 1.0d0) -107)
+ (scale-float (float -5478158021003299 1.0d0) -162)
+ (scale-float (float 5009767247068612 1.0d0) -216)
+ (scale-float (float 4631444762656768 1.0d0) -276))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5148367673984452 1.0d0) -49)
- (scale-float (float 8925664162300119 1.0d0) -103)
- (scale-float (float 7264969663176127 1.0d0) -158)
- (scale-float (float -6814829290056163 1.0d0) -212)
- (scale-float (float 6404490112434176 1.0d0) -267))
+ (renorm-5 (scale-float (float 7231566123576433 1.0d0) -53)
+ (scale-float (float 7961163014055434 1.0d0) -107)
+ (scale-float (float -4995638983741310 1.0d0) -161)
+ (scale-float (float 5008798611336229 1.0d0) -216)
+ (scale-float (float -6391980102516736 1.0d0) -270))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5222496504439664 1.0d0) -49)
- (scale-float (float 6636279319110934 1.0d0) -103)
- (scale-float (float 8699395247056727 1.0d0) -159)
- (scale-float (float 8984111330560230 1.0d0) -215)
- (scale-float (float 6446719866109952 1.0d0) -269))
+ (renorm-5 (scale-float (float 7254317281726365 1.0d0) -53)
+ (scale-float (float -5823663294586708 1.0d0) -107)
+ (scale-float (float 5458711312191116 1.0d0) -163)
+ (scale-float (float 7373648181985147 1.0d0) -219)
+ (scale-float (float 4579959604641792 1.0d0) -273))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5298765614538198 1.0d0) -49)
- (scale-float (float 8286210000040794 1.0d0) -104)
- (scale-float (float 5354822512015696 1.0d0) -159)
- (scale-float (float 7908316457176409 1.0d0) -216)
- (scale-float (float -7004773900353536 1.0d0) -272))
+ (renorm-5 (scale-float (float 7277124725492546 1.0d0) -53)
+ (scale-float (float 5305137385450636 1.0d0) -107)
+ (scale-float (float 7924942194421221 1.0d0) -161)
+ (scale-float (float -7950148257115253 1.0d0) -215)
+ (scale-float (float -6052484860723200 1.0d0) -270))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5377269429495635 1.0d0) -49)
- (scale-float (float -7101328778309126 1.0d0) -103)
- (scale-float (float 7499054499721386 1.0d0) -158)
- (scale-float (float -7731092944852372 1.0d0) -212)
- (scale-float (float -7895595260903424 1.0d0) -266))
+ (renorm-5 (scale-float (float 7299988771742636 1.0d0) -53)
+ (scale-float (float 8680125840686565 1.0d0) -108)
+ (scale-float (float 7429093071873346 1.0d0) -164)
+ (scale-float (float -5599801530175494 1.0d0) -219)
+ (scale-float (float 5535685011832832 1.0d0) -275))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5458108011837422 1.0d0) -49)
- (scale-float (float -4675179495701427 1.0d0) -103)
- (scale-float (float 8932883464021247 1.0d0) -158)
- (scale-float (float 8616809540048386 1.0d0) -212)
- (scale-float (float -8763016816476160 1.0d0) -266))
+ (renorm-5 (scale-float (float 7322909739453116 1.0d0) -53)
+ (scale-float (float 7097062106770298 1.0d0) -107)
+ (scale-float (float -5349092443827285 1.0d0) -162)
+ (scale-float (float -5099742010785249 1.0d0) -216)
+ (scale-float (float 8817229833256960 1.0d0) -270))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5541387488467813 1.0d0) -49)
- (scale-float (float -7007445549784159 1.0d0) -103)
- (scale-float (float -7072923874504712 1.0d0) -157)
- (scale-float (float -5329906372904150 1.0d0) -211)
- (scale-float (float -7853024514547712 1.0d0) -265))
+ (renorm-5 (scale-float (float 7345887949727780 1.0d0) -53)
+ (scale-float (float -8457027092863592 1.0d0) -108)
+ (scale-float (float -6913069935946125 1.0d0) -162)
+ (scale-float (float -8426555266695745 1.0d0) -216)
+ (scale-float (float -5208210342281216 1.0d0) -273))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5627220517160550 1.0d0) -49)
- (scale-float (float -5176176853952796 1.0d0) -104)
- (scale-float (float -7020248087158517 1.0d0) -158)
- (scale-float (float 4859429353206122 1.0d0) -212)
- (scale-float (float -6599028030570496 1.0d0) -267))
+ (renorm-5 (scale-float (float 7368923725816409 1.0d0) -53)
+ (scale-float (float -7308765651908383 1.0d0) -109)
+ (scale-float (float 6336995842098196 1.0d0) -164)
+ (scale-float (float 5029974525320782 1.0d0) -220)
+ (scale-float (float -4826452771995648 1.0d0) -277))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5715726796783052 1.0d0) -49)
- (scale-float (float 5438025236037917 1.0d0) -103)
- (scale-float (float -8692020137574919 1.0d0) -158)
- (scale-float (float 7989842226064959 1.0d0) -214)
- (scale-float (float 6400116832010240 1.0d0) -268))
+ (renorm-5 (scale-float (float 7392017393133648 1.0d0) -53)
+ (scale-float (float -7438986702722814 1.0d0) -108)
+ (scale-float (float 6096655805351087 1.0d0) -162)
+ (scale-float (float 8498067619242502 1.0d0) -217)
+ (scale-float (float -6177366889168896 1.0d0) -271))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5807033626113381 1.0d0) -49)
- (scale-float (float 4911820440045489 1.0d0) -106)
- (scale-float (float 8802946619837513 1.0d0) -160)
- (scale-float (float 6801061177340681 1.0d0) -214)
- (scale-float (float -7270329594413056 1.0d0) -269))
+ (renorm-5 (scale-float (float 7415169279278070 1.0d0) -53)
+ (scale-float (float -5120641521992079 1.0d0) -107)
+ (scale-float (float -6173743406581481 1.0d0) -163)
+ (scale-float (float -6186085494466364 1.0d0) -218)
+ (scale-float (float -6687969806778368 1.0d0) -273))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5901276516736267 1.0d0) -49)
- (scale-float (float -7436249549661228 1.0d0) -103)
- (scale-float (float 4676936347870920 1.0d0) -157)
- (scale-float (float -5785755935908217 1.0d0) -215)
- (scale-float (float -7226502156386304 1.0d0) -269))
+ (renorm-5 (scale-float (float 7438379714051443 1.0d0) -53)
+ (scale-float (float 5163882227945242 1.0d0) -107)
+ (scale-float (float -7134474603423716 1.0d0) -161)
+ (scale-float (float 8099527437853578 1.0d0) -215)
+ (scale-float (float -8737594719870976 1.0d0) -269))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5998599866223991 1.0d0) -49)
- (scale-float (float 5059727762454945 1.0d0) -104)
- (scale-float (float 6414029253445363 1.0d0) -158)
- (scale-float (float 8656609927134767 1.0d0) -212)
- (scale-float (float 7132792128372736 1.0d0) -266))
+ (renorm-5 (scale-float (float 7461649029478199 1.0d0) -53)
+ (scale-float (float 5047985052177667 1.0d0) -107)
+ (scale-float (float 5661761690518348 1.0d0) -162)
+ (scale-float (float 6314662186913944 1.0d0) -216)
+ (scale-float (float -8476179641925632 1.0d0) -270))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6099157698635359 1.0d0) -49)
- (scale-float (float -6838644432646690 1.0d0) -104)
- (scale-float (float -6541362498174330 1.0d0) -158)
- (scale-float (float -7637259258515656 1.0d0) -213)
- (scale-float (float 7175769889177600 1.0d0) -269))
+ (renorm-5 (scale-float (float 7484977559825101 1.0d0) -53)
+ (scale-float (float -7429904801612951 1.0d0) -107)
+ (scale-float (float 7507318260125625 1.0d0) -162)
+ (scale-float (float -6428450809666175 1.0d0) -219)
+ (scale-float (float -7626245206441984 1.0d0) -278))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6203114480319646 1.0d0) -49)
- (scale-float (float -5568657277656399 1.0d0) -104)
- (scale-float (float 7542733007574790 1.0d0) -158)
- (scale-float (float -7012723917336706 1.0d0) -213)
- (scale-float (float 8497344615022592 1.0d0) -267))
+ (renorm-5 (scale-float (float 7508365641621118 1.0d0) -53)
+ (scale-float (float -5593749010769806 1.0d0) -108)
+ (scale-float (float 5636164097347867 1.0d0) -162)
+ (scale-float (float 6999663356388954 1.0d0) -216)
+ (scale-float (float 5357161379004416 1.0d0) -276))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6310646020114063 1.0d0) -49)
- (scale-float (float -7800325722416645 1.0d0) -104)
- (scale-float (float -5388478017272763 1.0d0) -159)
- (scale-float (float -7950046440912224 1.0d0) -213)
- (scale-float (float 5990792093270016 1.0d0) -267))
+ (renorm-5 (scale-float (float 7531813613677513 1.0d0) -53)
+ (scale-float (float 4581063167772971 1.0d0) -107)
+ (scale-float (float 7353040010455473 1.0d0) -161)
+ (scale-float (float -8985035177341617 1.0d0) -217)
+ (scale-float (float -9005891600416768 1.0d0) -271))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6421940464298844 1.0d0) -49)
- (scale-float (float 5063771858376485 1.0d0) -105)
- (scale-float (float -6783131086082439 1.0d0) -161)
- (scale-float (float 8427999506330064 1.0d0) -215)
- (scale-float (float 7364898304294912 1.0d0) -269))
+ (renorm-5 (scale-float (float 7555321817108135 1.0d0) -53)
+ (scale-float (float 5991978685937365 1.0d0) -108)
+ (scale-float (float 7515701065304341 1.0d0) -165)
+ (scale-float (float -7848040318995656 1.0d0) -221)
+ (scale-float (float -7387075273293824 1.0d0) -275))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6537199398154669 1.0d0) -49)
- (scale-float (float -7599373380810108 1.0d0) -103)
- (scale-float (float -7243786415111521 1.0d0) -158)
- (scale-float (float -8933575180508159 1.0d0) -212)
- (scale-float (float 5913876585807872 1.0d0) -266))
+ (renorm-5 (scale-float (float 7578890595349926 1.0d0) -53)
+ (scale-float (float 6111058056718947 1.0d0) -111)
+ (scale-float (float -7625238287344318 1.0d0) -171)
+ (scale-float (float -5322126950690926 1.0d0) -227)
+ (scale-float (float -7997044689993728 1.0d0) -284))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6656639067689980 1.0d0) -49)
- (scale-float (float 7360013642515307 1.0d0) -103)
- (scale-float (float -7855450244520173 1.0d0) -158)
- (scale-float (float 5412875609833951 1.0d0) -213)
- (scale-float (float 7666401682882560 1.0d0) -267))
+ (renorm-5 (scale-float (float 7602520294183646 1.0d0) -53)
+ (scale-float (float 5278126483421458 1.0d0) -107)
+ (scale-float (float -8809723265824375 1.0d0) -162)
+ (scale-float (float 5266825943354873 1.0d0) -216)
+ (scale-float (float 7680279964270592 1.0d0) -270))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6780491737115790 1.0d0) -49)
- (scale-float (float -6378411869235755 1.0d0) -103)
- (scale-float (float 8783987385350485 1.0d0) -157)
- (scale-float (float -8245657774080235 1.0d0) -212)
- (scale-float (float -6550005802663936 1.0d0) -267))
+ (renorm-5 (scale-float (float 7626211261754817 1.0d0) -53)
+ (scale-float (float 7856880994289273 1.0d0) -109)
+ (scale-float (float 5073518343103663 1.0d0) -163)
+ (scale-float (float 7320880980552741 1.0d0) -218)
+ (scale-float (float 6164601738625024 1.0d0) -274))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6909007199996866 1.0d0) -49)
- (scale-float (float -8837774218144292 1.0d0) -103)
- (scale-float (float 8717423028508527 1.0d0) -158)
- (scale-float (float 7752033631097315 1.0d0) -212)
- (scale-float (float 7051715353378816 1.0d0) -266))
+ (renorm-5 (scale-float (float 7649963848594884 1.0d0) -53)
+ (scale-float (float 4685784402871430 1.0d0) -107)
+ (scale-float (float 7577836369986652 1.0d0) -163)
+ (scale-float (float -4980090075722126 1.0d0) -220)
+ (scale-float (float -8789059230498816 1.0d0) -275))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7042454464766529 1.0d0) -49)
- (scale-float (float -7717918564726027 1.0d0) -103)
- (scale-float (float 5904053301730163 1.0d0) -159)
- (scale-float (float 5636691058427787 1.0d0) -214)
- (scale-float (float 8254886482542592 1.0d0) -269))
+ (renorm-5 (scale-float (float 7673778407642606 1.0d0) -53)
+ (scale-float (float 6364884756656920 1.0d0) -107)
+ (scale-float (float 6153979703457739 1.0d0) -162)
+ (scale-float (float -6224103722924539 1.0d0) -216)
+ (scale-float (float 7295477818654720 1.0d0) -272))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7181123638537301 1.0d0) -49)
- (scale-float (float -4692424184352077 1.0d0) -103)
- (scale-float (float -8255099239413905 1.0d0) -162)
- (scale-float (float -7983025562852820 1.0d0) -217)
- (scale-float (float 7125811068928000 1.0d0) -273))
+ (renorm-5 (scale-float (float 7697655294265670 1.0d0) -53)
+ (scale-float (float -7267862823064778 1.0d0) -109)
+ (scale-float (float -7737903927999409 1.0d0) -164)
+ (scale-float (float -4944665808781718 1.0d0) -220)
+ (scale-float (float -6573422581121024 1.0d0) -274))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7325328036968833 1.0d0) -49)
- (scale-float (float 6145600063130994 1.0d0) -105)
- (scale-float (float 6699370727529123 1.0d0) -162)
- (scale-float (float -8530909862138954 1.0d0) -222)
- (scale-float (float 8658983422263296 1.0d0) -276))
+ (renorm-5 (scale-float (float 7721594866282534 1.0d0) -53)
+ (scale-float (float 5903557453565999 1.0d0) -108)
+ (scale-float (float -6416831380576808 1.0d0) -162)
+ (scale-float (float 8806572503583245 1.0d0) -217)
+ (scale-float (float 7765577412116480 1.0d0) -273))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7475406552487008 1.0d0) -49)
- (scale-float (float 6508292523268850 1.0d0) -103)
- (scale-float (float 8651403870904095 1.0d0) -158)
- (scale-float (float 5031220044677692 1.0d0) -214)
- (scale-float (float -7668986664976384 1.0d0) -268))
+ (renorm-5 (scale-float (float 7745597483984509 1.0d0) -53)
+ (scale-float (float -6144509063709385 1.0d0) -107)
+ (scale-float (float 5185255202111359 1.0d0) -161)
+ (scale-float (float -7402097004959452 1.0d0) -215)
+ (scale-float (float 5213973706899456 1.0d0) -272))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7631726318530431 1.0d0) -49)
- (scale-float (float 6331338246710264 1.0d0) -104)
- (scale-float (float -5545085332746426 1.0d0) -158)
- (scale-float (float -6955294281445236 1.0d0) -213)
- (scale-float (float 8570242681602048 1.0d0) -268))
+ (renorm-5 (scale-float (float 7769663510158066 1.0d0) -53)
+ (scale-float (float 6470069052594091 1.0d0) -108)
+ (scale-float (float -4837094629917467 1.0d0) -162)
+ (scale-float (float 5023985097428639 1.0d0) -218)
+ (scale-float (float 7660496705683456 1.0d0) -272))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7794685713913491 1.0d0) -49)
- (scale-float (float 8085602522047296 1.0d0) -104)
- (scale-float (float 7011985758625205 1.0d0) -158)
- (scale-float (float -7615486664199397 1.0d0) -213)
- (scale-float (float -6045266584272896 1.0d0) -268))
+ (renorm-5 (scale-float (float 7793793310107394 1.0d0) -53)
+ (scale-float (float 6255438774607890 1.0d0) -107)
+ (scale-float (float 4890020526794485 1.0d0) -162)
+ (scale-float (float -7178979415977333 1.0d0) -217)
+ (scale-float (float -6774932051886080 1.0d0) -271))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7964717759062869 1.0d0) -49)
- (scale-float (float 7057597303030161 1.0d0) -103)
- (scale-float (float 4763291241478853 1.0d0) -159)
- (scale-float (float -5048491471916004 1.0d0) -213)
- (scale-float (float 6403137709015040 1.0d0) -271))
+ (renorm-5 (scale-float (float 7817987251677189 1.0d0) -53)
+ (scale-float (float -6274412550417931 1.0d0) -107)
+ (scale-float (float -5213877654328768 1.0d0) -165)
+ (scale-float (float 7623710121795882 1.0d0) -219)
+ (scale-float (float -7668292987650048 1.0d0) -276))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8142293965085578 1.0d0) -49)
- (scale-float (float -5968860496746126 1.0d0) -104)
- (scale-float (float 7717615794333638 1.0d0) -161)
- (scale-float (float 7737247246080083 1.0d0) -215)
- (scale-float (float -6027429370920960 1.0d0) -269))
+ (renorm-5 (scale-float (float 7842245705275690 1.0d0) -53)
+ (scale-float (float 4755439535197461 1.0d0) -110)
+ (scale-float (float -6491338259032560 1.0d0) -169)
+ (scale-float (float -6027186414927101 1.0d0) -226)
+ (scale-float (float 7531889095081984 1.0d0) -281))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8327928707709914 1.0d0) -49)
- (scale-float (float 8161425915706692 1.0d0) -103)
- (scale-float (float -4626625264391650 1.0d0) -157)
- (scale-float (float 6719828360360851 1.0d0) -212)
- (scale-float (float -4653783298686976 1.0d0) -266))
+ (renorm-5 (scale-float (float 7866569043897970 1.0d0) -53)
+ (scale-float (float 6203235208083930 1.0d0) -109)
+ (scale-float (float 7465551591673784 1.0d0) -164)
+ (scale-float (float 8166262348485213 1.0d0) -219)
+ (scale-float (float -6023336035352576 1.0d0) -273))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8522184211543760 1.0d0) -49)
- (scale-float (float -5794793515298676 1.0d0) -103)
- (scale-float (float 7494740244157845 1.0d0) -158)
- (scale-float (float -6395745845282527 1.0d0) -214)
- (scale-float (float 5127560460435456 1.0d0) -268))
+ (renorm-5 (scale-float (float 7890957643149467 1.0d0) -53)
+ (scale-float (float 4565316914673408 1.0d0) -111)
+ (scale-float (float -5073270382141029 1.0d0) -169)
+ (scale-float (float 7284895438284374 1.0d0) -223)
+ (scale-float (float -6470251101290496 1.0d0) -277))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8725676246369773 1.0d0) -49)
- (scale-float (float -6847558691679281 1.0d0) -103)
- (scale-float (float -4639526880247401 1.0d0) -157)
- (scale-float (float -8040102235321215 1.0d0) -211)
- (scale-float (float 4778856041168896 1.0d0) -266))
+ (renorm-5 (scale-float (float 7915411881269776 1.0d0) -53)
+ (scale-float (float -8732455080878904 1.0d0) -107)
+ (scale-float (float -8972624560631460 1.0d0) -161)
+ (scale-float (float -5802770418051256 1.0d0) -215)
+ (scale-float (float -5894612583809024 1.0d0) -270))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8939080657044762 1.0d0) -49)
- (scale-float (float 5984605661790546 1.0d0) -105)
- (scale-float (float -4689910945695088 1.0d0) -159)
- (scale-float (float 7942218162489357 1.0d0) -213)
- (scale-float (float 6084108253921280 1.0d0) -272))
+ (renorm-5 (scale-float (float 7939932139156694 1.0d0) -53)
+ (scale-float (float -7728774586478161 1.0d0) -108)
+ (scale-float (float -5122395498390164 1.0d0) -162)
+ (scale-float (float 8034467693630628 1.0d0) -216)
+ (scale-float (float -6127267246014464 1.0d0) -271))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4581570436441982 1.0d0) -48)
- (scale-float (float -8529302667360591 1.0d0) -102)
- (scale-float (float -5134708848598001 1.0d0) -156)
- (scale-float (float -7297795657395979 1.0d0) -210)
- (scale-float (float -8892655261065216 1.0d0) -264))
+ (renorm-5 (scale-float (float 7964518800390531 1.0d0) -53)
+ (scale-float (float -5333950519206214 1.0d0) -110)
+ (scale-float (float -6855336031570640 1.0d0) -166)
+ (scale-float (float -8103642639632277 1.0d0) -221)
+ (scale-float (float 8817951445614592 1.0d0) -276))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4699338286167601 1.0d0) -48)
- (scale-float (float -5760570017839759 1.0d0) -103)
- (scale-float (float -7964579737947934 1.0d0) -160)
- (scale-float (float 7117709242024680 1.0d0) -215)
- (scale-float (float 5559094723739648 1.0d0) -270))
+ (renorm-5 (scale-float (float 7989172251258678 1.0d0) -53)
+ (scale-float (float 4799035515117038 1.0d0) -107)
+ (scale-float (float -7075338048210246 1.0d0) -161)
+ (scale-float (float -8586719858203288 1.0d0) -217)
+ (scale-float (float 5551191926112256 1.0d0) -273))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4823296857879754 1.0d0) -48)
- (scale-float (float -7437815545545033 1.0d0) -102)
- (scale-float (float -8956837905913622 1.0d0) -156)
- (scale-float (float -5515347369523367 1.0d0) -212)
- (scale-float (float 8814054480281600 1.0d0) -267))
+ (renorm-5 (scale-float (float 8013892880780447 1.0d0) -53)
+ (scale-float (float 8070209461981732 1.0d0) -108)
+ (scale-float (float 5383960032839146 1.0d0) -163)
+ (scale-float (float -5391502856833359 1.0d0) -217)
+ (scale-float (float 4611789961494528 1.0d0) -271))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4953948102574560 1.0d0) -48)
- (scale-float (float 6563411715021955 1.0d0) -107)
- (scale-float (float -4881755754841332 1.0d0) -161)
- (scale-float (float -7038759865446038 1.0d0) -216)
- (scale-float (float 7255865652412416 1.0d0) -273))
+ (renorm-5 (scale-float (float 8038681080732178 1.0d0) -53)
+ (scale-float (float 7052322924254692 1.0d0) -107)
+ (scale-float (float 4662847422718372 1.0d0) -162)
+ (scale-float (float 7185286506518269 1.0d0) -216)
+ (scale-float (float 5622161755602944 1.0d0) -274))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5091849743565917 1.0d0) -48)
- (scale-float (float 6384455094568543 1.0d0) -102)
- (scale-float (float 5702890449723630 1.0d0) -157)
- (scale-float (float -7589384686425635 1.0d0) -218)
- (scale-float (float 8058940122202112 1.0d0) -273))
+ (renorm-5 (scale-float (float 8063537245672624 1.0d0) -53)
+ (scale-float (float 5672318795950278 1.0d0) -111)
+ (scale-float (float -5116080609750552 1.0d0) -166)
+ (scale-float (float -7609717448867233 1.0d0) -222)
+ (scale-float (float 4692897535361024 1.0d0) -276))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5237623243959472 1.0d0) -48)
- (scale-float (float -6250630418786862 1.0d0) -104)
- (scale-float (float -7184429040914303 1.0d0) -159)
- (scale-float (float 5513312508283453 1.0d0) -215)
- (scale-float (float 4749731872374784 1.0d0) -270))
+ (renorm-5 (scale-float (float 8088461772968608 1.0d0) -53)
+ (scale-float (float 6561047830650932 1.0d0) -108)
+ (scale-float (float -7907785504659630 1.0d0) -162)
+ (scale-float (float -8942948971153189 1.0d0) -217)
+ (scale-float (float -7559890343952384 1.0d0) -272))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5391963180151410 1.0d0) -48)
- (scale-float (float -7407081297448137 1.0d0) -102)
- (scale-float (float 5185826904122421 1.0d0) -156)
- (scale-float (float 7823667441420830 1.0d0) -210)
- (scale-float (float 8936157189111808 1.0d0) -266))
+ (renorm-5 (scale-float (float 8113455062820968 1.0d0) -53)
+ (scale-float (float -5472615846331824 1.0d0) -109)
+ (scale-float (float 5977609223732986 1.0d0) -164)
+ (scale-float (float 7115509566652408 1.0d0) -218)
+ (scale-float (float -5387108883628032 1.0d0) -272))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5555648319599754 1.0d0) -48)
- (scale-float (float -5491336161082583 1.0d0) -102)
- (scale-float (float -6554264313276709 1.0d0) -156)
- (scale-float (float -7585496654613802 1.0d0) -210)
- (scale-float (float 4713805106823168 1.0d0) -265))
+ (renorm-5 (scale-float (float 8138517518290779 1.0d0) -53)
+ (scale-float (float 6752214430572379 1.0d0) -110)
+ (scale-float (float 7813943309258673 1.0d0) -164)
+ (scale-float (float -7531807323370307 1.0d0) -218)
+ (scale-float (float -8077148627795968 1.0d0) -273))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5729554775677781 1.0d0) -48)
- (scale-float (float -7721231518321956 1.0d0) -108)
- (scale-float (float 6182950135224119 1.0d0) -163)
- (scale-float (float -5805908032198122 1.0d0) -217)
- (scale-float (float 6138479531524096 1.0d0) -271))
+ (renorm-5 (scale-float (float 8163649545325870 1.0d0) -53)
+ (scale-float (float 6998037274955710 1.0d0) -108)
+ (scale-float (float 7871939694839604 1.0d0) -162)
+ (scale-float (float 6893324305915105 1.0d0) -219)
+ (scale-float (float -6666193181081600 1.0d0) -276))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5914671708628099 1.0d0) -48)
- (scale-float (float -8127496465237598 1.0d0) -103)
- (scale-float (float 5113636924531285 1.0d0) -158)
- (scale-float (float 7610245412227071 1.0d0) -212)
- (scale-float (float 5419049157689344 1.0d0) -266))
+ (renorm-5 (scale-float (float 8188851552787629 1.0d0) -53)
+ (scale-float (float -5530151176954949 1.0d0) -110)
+ (scale-float (float 6991091742977840 1.0d0) -164)
+ (scale-float (float 8482591613484455 1.0d0) -218)
+ (scale-float (float -7039437530988544 1.0d0) -273))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6112120166707537 1.0d0) -48)
- (scale-float (float 8554650084246937 1.0d0) -103)
- (scale-float (float 6240992177685638 1.0d0) -161)
- (scale-float (float 7196179540449182 1.0d0) -216)
- (scale-float (float 6262113232224256 1.0d0) -272))
+ (renorm-5 (scale-float (float 8214123952478104 1.0d0) -53)
+ (scale-float (float -7054334098865418 1.0d0) -108)
+ (scale-float (float -8877605983907212 1.0d0) -163)
+ (scale-float (float 5682356343726468 1.0d0) -218)
+ (scale-float (float -8826109976117248 1.0d0) -276))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6323175825499951 1.0d0) -48)
- (scale-float (float -8865111156616584 1.0d0) -102)
- (scale-float (float 7085615420986638 1.0d0) -156)
- (scale-float (float 7235233759408942 1.0d0) -211)
- (scale-float (float -8649169230872576 1.0d0) -265))
+ (renorm-5 (scale-float (float 8239467159167406 1.0d0) -53)
+ (scale-float (float -7651898140888595 1.0d0) -107)
+ (scale-float (float 8648965404520721 1.0d0) -161)
+ (scale-float (float 7028850772873957 1.0d0) -215)
+ (scale-float (float 5534674606866432 1.0d0) -270))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6549296599938903 1.0d0) -48)
- (scale-float (float 8257698953810403 1.0d0) -102)
- (scale-float (float 8532553234643244 1.0d0) -157)
- (scale-float (float -8270427433372553 1.0d0) -211)
- (scale-float (float -8578788487872512 1.0d0) -265))
+ (renorm-5 (scale-float (float 8264881590621413 1.0d0) -53)
+ (scale-float (float -7510438895388554 1.0d0) -107)
+ (scale-float (float -5500854175455348 1.0d0) -161)
+ (scale-float (float 7176439462285651 1.0d0) -218)
+ (scale-float (float 7752654741241856 1.0d0) -272))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6792156392335400 1.0d0) -48)
- (scale-float (float -6544379776982520 1.0d0) -104)
- (scale-float (float 4901112354909220 1.0d0) -158)
- (scale-float (float 6767333192271592 1.0d0) -216)
- (scale-float (float -8842907181645824 1.0d0) -270))
+ (renorm-5 (scale-float (float 8290367667629783 1.0d0) -53)
+ (scale-float (float 8133138596186356 1.0d0) -109)
+ (scale-float (float -7591268029116145 1.0d0) -163)
+ (scale-float (float -5898979962753431 1.0d0) -217)
+ (scale-float (float -6625987420028928 1.0d0) -271))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7053686628412010 1.0d0) -48)
- (scale-float (float -8951188254702623 1.0d0) -102)
- (scale-float (float 8621287380014728 1.0d0) -158)
- (scale-float (float -7857861379957792 1.0d0) -213)
- (scale-float (float 4826892277383168 1.0d0) -269))
+ (renorm-5 (scale-float (float 8315925814034279 1.0d0) -53)
+ (scale-float (float 7519360826045658 1.0d0) -107)
+ (scale-float (float -4861813932032458 1.0d0) -163)
+ (scale-float (float -6822801646816934 1.0d0) -219)
+ (scale-float (float 6483083152850944 1.0d0) -274))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7336127761985185 1.0d0) -48)
- (scale-float (float -8336340561589675 1.0d0) -104)
- (scale-float (float -6723533502954940 1.0d0) -159)
- (scale-float (float 7818179045611807 1.0d0) -214)
- (scale-float (float -7201952627294208 1.0d0) -268))
+ (renorm-5 (scale-float (float 8341556456757407 1.0d0) -53)
+ (scale-float (float 8713258068062022 1.0d0) -108)
+ (scale-float (float -8794846795103942 1.0d0) -164)
+ (scale-float (float 4763933906617127 1.0d0) -218)
+ (scale-float (float -8448473406504960 1.0d0) -273))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7642093655818158 1.0d0) -48)
- (scale-float (float 5443555368163400 1.0d0) -106)
- (scale-float (float -7387394316037603 1.0d0) -162)
- (scale-float (float 5304483945651657 1.0d0) -217)
- (scale-float (float -4963064904417280 1.0d0) -271))
+ (renorm-5 (scale-float (float 8367260025831375 1.0d0) -53)
+ (scale-float (float 7832510640147127 1.0d0) -113)
+ (scale-float (float -4585451134943656 1.0d0) -168)
+ (scale-float (float 6860564854731439 1.0d0) -222)
+ (scale-float (float 4739820444188672 1.0d0) -277))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7974652757478940 1.0d0) -48)
- (scale-float (float -4601485407011345 1.0d0) -102)
- (scale-float (float -7916486289406152 1.0d0) -157)
- (scale-float (float -7279545329272873 1.0d0) -211)
- (scale-float (float 5134317856817152 1.0d0) -265))
+ (renorm-5 (scale-float (float 8393036954427377 1.0d0) -53)
+ (scale-float (float -5882849124950196 1.0d0) -108)
+ (scale-float (float -7796383713284814 1.0d0) -163)
+ (scale-float (float 7952873874854669 1.0d0) -217)
+ (scale-float (float -6056073206824960 1.0d0) -271))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8337431414068683 1.0d0) -48)
- (scale-float (float -5987902372410459 1.0d0) -102)
- (scale-float (float -5307411281694402 1.0d0) -158)
- (scale-float (float -5679062825222479 1.0d0) -212)
- (scale-float (float 8245649354752000 1.0d0) -266))
+ (renorm-5 (scale-float (float 8418887678885204 1.0d0) -53)
+ (scale-float (float -5715673222913417 1.0d0) -107)
+ (scale-float (float -5122652624101890 1.0d0) -161)
+ (scale-float (float -7070365230023692 1.0d0) -216)
+ (scale-float (float 7389122488401920 1.0d0) -270))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8734746705443862 1.0d0) -48)
- (scale-float (float -5185035314729970 1.0d0) -103)
- (scale-float (float 5370141748632671 1.0d0) -158)
- (scale-float (float 8551587498597857 1.0d0) -213)
- (scale-float (float 5905522198839296 1.0d0) -270))
+ (renorm-5 (scale-float (float 8444812638743187 1.0d0) -53)
+ (scale-float (float -5300223451013964 1.0d0) -108)
+ (scale-float (float -7110683026382794 1.0d0) -162)
+ (scale-float (float -7744943696350442 1.0d0) -216)
+ (scale-float (float 6310419953451008 1.0d0) -270))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4585889563702555 1.0d0) -47)
- (scale-float (float -7954556241258531 1.0d0) -102)
- (scale-float (float -5413256311151729 1.0d0) -156)
- (scale-float (float 6878574492056157 1.0d0) -210)
- (scale-float (float 4794200525701120 1.0d0) -264))
+ (renorm-5 (scale-float (float 8470812276768478 1.0d0) -53)
+ (scale-float (float 5910789752266694 1.0d0) -107)
+ (scale-float (float -4540777544879638 1.0d0) -161)
+ (scale-float (float 6851088171542932 1.0d0) -215)
+ (scale-float (float -7617921543036928 1.0d0) -269))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4827399903209683 1.0d0) -47)
- (scale-float (float -6275711490776414 1.0d0) -105)
- (scale-float (float 8099918832814676 1.0d0) -160)
- (scale-float (float -6152065565819033 1.0d0) -214)
- (scale-float (float -6790464220692480 1.0d0) -268))
+ (renorm-5 (scale-float (float 8496887038987672 1.0d0) -53)
+ (scale-float (float 5531872111144993 1.0d0) -107)
+ (scale-float (float -7962212397842975 1.0d0) -162)
+ (scale-float (float -5860583371644180 1.0d0) -216)
+ (scale-float (float 7866919184433152 1.0d0) -270))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5095736726291373 1.0d0) -47)
- (scale-float (float 5702351686147640 1.0d0) -101)
- (scale-float (float -8356071616588207 1.0d0) -155)
- (scale-float (float 5407157322154023 1.0d0) -209)
- (scale-float (float -5896165128568832 1.0d0) -264))
+ (renorm-5 (scale-float (float 8523037374717772 1.0d0) -53)
+ (scale-float (float 8853251511678952 1.0d0) -107)
+ (scale-float (float 7259767988058284 1.0d0) -162)
+ (scale-float (float 8389230841988564 1.0d0) -217)
+ (scale-float (float -8575876819451904 1.0d0) -272))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5395634118579270 1.0d0) -47)
- (scale-float (float -8650595618423630 1.0d0) -102)
- (scale-float (float -4637715105009220 1.0d0) -158)
- (scale-float (float 6802436320551583 1.0d0) -213)
- (scale-float (float 5674304881557504 1.0d0) -269))
+ (renorm-5 (scale-float (float 8549263736597510 1.0d0) -53)
+ (scale-float (float -5579620565343165 1.0d0) -107)
+ (scale-float (float -5587574106166803 1.0d0) -161)
+ (scale-float (float -8188753341291124 1.0d0) -215)
+ (scale-float (float 7942509615710208 1.0d0) -269))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5733009687095975 1.0d0) -47)
- (scale-float (float 8484139752530675 1.0d0) -102)
- (scale-float (float 5983330237824667 1.0d0) -156)
- (scale-float (float 8366235526218494 1.0d0) -210)
- (scale-float (float 5629484799655936 1.0d0) -264))
+ (renorm-5 (scale-float (float 8575566580619014 1.0d0) -53)
+ (scale-float (float 7060972329967819 1.0d0) -107)
+ (scale-float (float -6794461814768363 1.0d0) -161)
+ (scale-float (float 5860283490685656 1.0d0) -220)
+ (scale-float (float -5535999337693184 1.0d0) -278))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6115359067385373 1.0d0) -47)
- (scale-float (float 7428268948615224 1.0d0) -101)
- (scale-float (float 8097548842549957 1.0d0) -156)
- (scale-float (float -7655306445395194 1.0d0) -210)
- (scale-float (float -6488780694913024 1.0d0) -265))
+ (renorm-5 (scale-float (float 8601946366159849 1.0d0) -53)
+ (scale-float (float 6643600354864787 1.0d0) -111)
+ (scale-float (float -6774328151098143 1.0d0) -165)
+ (scale-float (float 6238045156276258 1.0d0) -220)
+ (scale-float (float 7385437152739328 1.0d0) -281))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6552319505127374 1.0d0) -47)
- (scale-float (float -8178523606996029 1.0d0) -105)
- (scale-float (float -8699896243399604 1.0d0) -159)
- (scale-float (float -7740332332082545 1.0d0) -214)
- (scale-float (float 6016821677785088 1.0d0) -268))
+ (renorm-5 (scale-float (float 8628403556015405 1.0d0) -53)
+ (scale-float (float -5689830371797970 1.0d0) -107)
+ (scale-float (float 8456917422509878 1.0d0) -161)
+ (scale-float (float 6498397382453532 1.0d0) -216)
+ (scale-float (float -7683261920575488 1.0d0) -271))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7056493552344079 1.0d0) -47)
- (scale-float (float -6660391185023610 1.0d0) -101)
- (scale-float (float 8326117901300204 1.0d0) -156)
- (scale-float (float -5180116769562087 1.0d0) -211)
- (scale-float (float 6732836385259520 1.0d0) -265))
+ (renorm-5 (scale-float (float 8654938616431667 1.0d0) -53)
+ (scale-float (float 8182047312445503 1.0d0) -108)
+ (scale-float (float -6662523829600515 1.0d0) -162)
+ (scale-float (float 5290567255884442 1.0d0) -217)
+ (scale-float (float -6464888284348416 1.0d0) -271))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7644684611709030 1.0d0) -47)
- (scale-float (float 7144281558445897 1.0d0) -105)
- (scale-float (float 5769916130091718 1.0d0) -159)
- (scale-float (float 6892393124855441 1.0d0) -213)
- (scale-float (float 8609597045211136 1.0d0) -267))
+ (renorm-5 (scale-float (float 8681552017138358 1.0d0) -53)
+ (scale-float (float -7006822305559368 1.0d0) -107)
+ (scale-float (float 7451129425931068 1.0d0) -161)
+ (scale-float (float -7173167161450929 1.0d0) -215)
+ (scale-float (float -5536285008453632 1.0d0) -269))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 8339806414116051 1.0d0) -47)
- (scale-float (float -4878300504338807 1.0d0) -101)
- (scale-float (float 5390699203123886 1.0d0) -156)
- (scale-float (float -7941956443494165 1.0d0) -210)
- (scale-float (float 8699025989009408 1.0d0) -265))
+ (renorm-5 (scale-float (float 8708244231382452 1.0d0) -53)
+ (scale-float (float -8087631037263965 1.0d0) -107)
+ (scale-float (float -8185307178763586 1.0d0) -161)
+ (scale-float (float -6511095932131732 1.0d0) -215)
+ (scale-float (float 8343018883710976 1.0d0) -272))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4586969091394693 1.0d0) -46)
- (scale-float (float -8978492069766178 1.0d0) -101)
- (scale-float (float 7053055367607091 1.0d0) -155)
- (scale-float (float -8712227340191945 1.0d0) -210)
- (scale-float (float -7846634958946304 1.0d0) -265))
+ (renorm-5 (scale-float (float 8735015735962084 1.0d0) -53)
+ (scale-float (float -8117625885586849 1.0d0) -107)
+ (scale-float (float 7067185933598292 1.0d0) -161)
+ (scale-float (float -5928047136609223 1.0d0) -217)
+ (scale-float (float -4613124548198400 1.0d0) -279))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5096708286733636 1.0d0) -46)
- (scale-float (float -4572705006895138 1.0d0) -100)
- (scale-float (float 4718547123658870 1.0d0) -154)
- (scale-float (float 7157224158707570 1.0d0) -210)
- (scale-float (float -8590740628766720 1.0d0) -265))
+ (renorm-5 (scale-float (float 8761867011260840 1.0d0) -53)
+ (scale-float (float 8610737154062316 1.0d0) -107)
+ (scale-float (float 5316487286030695 1.0d0) -161)
+ (scale-float (float 8025315088065011 1.0d0) -216)
+ (scale-float (float -8789522686148608 1.0d0) -271))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5733873284861593 1.0d0) -46)
- (scale-float (float -8604953363186775 1.0d0) -103)
- (scale-float (float 8626935765066666 1.0d0) -158)
- (scale-float (float -4858320692337793 1.0d0) -212)
- (scale-float (float -7449309035233280 1.0d0) -266))
+ (renorm-5 (scale-float (float 8788798541282450 1.0d0) -53)
+ (scale-float (float -5767028858726936 1.0d0) -110)
+ (scale-float (float 5809369621052884 1.0d0) -167)
+ (scale-float (float 7326787612774527 1.0d0) -221)
+ (scale-float (float -6442635476598784 1.0d0) -279))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 6553075144281224 1.0d0) -46)
- (scale-float (float 6620952143443553 1.0d0) -101)
- (scale-float (float -5268353655146108 1.0d0) -156)
- (scale-float (float 5893295495507489 1.0d0) -211)
- (scale-float (float -4800425745186816 1.0d0) -266))
+ (renorm-5 (scale-float (float 8815810813685869 1.0d0) -53)
+ (scale-float (float -8724536074899524 1.0d0) -109)
+ (scale-float (float 5172102500931788 1.0d0) -166)
+ (scale-float (float -8595123929132079 1.0d0) -220)
+ (scale-float (float -4972293416550400 1.0d0) -276))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7645332295807713 1.0d0) -46)
- (scale-float (float -5080909471366464 1.0d0) -102)
- (scale-float (float 7938109188081450 1.0d0) -156)
- (scale-float (float 4928452855514440 1.0d0) -210)
- (scale-float (float 8885897390456832 1.0d0) -268))
+ (renorm-5 (scale-float (float 8842904319820777 1.0d0) -53)
+ (scale-float (float 7692158636243959 1.0d0) -107)
+ (scale-float (float -6981365851709947 1.0d0) -161)
+ (scale-float (float 5606403711887330 1.0d0) -216)
+ (scale-float (float 7207011875684352 1.0d0) -271))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 4587238957440646 1.0d0) -45)
- (scale-float (float -7194218336984116 1.0d0) -99)
- (scale-float (float -8985364386653513 1.0d0) -153)
- (scale-float (float -8164942491672346 1.0d0) -207)
- (scale-float (float 6286694831915008 1.0d0) -262))
+ (renorm-5 (scale-float (float 8870079554763484 1.0d0) -53)
+ (scale-float (float 6730270946682744 1.0d0) -108)
+ (scale-float (float -6566124735755288 1.0d0) -163)
+ (scale-float (float 4704554665939634 1.0d0) -217)
+ (scale-float (float 5990258066063360 1.0d0) -271))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5734089176174276 1.0d0) -45)
- (scale-float (float -7647633804412292 1.0d0) -101)
- (scale-float (float -7089963492055907 1.0d0) -155)
- (scale-float (float 8957378262525840 1.0d0) -210)
- (scale-float (float 8460149900050432 1.0d0) -265))
+ (renorm-5 (scale-float (float 8897337017353248 1.0d0) -53)
+ (scale-float (float -6246556062351795 1.0d0) -108)
+ (scale-float (float 7682958297604200 1.0d0) -163)
+ (scale-float (float -6314968768802122 1.0d0) -217)
+ (scale-float (float -6603959870652416 1.0d0) -271))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7645494213403192 1.0d0) -45)
- (scale-float (float 4683660413726437 1.0d0) -99)
- (scale-float (float -7150841523991633 1.0d0) -153)
- (scale-float (float -4654257076122560 1.0d0) -207)
- (scale-float (float 5269682304483328 1.0d0) -261))
+ (renorm-5 (scale-float (float 8924677210229021 1.0d0) -53)
+ (scale-float (float 5469297920188961 1.0d0) -109)
+ (scale-float (float -8593195763191850 1.0d0) -163)
+ (scale-float (float -7114494562938148 1.0d0) -217)
+ (scale-float (float 8594557003857920 1.0d0) -271))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5734143148494430 1.0d0) -44)
- (scale-float (float 8353770598111665 1.0d0) -99)
- (scale-float (float -8962023885528779 1.0d0) -158)
- (scale-float (float -5933825828214605 1.0d0) -212)
- (scale-float (float 5439908491034624 1.0d0) -266))
+ (renorm-5 (scale-float (float 8952100639866623 1.0d0) -53)
+ (scale-float (float -4764119273928549 1.0d0) -107)
+ (scale-float (float -4842944010947886 1.0d0) -161)
+ (scale-float (float 6684392706093202 1.0d0) -215)
+ (scale-float (float 5193091026345984 1.0d0) -269))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 5734156641542718 1.0d0) -43)
- (scale-float (float 8633141086175409 1.0d0) -98)
- (scale-float (float 5419442444201815 1.0d0) -153)
- (scale-float (float -8712131584355876 1.0d0) -211)
- (scale-float (float -5157997961543680 1.0d0) -266))
+ (renorm-5 (scale-float (float 8979607816616344 1.0d0) -53)
+ (scale-float (float -7789931843743237 1.0d0) -107)
+ (scale-float (float -8124365004371129 1.0d0) -164)
+ (scale-float (float 8996080488067980 1.0d0) -218)
+ (scale-float (float 6558996243415040 1.0d0) -272))
(%make-qd-d q0 q1 q2 q3))
(multiple-value-bind (q0 q1 q2 q3)
- (renorm-5 (scale-float (float 7091480910882704 1.0d0) 204)
- (scale-float (float 8415670760171201 1.0d0) 148)
- (scale-float (float -8191062761010691 1.0d0) 94)
- (scale-float (float 8061527243862424 1.0d0) 39)
- (scale-float (float -8684710553714688 1.0d0) -17))
+ (renorm-5 (scale-float (float 4503599627370496 1.0d0) -52)
+ (scale-float (float -4503599627370496 1.0d0) -308) (scale-float (float 0 1.0d0) 0)
+ (scale-float (float 0 1.0d0) 0) (scale-float (float 0 1.0d0) 0))
(%make-qd-d q0 q1 q2 q3)))))
#||
@@ -18208,24 +11048,24 @@ something that we can use to initialize our tables.
;; Create atan table
(let (val)
- (dotimes (k +qd-atan-partition-size+)
+ (dotimes (k (/ +qd-atan-partition-size+ 2))
(push (convert-to-qd-parts (tan (* pi (/ (+ 3 (* 2 k))
(* 4 +qd-atan-partition-size+)))))
val))
(write `(defconstant +qd-atan-partition+
- (make-array +qd-atan-partition-size+
+ (make-array (/ +qd-atan-partition-size+ 2)
:initial-contents (list ,@(nreverse val))))
:case :downcase
:pretty t)
(values))
(let (val)
- (dotimes (k +qd-atan-partition-size+)
+ (dotimes (k (/ +qd-atan-partition-size+ 2))
(push (convert-to-qd-parts (tan (* pi (/ (+ 2 (* 2 k))
(* 4 +qd-atan-partition-size+)))))
val))
(write `(defconstant +qd-atan-nodes+
- (make-array +qd-atan-partition-size+
+ (make-array (/ +qd-atan-partition-size+ 2)
:initial-contents (list ,@(nreverse val))))
:case :downcase
:pretty t)
diff --git a/qd-fun.lisp b/qd-fun.lisp
index 35dbcd4..9564dcc 100644
--- a/qd-fun.lisp
+++ b/qd-fun.lisp
@@ -1117,10 +1117,8 @@ is the cosine of A"
;; the smallest entry greater than x. Return the index of the
;; entry.
(let* ((low 0)
- (high (1- octi::+qd-atan-partition-size+))
+ (high (length octi::+qd-atan-partition+))
(mid (ash (+ low high) -1)))
- ;; high starts one less than the end because the end actually has junk.
- ;; FIXME: Remove that junk last element.
(loop
(if (qd-< x (aref octi::+qd-atan-partition+ mid))
(setf high mid)
commit 4d09f5a39889e782bef99e2dda6d0d38327fa9f4
Author: Raymond Toy <toy.raymond(a)gmail.com>
Date: Tue Nov 26 09:11:45 2013 -0800
Fix atan/taylor bug and add atan2/taylor.
qd-fun.lisp:
o Fix issue with atan-qd/taylor for large args. We use the
relationship atan(x) = pi/2-atan(1/x) for x > 1.
o Add atan2-qd/taylor. This appears to be much faster than
atan2-qd/newton.
timing.lisp:
o Add timing test for atan2-qd.
diff --git a/qd-fun.lisp b/qd-fun.lisp
index e782a8a..35dbcd4 100644
--- a/qd-fun.lisp
+++ b/qd-fun.lisp
@@ -1182,21 +1182,76 @@ is the cosine of A"
;; atan(x) = (2*i-1)*pi/(4*s) + atan(e)
;;
;; Note that qd-atan-partition array starts with X[2].
- (if (minusp-qd y)
- (neg-qd (atan-qd/taylor (neg-qd y)))
- (let* ((i (find-atan-partition y))
- (atan-xi (mul-qd +qd-pi/2+
- (rational-to-qd (/ (1- (+ i 2))
- octi::+qd-atan-partition-size+))))
- (1/xi (div-qd +qd-one+ (aref octi::+qd-atan-nodes+ i)))
- (e1 (div-qd (add-qd-d (sqr-qd 1/xi) 1d0)
- (add-qd 1/xi y)))
- (e (sub-qd 1/xi
- e1)))
- ;;(format t "partition ~D~%" i)
- ;;(format t "atan(xi) = ~S~%" atan-xi)
- ;;(format t "e = ~S~%" e)
- (add-qd atan-xi (atan-taylor e)))))
+ (cond
+ ((minusp-qd y)
+ ;; atan(-x) = -atan(x)
+ (neg-qd (atan-qd/taylor (neg-qd y))))
+ ((qd-> y +qd-one+)
+ ;; atan(x) = pi/2-atan(1/x), for x > 1
+ (sub-qd +qd-pi/2+
+ (atan-qd/taylor (div-qd +qd-one+ y))))
+ (t
+ (let* ((i (find-atan-partition y))
+ (atan-xi (mul-qd +qd-pi/2+
+ (rational-to-qd (/ (1- (+ i 2))
+ octi::+qd-atan-partition-size+))))
+ (1/xi (div-qd +qd-one+ (aref octi::+qd-atan-nodes+ i)))
+ (e1 (div-qd (add-qd-d (sqr-qd 1/xi) 1d0)
+ (add-qd 1/xi y)))
+ (e (sub-qd 1/xi
+ e1)))
+ ;;(format t "partition ~D~%" i)
+ ;;(format t "atan(xi) = ~S~%" atan-xi)
+ ;;(format t "e = ~S~%" e)
+ (add-qd atan-xi (atan-taylor e))))))
+
+(defun atan2-qd/taylor (y x)
+ (declare (type %quad-double y x)
+ #+nil
+ (optimize (speed 3) (space 0)))
+ (cond ((zerop-qd x)
+ ;; x = 0
+ (cond ((zerop-qd y)
+ ;; Both x and y are zero. Use the signs of x and y to
+ ;; determine the result
+ (error "atan2(0,0)"))
+ (t
+ ;; x = 0, but y is not. Use the sign of y.
+ (return-from atan2-qd/taylor
+ (cond ((plusp (float-sign (qd-0 y)))
+ +qd-pi/2+)
+ (t
+ (neg-qd +qd-pi/2+)))))))
+ ((zerop-qd y)
+ ;; y = 0.
+ (return-from atan2-qd/taylor
+ ;; Use the sign of x and y to figure out the result.
+ (cond ((plusp (float-sign (qd-0 x)))
+ +qd-zero+)
+ ((plusp (float-sign (qd-0 y)))
+ +qd-pi+)
+ (t
+ (neg-qd +qd-pi+))))))
+
+ (when (qd-= x y)
+ (return-from atan2-qd/taylor
+ (if (plusp-qd y)
+ +qd-pi/4+
+ +qd-3pi/4+)))
+
+ (when (qd-= x (neg-qd y))
+ (return-from atan2-qd/taylor
+ (if (plusp-qd y)
+ +qd-3pi/4+
+ (neg-qd +qd-pi/4+))))
+
+ (let ((arg (atan-qd/taylor (div-qd y (abs-qd x)))))
+ (cond ((minusp-qd x)
+ (if (minusp-qd y)
+ (- (neg-qd +qd-pi+) arg)
+ (- +qd-pi+ arg)))
+ (t
+ arg))))
(defun atan2-qd (y x)
"atan2(y, x) = atan(y/x), but carefully handling the quadrant"
diff --git a/timing.lisp b/timing.lisp
index 1847c4c..9e2074a 100644
--- a/timing.lisp
+++ b/timing.lisp
@@ -231,3 +231,57 @@
;; We see that the taylor series is 21 times faster (!) and conses 11
;; times less. That's a pretty nice gain, at the expense of two
;; 1024-element tables.
+
+(defun time-atan2 (&optional (n 10000))
+ (declare (fixnum n))
+ (flet ((time-atan/newton ()
+ (let ((sum (octi::make-qd-d -1000d0)))
+ (declare (type octi::%quad-double sum)
+ (optimize (speed 3)))
+ (dotimes (k n)
+ (declare (fixnum k))
+ (setf sum (octi::atan2-qd/newton sum (mul-qd-d sum .1d0))))
+ sum))
+ (time-atan/taylor ()
+ (let ((sum (octi::make-qd-d -1000d0)))
+ (declare (type octi::%quad-double sum)
+ (optimize (speed 3)))
+ (dotimes (k n)
+ (declare (fixnum k))
+ (setf sum (octi::atan2-qd/taylor sum (mul-qd-d sum .1d0))))
+ sum)))
+ (format t "atan2-qd/newton ~d times~%" n)
+ #+cmu (ext:gc :full t)
+ (format t "sum = ~A~%" (time (time-atan/newton)))
+ (format t "atan2-qd/taylor ~d times~%" n)
+ #+cmu (ext:gc :full t)
+ (format t "sum = ~A~%" (time (time-atan/taylor)))))
+
+
+;; Some timing results on an iMac, 3.06 GHz Core i3:
+
+; atan2-qd/newton 10000 times
+
+; Evaluation took:
+; 6.37 seconds of real time
+; 6.321544 seconds of user run time
+; 0.026819 seconds of system run time
+; 19,474,336,804 CPU cycles
+; [Run times include 0.27 seconds GC run time]
+; 0 page faults and
+; 934,872,144 bytes consed.
+;
+; sum = #C(-1.670464979286058652105921398771024w0 1.39712341620073544419882362664172w-33)
+;
+; atan2-qd/taylor 10000 times
+
+; Evaluation took:
+; 0.32 seconds of real time
+; 0.320343 seconds of user run time
+; 0.001606 seconds of system run time
+; 989,558,772 CPU cycles
+; [Run times include 0.02 seconds GC run time]
+; 0 page faults and
+; 88,919,384 bytes consed.
+;
+; sum = #C(-1.670464979286058652105921398771027w0 4.47861132722031280908838833477765w-33)
commit b9a21f1f536aec53c186e4a8d40d75f9d6918bb1
Author: Raymond Toy <toy.raymond(a)gmail.com>
Date: Mon Nov 25 23:10:26 2013 -0800
Implement a new atan method that is 21 times faster.
The new method uses a table and the taylor series for atan to compute
atan for real args.
qd-const.lisp:
o Add the two tables used for the atan computation.
o Include clisp code that generates the tables.
qd-fun.lisp:
o Implement atan using a set of tables and a Taylor series.
timing.lisp:
o Add a simple timing program to evaluate how fast each atan method
is.
diff --git a/qd-const.lisp b/qd-const.lisp
index 56840b7..98c5ac9 100644
--- a/qd-const.lisp
+++ b/qd-const.lisp
@@ -3762,6 +3762,14363 @@
(%make-qd-d q0 q1 q2 q3))
"Quad-double value of Euler's constant")
+;; Table for atan computation. See atan-qd/taylor.
+(defconstant +qd-atan-partition-size+
+ 1024)
+
+;; This is the partition points for the atan table. The table contains
+;;
+;; tan((2*k + 3)*pi/(4*s))
+;;
+;; for k = 0, 1, ..., s, where s is the table size,
+;; +qd-atan-partition-size+.
+(defconstant +qd-atan-partition+
+ (make-array +qd-atan-partition-size+ :initial-contents
+ (list
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5305687677623182 1.0d0) -61)
+ (scale-float (float 5506082357036760 1.0d0) -115)
+ (scale-float (float -8811919955122674 1.0d0) -170)
+ (scale-float (float 6519548665950046 1.0d0) -226)
+ (scale-float (float -6440164966137856 1.0d0) -280))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8842840540207337 1.0d0) -61)
+ (scale-float (float -5473160723154885 1.0d0) -115)
+ (scale-float (float -4535918610883809 1.0d0) -171)
+ (scale-float (float -4963578518408804 1.0d0) -225)
+ (scale-float (float -6712212661567488 1.0d0) -279))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6190017509796469 1.0d0) -60)
+ (scale-float (float 8647620749142769 1.0d0) -115)
+ (scale-float (float -6931221986832039 1.0d0) -171)
+ (scale-float (float -8517197728414346 1.0d0) -225)
+ (scale-float (float -4626619940470784 1.0d0) -283))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7958643881798693 1.0d0) -60)
+ (scale-float (float -5354492433078344 1.0d0) -114)
+ (scale-float (float -7327905104279995 1.0d0) -168)
+ (scale-float (float -6523976005184669 1.0d0) -223)
+ (scale-float (float -7854698297393152 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4863653855283737 1.0d0) -59)
+ (scale-float (float -6015787009420778 1.0d0) -113)
+ (scale-float (float 8594253106416801 1.0d0) -167)
+ (scale-float (float 7046824309216708 1.0d0) -222)
+ (scale-float (float -6520970423566336 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5748008660632557 1.0d0) -59)
+ (scale-float (float 8797928203970591 1.0d0) -113)
+ (scale-float (float 8714055176617153 1.0d0) -167)
+ (scale-float (float -5612171940322240 1.0d0) -221)
+ (scale-float (float 4939191171620864 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6632390519957926 1.0d0) -59)
+ (scale-float (float 8670207667135100 1.0d0) -114)
+ (scale-float (float 8149147453636330 1.0d0) -168)
+ (scale-float (float -8078741638624220 1.0d0) -222)
+ (scale-float (float 5251828477165568 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7516803596781324 1.0d0) -59)
+ (scale-float (float -6201171919502881 1.0d0) -116)
+ (scale-float (float -7027033891914616 1.0d0) -173)
+ (scale-float (float 5952967054329307 1.0d0) -227)
+ (scale-float (float -8689209012387840 1.0d0) -282))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8401252055212014 1.0d0) -59)
+ (scale-float (float -8018416525424526 1.0d0) -114)
+ (scale-float (float -8131489574139489 1.0d0) -168)
+ (scale-float (float 5356676700338153 1.0d0) -223)
+ (scale-float (float -8760547365355520 1.0d0) -279))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4642870030012741 1.0d0) -58)
+ (scale-float (float 8661794336121368 1.0d0) -112)
+ (scale-float (float 5441429837488339 1.0d0) -167)
+ (scale-float (float -6919382284775521 1.0d0) -222)
+ (scale-float (float -5506479342911488 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5085135888370956 1.0d0) -58)
+ (scale-float (float -7882846098076715 1.0d0) -113)
+ (scale-float (float -7762714374541670 1.0d0) -171)
+ (scale-float (float 8931845445931377 1.0d0) -225)
+ (scale-float (float 5556186022150144 1.0d0) -279))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5527425685852335 1.0d0) -58)
+ (scale-float (float 8127719015560079 1.0d0) -112)
+ (scale-float (float -6094331376989970 1.0d0) -166)
+ (scale-float (float 6973207316824032 1.0d0) -220)
+ (scale-float (float -8483611529240576 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5969741506079427 1.0d0) -58)
+ (scale-float (float 8989322454423522 1.0d0) -112)
+ (scale-float (float 4820491773276110 1.0d0) -171)
+ (scale-float (float 5078156230612779 1.0d0) -225)
+ (scale-float (float 6795293461839872 1.0d0) -279))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6412085433164924 1.0d0) -58)
+ (scale-float (float 5647386557728108 1.0d0) -115)
+ (scale-float (float 5565185291589407 1.0d0) -169)
+ (scale-float (float -8187312701179060 1.0d0) -225)
+ (scale-float (float -8291776467828736 1.0d0) -279))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6854459551750966 1.0d0) -58)
+ (scale-float (float -5878879597999219 1.0d0) -112)
+ (scale-float (float -4586089337686870 1.0d0) -166)
+ (scale-float (float -8194332440371855 1.0d0) -224)
+ (scale-float (float 6231038519017472 1.0d0) -278))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7296865947048466 1.0d0) -58)
+ (scale-float (float 5117941371137976 1.0d0) -114)
+ (scale-float (float 4515350251087483 1.0d0) -169)
+ (scale-float (float 5446926177260784 1.0d0) -223)
+ (scale-float (float 6233667346104320 1.0d0) -280))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7739306704876459 1.0d0) -58)
+ (scale-float (float 5788179125278216 1.0d0) -112)
+ (scale-float (float -8864296878521864 1.0d0) -169)
+ (scale-float (float -6359044574484051 1.0d0) -225)
+ (scale-float (float 6661760607584256 1.0d0) -279))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8181783911701472 1.0d0) -58)
+ (scale-float (float -6390306030927826 1.0d0) -112)
+ (scale-float (float 8314328435451015 1.0d0) -167)
+ (scale-float (float 5656079407037522 1.0d0) -221)
+ (scale-float (float 8659304386199552 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8624299654676919 1.0d0) -58)
+ (scale-float (float 5636124989072738 1.0d0) -115)
+ (scale-float (float -6628018644317178 1.0d0) -169)
+ (scale-float (float 7868931088360995 1.0d0) -225)
+ (scale-float (float -5989342687264768 1.0d0) -281))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4533428010841266 1.0d0) -57)
+ (scale-float (float 7873841147516662 1.0d0) -112)
+ (scale-float (float -6907345987993589 1.0d0) -166)
+ (scale-float (float -7970290490656245 1.0d0) -220)
+ (scale-float (float 8183217733074944 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4754727550681906 1.0d0) -57)
+ (scale-float (float -6794493206896267 1.0d0) -116)
+ (scale-float (float 6762402539062604 1.0d0) -170)
+ (scale-float (float 8891551854319655 1.0d0) -224)
+ (scale-float (float -6933069732249600 1.0d0) -279))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4976049491585756 1.0d0) -57)
+ (scale-float (float -7056882828989748 1.0d0) -115)
+ (scale-float (float 7164953570628209 1.0d0) -169)
+ (scale-float (float 7677417338552630 1.0d0) -224)
+ (scale-float (float -5298942914330624 1.0d0) -279))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5197394878700579 1.0d0) -57)
+ (scale-float (float 6124273349739532 1.0d0) -115)
+ (scale-float (float -8600581353254220 1.0d0) -170)
+ (scale-float (float -6717554843753204 1.0d0) -224)
+ (scale-float (float 5322629696192512 1.0d0) -278))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5418764757616299 1.0d0) -57)
+ (scale-float (float 7551546303483781 1.0d0) -112)
+ (scale-float (float 5433875429936579 1.0d0) -173)
+ (scale-float (float -7130504460297287 1.0d0) -227)
+ (scale-float (float -8382177370701824 1.0d0) -281))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5640160174384795 1.0d0) -57)
+ (scale-float (float 5342817502011044 1.0d0) -112)
+ (scale-float (float -5198387028085064 1.0d0) -167)
+ (scale-float (float -4984834528418682 1.0d0) -222)
+ (scale-float (float 6854185795649536 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5861582175539712 1.0d0) -57)
+ (scale-float (float -8030596855746236 1.0d0) -112)
+ (scale-float (float 7403724276832834 1.0d0) -167)
+ (scale-float (float -7591693793173951 1.0d0) -223)
+ (scale-float (float 7380449510424576 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6083031808116292 1.0d0) -57)
+ (scale-float (float -8939232852017447 1.0d0) -111)
+ (scale-float (float 7615734983381517 1.0d0) -166)
+ (scale-float (float -8294165265443062 1.0d0) -220)
+ (scale-float (float 4657370779582464 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6304510119671225 1.0d0) -57)
+ (scale-float (float 8425406796879393 1.0d0) -111)
+ (scale-float (float -6913421610333932 1.0d0) -165)
+ (scale-float (float -6239359931521554 1.0d0) -219)
+ (scale-float (float 5108990101504000 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6526018158302526 1.0d0) -57)
+ (scale-float (float -4805244830313477 1.0d0) -111)
+ (scale-float (float -6049090789760838 1.0d0) -165)
+ (scale-float (float -5917145755656860 1.0d0) -220)
+ (scale-float (float -7065082075512832 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6747556972669419 1.0d0) -57)
+ (scale-float (float 7773786456668746 1.0d0) -112)
+ (scale-float (float 8917214288559519 1.0d0) -169)
+ (scale-float (float 8307832188430625 1.0d0) -223)
+ (scale-float (float 8357841471012864 1.0d0) -278))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6969127612012264 1.0d0) -57)
+ (scale-float (float 5226852815002550 1.0d0) -112)
+ (scale-float (float -8431058743124898 1.0d0) -177)
+ (scale-float (float -4537865395966991 1.0d0) -232)
+ (scale-float (float -7724923011203072 1.0d0) -286))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7190731126172490 1.0d0) -57)
+ (scale-float (float -4583739808274891 1.0d0) -112)
+ (scale-float (float -7473930668710518 1.0d0) -168)
+ (scale-float (float 7128172610795083 1.0d0) -224)
+ (scale-float (float 5212645769609216 1.0d0) -279))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7412368565612561 1.0d0) -57)
+ (scale-float (float -6085433278868743 1.0d0) -112)
+ (scale-float (float 8400360560005585 1.0d0) -167)
+ (scale-float (float -6862800668079889 1.0d0) -221)
+ (scale-float (float -6307695512977408 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7634040981435965 1.0d0) -57)
+ (scale-float (float 8159095349393260 1.0d0) -111)
+ (scale-float (float -8926579589964864 1.0d0) -165)
+ (scale-float (float -5488430640076491 1.0d0) -221)
+ (scale-float (float 8635854910783488 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7855749425407231 1.0d0) -57)
+ (scale-float (float -4890583477461525 1.0d0) -112)
+ (scale-float (float 5973795089385031 1.0d0) -166)
+ (scale-float (float -4823584618279196 1.0d0) -220)
+ (scale-float (float -8810967954292736 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8077494949971964 1.0d0) -57)
+ (scale-float (float 5842634473069828 1.0d0) -112)
+ (scale-float (float -7013590778337856 1.0d0) -167)
+ (scale-float (float 4612776582082427 1.0d0) -221)
+ (scale-float (float 6969967495512064 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8299278608276921 1.0d0) -57)
+ (scale-float (float 6703602541534340 1.0d0) -113)
+ (scale-float (float 4715019753774018 1.0d0) -167)
+ (scale-float (float -8735888318512605 1.0d0) -221)
+ (scale-float (float -5598085302943744 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8521101454190103 1.0d0) -57)
+ (scale-float (float -7493478636829656 1.0d0) -114)
+ (scale-float (float 4722488541675188 1.0d0) -168)
+ (scale-float (float -8534718780870708 1.0d0) -225)
+ (scale-float (float -7206164668350464 1.0d0) -280))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8742964542320882 1.0d0) -57)
+ (scale-float (float 8904140708697782 1.0d0) -111)
+ (scale-float (float -7453778873481448 1.0d0) -175)
+ (scale-float (float 4848533165864183 1.0d0) -231)
+ (scale-float (float -7978817117224960 1.0d0) -286))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8964868928040160 1.0d0) -57)
+ (scale-float (float -8538745036176605 1.0d0) -112)
+ (scale-float (float -8336361632935054 1.0d0) -168)
+ (scale-float (float -6632471528753862 1.0d0) -223)
+ (scale-float (float 8349699451650048 1.0d0) -278))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4593407833750274 1.0d0) -56)
+ (scale-float (float 4652962761672457 1.0d0) -110)
+ (scale-float (float 5957534954657478 1.0d0) -164)
+ (scale-float (float 8210766298761993 1.0d0) -218)
+ (scale-float (float -7660353774714880 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4704402908828297 1.0d0) -56)
+ (scale-float (float 7939442975333601 1.0d0) -112)
+ (scale-float (float 8151191387532411 1.0d0) -167)
+ (scale-float (float 5101350366028524 1.0d0) -223)
+ (scale-float (float 5766796558729216 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4815420218142512 1.0d0) -56)
+ (scale-float (float 6228643137628059 1.0d0) -111)
+ (scale-float (float 8655290194339889 1.0d0) -167)
+ (scale-float (float 7200859679559196 1.0d0) -223)
+ (scale-float (float -4737536493355008 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4926460291002516 1.0d0) -56)
+ (scale-float (float -5973033851832616 1.0d0) -112)
+ (scale-float (float -4633481506976059 1.0d0) -167)
+ (scale-float (float -8884593199123702 1.0d0) -223)
+ (scale-float (float 7189982804443136 1.0d0) -280))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5037523657149296 1.0d0) -56)
+ (scale-float (float 4986919803023219 1.0d0) -110)
+ (scale-float (float 6712362606936862 1.0d0) -165)
+ (scale-float (float -8555335534877776 1.0d0) -219)
+ (scale-float (float -7855396684677120 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5148610846765409 1.0d0) -56)
+ (scale-float (float -7539847471348062 1.0d0) -111)
+ (scale-float (float -6813826876351545 1.0d0) -165)
+ (scale-float (float -5979909155445346 1.0d0) -219)
+ (scale-float (float -6038699986059264 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5259722390485171 1.0d0) -56)
+ (scale-float (float -7653502925233679 1.0d0) -110)
+ (scale-float (float 7685523526095211 1.0d0) -166)
+ (scale-float (float 8136210992551391 1.0d0) -220)
+ (scale-float (float 8831637822373888 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5370858819404873 1.0d0) -56)
+ (scale-float (float -8143094939383924 1.0d0) -110)
+ (scale-float (float -8198410875865397 1.0d0) -164)
+ (scale-float (float 4691877195596213 1.0d0) -221)
+ (scale-float (float -6224339705004032 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5482020665093010 1.0d0) -56)
+ (scale-float (float 5839259819288318 1.0d0) -110)
+ (scale-float (float -5779325495833681 1.0d0) -164)
+ (scale-float (float -5207142217243003 1.0d0) -219)
+ (scale-float (float -7990185549365248 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5593208459600534 1.0d0) -56)
+ (scale-float (float 7382248899416789 1.0d0) -111)
+ (scale-float (float -8090737056080539 1.0d0) -165)
+ (scale-float (float -7145119408191317 1.0d0) -219)
+ (scale-float (float 6524114101731328 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5704422735471119 1.0d0) -56)
+ (scale-float (float -5693161309012347 1.0d0) -110)
+ (scale-float (float -7738943568129555 1.0d0) -164)
+ (scale-float (float -4927770841827276 1.0d0) -218)
+ (scale-float (float -5530371325689856 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5815664025751452 1.0d0) -56)
+ (scale-float (float -7524564544881600 1.0d0) -112)
+ (scale-float (float 4635845941369169 1.0d0) -168)
+ (scale-float (float 7371772992119077 1.0d0) -222)
+ (scale-float (float -6478870186033152 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5926932864001545 1.0d0) -56)
+ (scale-float (float 7751225920439821 1.0d0) -110)
+ (scale-float (float -6967046884259149 1.0d0) -164)
+ (scale-float (float -5674692773581199 1.0d0) -220)
+ (scale-float (float -5822002623152128 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6038229784305065 1.0d0) -56)
+ (scale-float (float -7760758699043179 1.0d0) -113)
+ (scale-float (float 7856954324103097 1.0d0) -167)
+ (scale-float (float 6010846592802305 1.0d0) -225)
+ (scale-float (float 7046112865157120 1.0d0) -280))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6149555321279682 1.0d0) -56)
+ (scale-float (float 4971372871644711 1.0d0) -116)
+ (scale-float (float 7676842120266746 1.0d0) -170)
+ (scale-float (float -7352753550522570 1.0d0) -224)
+ (scale-float (float -7204710062751744 1.0d0) -285))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6260910010087448 1.0d0) -56)
+ (scale-float (float -7939229278246324 1.0d0) -110)
+ (scale-float (float -5362688776138901 1.0d0) -164)
+ (scale-float (float -6450966437273360 1.0d0) -218)
+ (scale-float (float -6552025703317504 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6372294386445188 1.0d0) -56)
+ (scale-float (float -8357588039957387 1.0d0) -110)
+ (scale-float (float -5821108895694721 1.0d0) -165)
+ (scale-float (float -8161794678544301 1.0d0) -221)
+ (scale-float (float 8908143775514624 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6483708986634921 1.0d0) -56)
+ (scale-float (float -5225774745325260 1.0d0) -112)
+ (scale-float (float 5347170579377077 1.0d0) -166)
+ (scale-float (float 8844227113880592 1.0d0) -222)
+ (scale-float (float -6421644987596800 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6595154347514301 1.0d0) -56)
+ (scale-float (float -5514875028687999 1.0d0) -111)
+ (scale-float (float 7744676308312886 1.0d0) -166)
+ (scale-float (float 8557903267712351 1.0d0) -220)
+ (scale-float (float -4557609311928320 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6706631006527079 1.0d0) -56)
+ (scale-float (float -7741551837533694 1.0d0) -114)
+ (scale-float (float -7598186225208826 1.0d0) -168)
+ (scale-float (float -8256208234084440 1.0d0) -222)
+ (scale-float (float -7012419763437568 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6818139501713594 1.0d0) -56)
+ (scale-float (float -6294578038612805 1.0d0) -111)
+ (scale-float (float -7008706571593762 1.0d0) -165)
+ (scale-float (float -7556241928883045 1.0d0) -219)
+ (scale-float (float -4528488597913600 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6929680371721283 1.0d0) -56)
+ (scale-float (float 5558223147193459 1.0d0) -110)
+ (scale-float (float 4664719549965594 1.0d0) -164)
+ (scale-float (float 6595065718263287 1.0d0) -218)
+ (scale-float (float -6886950045466624 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7041254155815222 1.0d0) -56)
+ (scale-float (float -8174849743459065 1.0d0) -114)
+ (scale-float (float 7559773870443815 1.0d0) -169)
+ (scale-float (float 4673613301724074 1.0d0) -223)
+ (scale-float (float 7553295897329664 1.0d0) -278))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7152861393888683 1.0d0) -56)
+ (scale-float (float 7565878570349375 1.0d0) -110)
+ (scale-float (float -7802019064054273 1.0d0) -165)
+ (scale-float (float -4712455673784214 1.0d0) -219)
+ (scale-float (float 5519364636540928 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7264502626473728 1.0d0) -56)
+ (scale-float (float 5936078152956053 1.0d0) -110)
+ (scale-float (float -7906469325752255 1.0d0) -164)
+ (scale-float (float -6465867251265623 1.0d0) -223)
+ (scale-float (float 7504591801286656 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7376178394751819 1.0d0) -56)
+ (scale-float (float -8859946810674421 1.0d0) -110)
+ (scale-float (float -7949643639289247 1.0d0) -168)
+ (scale-float (float -5604386867881409 1.0d0) -222)
+ (scale-float (float 6625040614555648 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7487889240564457 1.0d0) -56)
+ (scale-float (float 8179107059254834 1.0d0) -110)
+ (scale-float (float -6711550284059890 1.0d0) -165)
+ (scale-float (float -6613737386215464 1.0d0) -219)
+ (scale-float (float 8573469608116224 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7599635706423858 1.0d0) -56)
+ (scale-float (float -5021711585340894 1.0d0) -111)
+ (scale-float (float 7740387150144596 1.0d0) -167)
+ (scale-float (float 4661144660996454 1.0d0) -223)
+ (scale-float (float -6322889329475584 1.0d0) -279))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7711418335523637 1.0d0) -56)
+ (scale-float (float -8609137171438323 1.0d0) -110)
+ (scale-float (float -6037575059163093 1.0d0) -164)
+ (scale-float (float 6225270545516738 1.0d0) -218)
+ (scale-float (float -5141839461605376 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7823237671749537 1.0d0) -56)
+ (scale-float (float 6687032382261292 1.0d0) -112)
+ (scale-float (float 7024089537427424 1.0d0) -167)
+ (scale-float (float 6969080309942190 1.0d0) -222)
+ (scale-float (float -7307821048922112 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7935094259690181 1.0d0) -56)
+ (scale-float (float 5680290923419169 1.0d0) -111)
+ (scale-float (float 7716708000339451 1.0d0) -167)
+ (scale-float (float -7010928175638465 1.0d0) -222)
+ (scale-float (float 5277045889040384 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8046988644647848 1.0d0) -56)
+ (scale-float (float 5185024818748664 1.0d0) -112)
+ (scale-float (float -5681267394991444 1.0d0) -167)
+ (scale-float (float 4698510920575786 1.0d0) -221)
+ (scale-float (float 4989748411564032 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8158921372649284 1.0d0) -56)
+ (scale-float (float 8929495983690682 1.0d0) -114)
+ (scale-float (float 5927558661542143 1.0d0) -168)
+ (scale-float (float 5953096587911066 1.0d0) -222)
+ (scale-float (float 8962606055292928 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8270892990456541 1.0d0) -56)
+ (scale-float (float -6047702914664268 1.0d0) -111)
+ (scale-float (float 8186708783179062 1.0d0) -165)
+ (scale-float (float 7642722139093008 1.0d0) -219)
+ (scale-float (float -5593872702865408 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8382904045577845 1.0d0) -56)
+ (scale-float (float -7412505701126784 1.0d0) -111)
+ (scale-float (float -5365413719970027 1.0d0) -165)
+ (scale-float (float 6451016213204131 1.0d0) -219)
+ (scale-float (float 7452785976934400 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8494955086278496 1.0d0) -56)
+ (scale-float (float 5419484173144977 1.0d0) -110)
+ (scale-float (float -5303123499771649 1.0d0) -164)
+ (scale-float (float 8696448382442292 1.0d0) -219)
+ (scale-float (float -8885969386602496 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8607046661591800 1.0d0) -56)
+ (scale-float (float 7860511841625658 1.0d0) -110)
+ (scale-float (float -8440374760270214 1.0d0) -164)
+ (scale-float (float -6311430224193453 1.0d0) -220)
+ (scale-float (float -7586855451099136 1.0d0) -278))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8719179321330029 1.0d0) -56)
+ (scale-float (float 6725577529928868 1.0d0) -111)
+ (scale-float (float 4752923271001071 1.0d0) -165)
+ (scale-float (float -7961951381416762 1.0d0) -220)
+ (scale-float (float -5716077439582208 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8831353616095416 1.0d0) -56)
+ (scale-float (float -5813602762816251 1.0d0) -110)
+ (scale-float (float -5302369597773380 1.0d0) -164)
+ (scale-float (float -7398301255386951 1.0d0) -222)
+ (scale-float (float 8159191133847552 1.0d0) -279))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8943570097291181 1.0d0) -56)
+ (scale-float (float -5426213072509755 1.0d0) -112)
+ (scale-float (float -7587744248286820 1.0d0) -166)
+ (scale-float (float -8538733829867481 1.0d0) -220)
+ (scale-float (float 8792237744390144 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4527914658566297 1.0d0) -55)
+ (scale-float (float -7576230219115969 1.0d0) -110)
+ (scale-float (float -8171606742653604 1.0d0) -164)
+ (scale-float (float 6814616967442332 1.0d0) -219)
+ (scale-float (float 4740052622540800 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4584065914329032 1.0d0) -55)
+ (scale-float (float -7739642130862782 1.0d0) -109)
+ (scale-float (float -5903158961808203 1.0d0) -163)
+ (scale-float (float 5013645235424376 1.0d0) -217)
+ (scale-float (float 4720746110517248 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4640239092870134 1.0d0) -55)
+ (scale-float (float -7873817123208315 1.0d0) -109)
+ (scale-float (float 4856093233620299 1.0d0) -163)
+ (scale-float (float -8390786141797477 1.0d0) -217)
+ (scale-float (float -8639776580632576 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4696434471548656 1.0d0) -55)
+ (scale-float (float 6116950334466380 1.0d0) -109)
+ (scale-float (float 4701099603009923 1.0d0) -163)
+ (scale-float (float -6670795055935663 1.0d0) -217)
+ (scale-float (float 8855773987405824 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4752652328151967 1.0d0) -55)
+ (scale-float (float -8029006509121970 1.0d0) -109)
+ (scale-float (float 5632485480639596 1.0d0) -163)
+ (scale-float (float 4524369949679804 1.0d0) -217)
+ (scale-float (float -5139652230881280 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4808892940901360 1.0d0) -55)
+ (scale-float (float -5762870458079499 1.0d0) -111)
+ (scale-float (float -6728858850511268 1.0d0) -165)
+ (scale-float (float 8700105152540579 1.0d0) -219)
+ (scale-float (float 5691558200016896 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4865156588457695 1.0d0) -55)
+ (scale-float (float 5068801794475263 1.0d0) -110)
+ (scale-float (float 7042066869380771 1.0d0) -164)
+ (scale-float (float -8233963587575527 1.0d0) -219)
+ (scale-float (float 8454875527774208 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4921443549927046 1.0d0) -55)
+ (scale-float (float 6670931963169079 1.0d0) -112)
+ (scale-float (float 6871594852918270 1.0d0) -166)
+ (scale-float (float -6529129004087023 1.0d0) -224)
+ (scale-float (float 7735276667404288 1.0d0) -281))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4977754104866372 1.0d0) -55)
+ (scale-float (float 6468474429034831 1.0d0) -110)
+ (scale-float (float 7730726220120452 1.0d0) -165)
+ (scale-float (float 7508391372008488 1.0d0) -221)
+ (scale-float (float 6088589550026752 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5034088533289208 1.0d0) -55)
+ (scale-float (float 6087475125882111 1.0d0) -111)
+ (scale-float (float 4994162618810673 1.0d0) -165)
+ (scale-float (float -4869496774497395 1.0d0) -219)
+ (scale-float (float -7346516535803904 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5090447115671372 1.0d0) -55)
+ (scale-float (float -8129613073659650 1.0d0) -109)
+ (scale-float (float -4846080599871262 1.0d0) -163)
+ (scale-float (float 6738271431699785 1.0d0) -217)
+ (scale-float (float -4868787126517760 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5146830132956691 1.0d0) -55)
+ (scale-float (float 7509624426547818 1.0d0) -112)
+ (scale-float (float 8500775522566297 1.0d0) -171)
+ (scale-float (float -7011163888603277 1.0d0) -225)
+ (scale-float (float 5915791039922176 1.0d0) -280))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5203237866562753 1.0d0) -55)
+ (scale-float (float -5829286551747373 1.0d0) -109)
+ (scale-float (float 4980785097215743 1.0d0) -163)
+ (scale-float (float 8063050618742639 1.0d0) -217)
+ (scale-float (float -7143930396565504 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5259670598386667 1.0d0) -55)
+ (scale-float (float -4836952932449700 1.0d0) -109)
+ (scale-float (float 7774753994185333 1.0d0) -163)
+ (scale-float (float 7763483140171779 1.0d0) -217)
+ (scale-float (float -5837580271656960 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5316128610810854 1.0d0) -55)
+ (scale-float (float 6402509095088759 1.0d0) -109)
+ (scale-float (float -7117487656558607 1.0d0) -163)
+ (scale-float (float 7881060823408044 1.0d0) -219)
+ (scale-float (float 7310917085855744 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5372612186708854 1.0d0) -55)
+ (scale-float (float 6247993595275937 1.0d0) -109)
+ (scale-float (float 7998021571448454 1.0d0) -163)
+ (scale-float (float 5491702007259241 1.0d0) -220)
+ (scale-float (float 7058713469255680 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5429121609451150 1.0d0) -55)
+ (scale-float (float 8827609864892521 1.0d0) -109)
+ (scale-float (float 7236850302528970 1.0d0) -167)
+ (scale-float (float 8187817439379132 1.0d0) -221)
+ (scale-float (float 7265264459186176 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5485657162911020 1.0d0) -55)
+ (scale-float (float -6595502998385967 1.0d0) -109)
+ (scale-float (float 4840308973379913 1.0d0) -168)
+ (scale-float (float 7424222474073124 1.0d0) -224)
+ (scale-float (float -6493614599307264 1.0d0) -281))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5542219131470401 1.0d0) -55)
+ (scale-float (float -7638706918489227 1.0d0) -110)
+ (scale-float (float 5799801396483317 1.0d0) -166)
+ (scale-float (float 7466405873662505 1.0d0) -222)
+ (scale-float (float -5839540864942080 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5598807800025786 1.0d0) -55)
+ (scale-float (float -8997232664974518 1.0d0) -109)
+ (scale-float (float -7307451053206538 1.0d0) -164)
+ (scale-float (float -5481293865498913 1.0d0) -218)
+ (scale-float (float -7526930126962688 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5655423453994130 1.0d0) -55)
+ (scale-float (float -7780008752111365 1.0d0) -110)
+ (scale-float (float -7542951012544117 1.0d0) -165)
+ (scale-float (float -7543888475229767 1.0d0) -219)
+ (scale-float (float -8241438645288960 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5712066379318788 1.0d0) -55)
+ (scale-float (float -5170522137844942 1.0d0) -110)
+ (scale-float (float 7330190056042847 1.0d0) -164)
+ (scale-float (float -7540357321185592 1.0d0) -219)
+ (scale-float (float -6099119651946496 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5768736862475468 1.0d0) -55)
+ (scale-float (float -4700148773782443 1.0d0) -112)
+ (scale-float (float -8429835727631577 1.0d0) -166)
+ (scale-float (float 5851369222986272 1.0d0) -220)
+ (scale-float (float -7295941256609792 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5825435190478211 1.0d0) -55)
+ (scale-float (float -7572193797642450 1.0d0) -109)
+ (scale-float (float 4508825016273459 1.0d0) -165)
+ (scale-float (float 6129997020988578 1.0d0) -220)
+ (scale-float (float -5497588376141824 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5882161650885389 1.0d0) -55)
+ (scale-float (float 6471266934125820 1.0d0) -110)
+ (scale-float (float 5181896306925786 1.0d0) -165)
+ (scale-float (float -7670427102098631 1.0d0) -219)
+ (scale-float (float 6191692254412800 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5938916531805734 1.0d0) -55)
+ (scale-float (float -6090492451389217 1.0d0) -114)
+ (scale-float (float 5278677844538864 1.0d0) -168)
+ (scale-float (float 6872399155658363 1.0d0) -226)
+ (scale-float (float 8027150993063936 1.0d0) -281))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5995700121904379 1.0d0) -55)
+ (scale-float (float -5118001822316822 1.0d0) -110)
+ (scale-float (float -5815950458400915 1.0d0) -166)
+ (scale-float (float 7004697197465144 1.0d0) -220)
+ (scale-float (float 7344940100878336 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6052512710408932 1.0d0) -55)
+ (scale-float (float -7075698032293369 1.0d0) -109)
+ (scale-float (float 6688178102238434 1.0d0) -163)
+ (scale-float (float -5990142485633599 1.0d0) -217)
+ (scale-float (float -6008784978935808 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6109354587115568 1.0d0) -55)
+ (scale-float (float 8234530131344280 1.0d0) -111)
+ (scale-float (float 8351457172513464 1.0d0) -165)
+ (scale-float (float 7372034874684930 1.0d0) -219)
+ (scale-float (float 7710257217241088 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6166226042395150 1.0d0) -55)
+ (scale-float (float 7366529959750318 1.0d0) -109)
+ (scale-float (float -7747231943909515 1.0d0) -163)
+ (scale-float (float -7266715004971172 1.0d0) -218)
+ (scale-float (float -6609585914707968 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6223127367199369 1.0d0) -55)
+ (scale-float (float 5078091465606672 1.0d0) -111)
+ (scale-float (float -6258877052478490 1.0d0) -165)
+ (scale-float (float 6225885649634281 1.0d0) -220)
+ (scale-float (float -6919874133819392 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6280058853066910 1.0d0) -55)
+ (scale-float (float 7490881293776915 1.0d0) -110)
+ (scale-float (float -5001850339134660 1.0d0) -165)
+ (scale-float (float -7953210327117808 1.0d0) -221)
+ (scale-float (float -5253712853991424 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6337020792129647 1.0d0) -55)
+ (scale-float (float 5583171594218605 1.0d0) -109)
+ (scale-float (float 6027039080259669 1.0d0) -163)
+ (scale-float (float -5932506187905416 1.0d0) -217)
+ (scale-float (float -5357118036705280 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6394013477118858 1.0d0) -55)
+ (scale-float (float 4556321542130997 1.0d0) -109)
+ (scale-float (float -8964768880763116 1.0d0) -164)
+ (scale-float (float 5727636906572843 1.0d0) -220)
+ (scale-float (float -8092962865676288 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6451037201371468 1.0d0) -55)
+ (scale-float (float -8748177972257937 1.0d0) -110)
+ (scale-float (float 8658298247298180 1.0d0) -166)
+ (scale-float (float -4766553959276361 1.0d0) -221)
+ (scale-float (float -6340546582806528 1.0d0) -280))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6508092258836316 1.0d0) -55)
+ (scale-float (float -7511081466163018 1.0d0) -109)
+ (scale-float (float -7981759787616897 1.0d0) -163)
+ (scale-float (float 8455872738259259 1.0d0) -217)
+ (scale-float (float -5434205101883392 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6565178944080451 1.0d0) -55)
+ (scale-float (float -8611577517111291 1.0d0) -110)
+ (scale-float (float -8454200970980085 1.0d0) -165)
+ (scale-float (float 6789041466039988 1.0d0) -226)
+ (scale-float (float 5977663378292736 1.0d0) -280))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6622297552295452 1.0d0) -55)
+ (scale-float (float 5452291118725619 1.0d0) -110)
+ (scale-float (float 7328992377850242 1.0d0) -165)
+ (scale-float (float -5116378117573545 1.0d0) -221)
+ (scale-float (float 7136606002610176 1.0d0) -278))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6679448379303776 1.0d0) -55)
+ (scale-float (float -6638268959205849 1.0d0) -109)
+ (scale-float (float -7600467532980976 1.0d0) -163)
+ (scale-float (float -5417800925811745 1.0d0) -217)
+ (scale-float (float -4538168963416064 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6736631721565128 1.0d0) -55)
+ (scale-float (float 7573754120514625 1.0d0) -110)
+ (scale-float (float 7329449332130875 1.0d0) -168)
+ (scale-float (float -5905355884849686 1.0d0) -222)
+ (scale-float (float 7602204120711168 1.0d0) -278))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6793847876182869 1.0d0) -55)
+ (scale-float (float 6676564840392027 1.0d0) -109)
+ (scale-float (float -5675449886587296 1.0d0) -164)
+ (scale-float (float -7669529119228440 1.0d0) -218)
+ (scale-float (float 7143967907840000 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6851097140910440 1.0d0) -55)
+ (scale-float (float -7780212332483814 1.0d0) -112)
+ (scale-float (float 7477852697010646 1.0d0) -166)
+ (scale-float (float 6703685263770991 1.0d0) -221)
+ (scale-float (float 5690868734754816 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6908379814157819 1.0d0) -55)
+ (scale-float (float -5985907255123450 1.0d0) -110)
+ (scale-float (float -7325586974432443 1.0d0) -166)
+ (scale-float (float 5146817689422195 1.0d0) -220)
+ (scale-float (float -8980411948793856 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6965696194998008 1.0d0) -55)
+ (scale-float (float -5183167562292569 1.0d0) -110)
+ (scale-float (float -5680545166452593 1.0d0) -168)
+ (scale-float (float 5417309285913173 1.0d0) -224)
+ (scale-float (float 5574395766505472 1.0d0) -279))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7023046583173545 1.0d0) -55)
+ (scale-float (float 5469317083261277 1.0d0) -111)
+ (scale-float (float 7914186106132976 1.0d0) -165)
+ (scale-float (float -8434628263460071 1.0d0) -222)
+ (scale-float (float 4709591782785024 1.0d0) -280))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7080431279103047 1.0d0) -55)
+ (scale-float (float -8491104167411902 1.0d0) -111)
+ (scale-float (float -5779076369625898 1.0d0) -168)
+ (scale-float (float 8057310987916656 1.0d0) -223)
+ (scale-float (float 4847259606843392 1.0d0) -281))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7137850583887779 1.0d0) -55)
+ (scale-float (float 5671745063431914 1.0d0) -110)
+ (scale-float (float 5447437971804588 1.0d0) -164)
+ (scale-float (float -7745816957413577 1.0d0) -219)
+ (scale-float (float 7661427792347136 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7195304799318258 1.0d0) -55)
+ (scale-float (float -5610468230388854 1.0d0) -110)
+ (scale-float (float 7536675286731204 1.0d0) -167)
+ (scale-float (float -7279286110198890 1.0d0) -221)
+ (scale-float (float 4958502468976640 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7252794227880879 1.0d0) -55)
+ (scale-float (float 8278044779681432 1.0d0) -110)
+ (scale-float (float 7715675824747055 1.0d0) -166)
+ (scale-float (float 6117041239147755 1.0d0) -220)
+ (scale-float (float 7442947239051264 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7310319172764580 1.0d0) -55)
+ (scale-float (float 4833968187433846 1.0d0) -109)
+ (scale-float (float 5046714256632371 1.0d0) -163)
+ (scale-float (float -6568326514319436 1.0d0) -217)
+ (scale-float (float 5210720656695296 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7367879937867529 1.0d0) -55)
+ (scale-float (float 4804900492868119 1.0d0) -109)
+ (scale-float (float -7411186186095749 1.0d0) -163)
+ (scale-float (float 5828766142139315 1.0d0) -217)
+ (scale-float (float -7573163244486656 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7425476827803847 1.0d0) -55)
+ (scale-float (float 4611504221555817 1.0d0) -109)
+ (scale-float (float 6858176159783287 1.0d0) -165)
+ (scale-float (float -6849205108054614 1.0d0) -220)
+ (scale-float (float -6629461747302400 1.0d0) -278))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7483110147910360 1.0d0) -55)
+ (scale-float (float 6822576037229571 1.0d0) -109)
+ (scale-float (float -8410156068940929 1.0d0) -164)
+ (scale-float (float 4835518274743475 1.0d0) -218)
+ (scale-float (float 4504567664017408 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7540780204253384 1.0d0) -55)
+ (scale-float (float -6819351086721273 1.0d0) -109)
+ (scale-float (float -6480724941237332 1.0d0) -163)
+ (scale-float (float 7166437516330547 1.0d0) -220)
+ (scale-float (float -4561467498168320 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7598487303635536 1.0d0) -55)
+ (scale-float (float 8094657927437731 1.0d0) -110)
+ (scale-float (float -7840959609377352 1.0d0) -165)
+ (scale-float (float 7737038363119588 1.0d0) -220)
+ (scale-float (float -5764604430778368 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7656231753602589 1.0d0) -55)
+ (scale-float (float 7614184589827716 1.0d0) -111)
+ (scale-float (float -6055209000302034 1.0d0) -167)
+ (scale-float (float 6912774198929249 1.0d0) -221)
+ (scale-float (float -8621741193560064 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7714013862450345 1.0d0) -55)
+ (scale-float (float -6643669905436701 1.0d0) -109)
+ (scale-float (float -8809353102703740 1.0d0) -163)
+ (scale-float (float -5784911504337306 1.0d0) -219)
+ (scale-float (float -7951659696324608 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7771833939231549 1.0d0) -55)
+ (scale-float (float 5770393606706325 1.0d0) -111)
+ (scale-float (float -8076762696393840 1.0d0) -165)
+ (scale-float (float -6707266844386184 1.0d0) -219)
+ (scale-float (float 7736001479311360 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7829692293762838 1.0d0) -55)
+ (scale-float (float 4965875359458328 1.0d0) -110)
+ (scale-float (float 6663999094714711 1.0d0) -168)
+ (scale-float (float 4686684579199587 1.0d0) -223)
+ (scale-float (float -7333470229495808 1.0d0) -278))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7887589236631716 1.0d0) -55)
+ (scale-float (float -8345944480364230 1.0d0) -110)
+ (scale-float (float -5418137701153960 1.0d0) -164)
+ (scale-float (float -6470969604068705 1.0d0) -221)
+ (scale-float (float 7179643541127168 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7945525079203567 1.0d0) -55)
+ (scale-float (float -6847981601253647 1.0d0) -110)
+ (scale-float (float -4863673567124626 1.0d0) -164)
+ (scale-float (float -7444497903682647 1.0d0) -218)
+ (scale-float (float -8564206038286336 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8003500133628704 1.0d0) -55)
+ (scale-float (float -6384758877576968 1.0d0) -109)
+ (scale-float (float 6740106856703987 1.0d0) -165)
+ (scale-float (float -8501918674824518 1.0d0) -220)
+ (scale-float (float 5777868031000576 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8061514712849447 1.0d0) -55)
+ (scale-float (float 5410011614653078 1.0d0) -109)
+ (scale-float (float 8808680801574451 1.0d0) -168)
+ (scale-float (float 8394262048730307 1.0d0) -223)
+ (scale-float (float 5954659095150592 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8119569130607243 1.0d0) -55)
+ (scale-float (float 5776475857501746 1.0d0) -109)
+ (scale-float (float 6116201295084420 1.0d0) -163)
+ (scale-float (float 5208790852095780 1.0d0) -217)
+ (scale-float (float 7627555784491008 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8177663701449813 1.0d0) -55)
+ (scale-float (float -7416990344268185 1.0d0) -110)
+ (scale-float (float -8874976026039930 1.0d0) -164)
+ (scale-float (float -8256577032933969 1.0d0) -220)
+ (scale-float (float -5955849034661888 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8235798740738339 1.0d0) -55)
+ (scale-float (float -4698418974266460 1.0d0) -110)
+ (scale-float (float -6592518672287517 1.0d0) -166)
+ (scale-float (float 7601958969623842 1.0d0) -222)
+ (scale-float (float 7320445852319744 1.0d0) -279))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8293974564654689 1.0d0) -55)
+ (scale-float (float 5099860996013982 1.0d0) -110)
+ (scale-float (float 6776159629115579 1.0d0) -164)
+ (scale-float (float -7044795858742300 1.0d0) -218)
+ (scale-float (float -5138101115142144 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8352191490208674 1.0d0) -55)
+ (scale-float (float 4770791916566347 1.0d0) -109)
+ (scale-float (float -5672411028071133 1.0d0) -166)
+ (scale-float (float 4682323527781160 1.0d0) -220)
+ (scale-float (float 8466434668101632 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8410449835245343 1.0d0) -55)
+ (scale-float (float 6066491156835030 1.0d0) -110)
+ (scale-float (float -7897170535679349 1.0d0) -165)
+ (scale-float (float -7106029363154641 1.0d0) -220)
+ (scale-float (float 7973192579153920 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8468749918452315 1.0d0) -55)
+ (scale-float (float 8648639138086207 1.0d0) -110)
+ (scale-float (float 7402753497228340 1.0d0) -172)
+ (scale-float (float 8969810979011104 1.0d0) -229)
+ (scale-float (float 5836432736256000 1.0d0) -284))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8527092059367150 1.0d0) -55)
+ (scale-float (float -5149205715896135 1.0d0) -110)
+ (scale-float (float -5330121521156150 1.0d0) -168)
+ (scale-float (float 5394558135702816 1.0d0) -223)
+ (scale-float (float -7433783334141952 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8585476578384754 1.0d0) -55)
+ (scale-float (float -6488747212670915 1.0d0) -109)
+ (scale-float (float 4635986267469458 1.0d0) -163)
+ (scale-float (float -4751582872351818 1.0d0) -217)
+ (scale-float (float -8861354691715072 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8643903796764826 1.0d0) -55)
+ (scale-float (float -6878931960708518 1.0d0) -110)
+ (scale-float (float 7005988110236151 1.0d0) -164)
+ (scale-float (float -7337737200771684 1.0d0) -218)
+ (scale-float (float 5026045165944832 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8702374036639342 1.0d0) -55)
+ (scale-float (float 8929481337847706 1.0d0) -113)
+ (scale-float (float -5053793908207295 1.0d0) -168)
+ (scale-float (float -5827953039715125 1.0d0) -225)
+ (scale-float (float 6237410534883328 1.0d0) -279))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8760887621020077 1.0d0) -55)
+ (scale-float (float 4874842038897625 1.0d0) -110)
+ (scale-float (float 8224513339670484 1.0d0) -167)
+ (scale-float (float -8060244733930376 1.0d0) -221)
+ (scale-float (float -8963353342246912 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8819444873806167 1.0d0) -55)
+ (scale-float (float 7007718928206342 1.0d0) -111)
+ (scale-float (float -8313701843904309 1.0d0) -166)
+ (scale-float (float -5223822528731678 1.0d0) -222)
+ (scale-float (float 4794415268233216 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8878046119791711 1.0d0) -55)
+ (scale-float (float -5851884451069858 1.0d0) -109)
+ (scale-float (float 4999211068812776 1.0d0) -163)
+ (scale-float (float 6405372182366141 1.0d0) -218)
+ (scale-float (float 5163607219961856 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8936691684673411 1.0d0) -55)
+ (scale-float (float 7194546067628740 1.0d0) -111)
+ (scale-float (float -7983688869599522 1.0d0) -167)
+ (scale-float (float -7812818282421373 1.0d0) -221)
+ (scale-float (float -5853363073974272 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8995381895058258 1.0d0) -55)
+ (scale-float (float 7732288314949261 1.0d0) -110)
+ (scale-float (float 5140727914811209 1.0d0) -164)
+ (scale-float (float 7009003350568191 1.0d0) -220)
+ (scale-float (float 8229894590103552 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4527058539235626 1.0d0) -54)
+ (scale-float (float -4792911017592139 1.0d0) -108)
+ (scale-float (float -5797791072547532 1.0d0) -163)
+ (scale-float (float -7709214865109200 1.0d0) -219)
+ (scale-float (float -7460442892730368 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4556448781681582 1.0d0) -54)
+ (scale-float (float 5903218021801605 1.0d0) -110)
+ (scale-float (float -6868688608385675 1.0d0) -164)
+ (scale-float (float 8318407996124040 1.0d0) -220)
+ (scale-float (float 8463172749230080 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4585861839559175 1.0d0) -54)
+ (scale-float (float -5586424574999721 1.0d0) -108)
+ (scale-float (float -6713761517375096 1.0d0) -165)
+ (scale-float (float -8698643768155212 1.0d0) -219)
+ (scale-float (float -5851454910824448 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4615297878031294 1.0d0) -54)
+ (scale-float (float -5507924102351110 1.0d0) -112)
+ (scale-float (float 6298113611101015 1.0d0) -166)
+ (scale-float (float 8841457876512333 1.0d0) -220)
+ (scale-float (float 6061337804013568 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4644757062735490 1.0d0) -54)
+ (scale-float (float -8878673781259615 1.0d0) -108)
+ (scale-float (float 7785217292426784 1.0d0) -162)
+ (scale-float (float 5936193291726156 1.0d0) -216)
+ (scale-float (float 8882660820459520 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4674239559787937 1.0d0) -54)
+ (scale-float (float -6288376064219499 1.0d0) -108)
+ (scale-float (float 5392792200241883 1.0d0) -163)
+ (scale-float (float 6546866619688776 1.0d0) -219)
+ (scale-float (float 5463574939041792 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4703745535787425 1.0d0) -54)
+ (scale-float (float -8337154116360168 1.0d0) -114)
+ (scale-float (float -5684630603269009 1.0d0) -169)
+ (scale-float (float -7103166541292006 1.0d0) -224)
+ (scale-float (float -5634311441088512 1.0d0) -283))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4733275157819369 1.0d0) -54)
+ (scale-float (float -7936537530243612 1.0d0) -108)
+ (scale-float (float 6456661258173686 1.0d0) -163)
+ (scale-float (float -4902372285858463 1.0d0) -219)
+ (scale-float (float -4593002542530560 1.0d0) -279))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4762828593459838 1.0d0) -54)
+ (scale-float (float 5996721932870126 1.0d0) -109)
+ (scale-float (float 5469026328988276 1.0d0) -163)
+ (scale-float (float 5838288175527334 1.0d0) -219)
+ (scale-float (float 4806586532757504 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4792406010779616 1.0d0) -54)
+ (scale-float (float 5135538472000746 1.0d0) -110)
+ (scale-float (float -7660419028958640 1.0d0) -165)
+ (scale-float (float 8123711526111171 1.0d0) -221)
+ (scale-float (float 8471574316056576 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4822007578348273 1.0d0) -54)
+ (scale-float (float 5595404697961539 1.0d0) -109)
+ (scale-float (float -4722825849992697 1.0d0) -165)
+ (scale-float (float 6258940607479666 1.0d0) -220)
+ (scale-float (float -6968149578743808 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4851633465238269 1.0d0) -54)
+ (scale-float (float -5244481814982328 1.0d0) -109)
+ (scale-float (float -8621616242392221 1.0d0) -164)
+ (scale-float (float -8322009843426366 1.0d0) -218)
+ (scale-float (float -7468203435884544 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4881283841029074 1.0d0) -54)
+ (scale-float (float 8645519010148517 1.0d0) -111)
+ (scale-float (float -6317126145288358 1.0d0) -165)
+ (scale-float (float -5771982956501134 1.0d0) -219)
+ (scale-float (float -4579098081886208 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4910958875811317 1.0d0) -54)
+ (scale-float (float 7693196297890657 1.0d0) -109)
+ (scale-float (float -5306789488419077 1.0d0) -164)
+ (scale-float (float 4620036310880406 1.0d0) -218)
+ (scale-float (float 4833764576624640 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4940658740190954 1.0d0) -54)
+ (scale-float (float -6449704918800392 1.0d0) -109)
+ (scale-float (float 5931696213829664 1.0d0) -167)
+ (scale-float (float 7441015247049226 1.0d0) -222)
+ (scale-float (float 5070353260871680 1.0d0) -278))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4970383605293460 1.0d0) -54)
+ (scale-float (float -6963902927811824 1.0d0) -108)
+ (scale-float (float -6084723968070719 1.0d0) -166)
+ (scale-float (float 8527432993926656 1.0d0) -220)
+ (scale-float (float 8826083294183424 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5000133642768048 1.0d0) -54)
+ (scale-float (float -7499240964911465 1.0d0) -108)
+ (scale-float (float 8404767609015144 1.0d0) -163)
+ (scale-float (float 5118497539695268 1.0d0) -217)
+ (scale-float (float 5573991615021056 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5029909024791909 1.0d0) -54)
+ (scale-float (float 4690791298341092 1.0d0) -109)
+ (scale-float (float -8583490581494850 1.0d0) -163)
+ (scale-float (float -7781273129309127 1.0d0) -218)
+ (scale-float (float 8527528665153536 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5059709924074480 1.0d0) -54)
+ (scale-float (float -8274257144785174 1.0d0) -108)
+ (scale-float (float 8605643487191983 1.0d0) -162)
+ (scale-float (float 4943358429361778 1.0d0) -216)
+ (scale-float (float -5248100867473408 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5089536513861728 1.0d0) -54)
+ (scale-float (float 7449449833992560 1.0d0) -111)
+ (scale-float (float 8502349982607593 1.0d0) -165)
+ (scale-float (float -8912544598793746 1.0d0) -219)
+ (scale-float (float 4985800866922496 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5119388967940473 1.0d0) -54)
+ (scale-float (float -5040702218784569 1.0d0) -108)
+ (scale-float (float -7862367246730493 1.0d0) -163)
+ (scale-float (float 5666055775244705 1.0d0) -218)
+ (scale-float (float -5646302130143232 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5149267460642720 1.0d0) -54)
+ (scale-float (float 6251291300829104 1.0d0) -108)
+ (scale-float (float -8164429300941560 1.0d0) -163)
+ (scale-float (float 7285882438787204 1.0d0) -217)
+ (scale-float (float -5378042763280384 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5179172166850032 1.0d0) -54)
+ (scale-float (float -5527024786357847 1.0d0) -108)
+ (scale-float (float -7062439590040239 1.0d0) -162)
+ (scale-float (float 4507293448957224 1.0d0) -217)
+ (scale-float (float 5683388019638272 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5209103261997912 1.0d0) -54)
+ (scale-float (float 8370142316121569 1.0d0) -109)
+ (scale-float (float -6299485514507818 1.0d0) -163)
+ (scale-float (float -7785649042773685 1.0d0) -218)
+ (scale-float (float 4622918637322240 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5239060922080229 1.0d0) -54)
+ (scale-float (float -5680348420129941 1.0d0) -108)
+ (scale-float (float -6534617345791786 1.0d0) -162)
+ (scale-float (float -8382425990327521 1.0d0) -216)
+ (scale-float (float -5267207369392128 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5269045323653652 1.0d0) -54)
+ (scale-float (float -7559815491735995 1.0d0) -108)
+ (scale-float (float 7619500245974179 1.0d0) -163)
+ (scale-float (float -8869909005915014 1.0d0) -219)
+ (scale-float (float 5432752759504896 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5299056643842124 1.0d0) -54)
+ (scale-float (float 7289104637332449 1.0d0) -110)
+ (scale-float (float 6766030025023967 1.0d0) -168)
+ (scale-float (float 5559161824204402 1.0d0) -225)
+ (scale-float (float 7658060096995328 1.0d0) -279))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5329095060341357 1.0d0) -54)
+ (scale-float (float 8165717582558569 1.0d0) -108)
+ (scale-float (float -8123284144702295 1.0d0) -162)
+ (scale-float (float 7178507862192362 1.0d0) -217)
+ (scale-float (float -7135785081438208 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5359160751423353 1.0d0) -54)
+ (scale-float (float 7080231659627778 1.0d0) -112)
+ (scale-float (float -7548713760468652 1.0d0) -167)
+ (scale-float (float 6466222237066779 1.0d0) -223)
+ (scale-float (float 6003234922561536 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5389253895940952 1.0d0) -54)
+ (scale-float (float -7516733785111438 1.0d0) -108)
+ (scale-float (float -4742989815127629 1.0d0) -162)
+ (scale-float (float -7810805373912549 1.0d0) -224)
+ (scale-float (float -7337082844348416 1.0d0) -278))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5419374673332410 1.0d0) -54)
+ (scale-float (float -8167966288239556 1.0d0) -109)
+ (scale-float (float -8699894614626576 1.0d0) -164)
+ (scale-float (float -4675540942138983 1.0d0) -219)
+ (scale-float (float 8232855933157376 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5449523263626004 1.0d0) -54)
+ (scale-float (float 6398224322476671 1.0d0) -109)
+ (scale-float (float 4838869985046966 1.0d0) -163)
+ (scale-float (float -7413578936767028 1.0d0) -217)
+ (scale-float (float 7719285499461632 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5479699847444663 1.0d0) -54)
+ (scale-float (float 7004582375311232 1.0d0) -109)
+ (scale-float (float 7053406496414591 1.0d0) -164)
+ (scale-float (float 6195939850353028 1.0d0) -218)
+ (scale-float (float 7884320182501376 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5509904606010627 1.0d0) -54)
+ (scale-float (float 6048461068633961 1.0d0) -113)
+ (scale-float (float -4589559027124842 1.0d0) -167)
+ (scale-float (float -7900886421694977 1.0d0) -222)
+ (scale-float (float -6098756799823872 1.0d0) -278))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5540137721150136 1.0d0) -54)
+ (scale-float (float -5218073295293738 1.0d0) -110)
+ (scale-float (float 8279090620043467 1.0d0) -165)
+ (scale-float (float -8646366899204624 1.0d0) -220)
+ (scale-float (float -7996565681078272 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5570399375298147 1.0d0) -54)
+ (scale-float (float 5702327025805787 1.0d0) -108)
+ (scale-float (float -8361105625692448 1.0d0) -163)
+ (scale-float (float 8744385940548563 1.0d0) -217)
+ (scale-float (float -6172090909442048 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5600689751503081 1.0d0) -54)
+ (scale-float (float 8480816801239221 1.0d0) -108)
+ (scale-float (float -6473556860361857 1.0d0) -162)
+ (scale-float (float -6532315921254110 1.0d0) -219)
+ (scale-float (float -7517484474433536 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5631009033431597 1.0d0) -54)
+ (scale-float (float -6588696684491324 1.0d0) -108)
+ (scale-float (float 4954802647016766 1.0d0) -163)
+ (scale-float (float 6871666234162648 1.0d0) -217)
+ (scale-float (float 7486389799485440 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5661357405373393 1.0d0) -54)
+ (scale-float (float 8672929383773568 1.0d0) -108)
+ (scale-float (float 8783135377413608 1.0d0) -164)
+ (scale-float (float -6786159096708429 1.0d0) -219)
+ (scale-float (float -5412558944272384 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5691735052246049 1.0d0) -54)
+ (scale-float (float 5932551485725244 1.0d0) -108)
+ (scale-float (float -7792127572930504 1.0d0) -164)
+ (scale-float (float -8604243228224482 1.0d0) -218)
+ (scale-float (float 6252133448515584 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5722142159599882 1.0d0) -54)
+ (scale-float (float 6554249691122831 1.0d0) -108)
+ (scale-float (float -6707637909618992 1.0d0) -163)
+ (scale-float (float -7505665006626726 1.0d0) -217)
+ (scale-float (float -7332034661515264 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5752578913622846 1.0d0) -54)
+ (scale-float (float 5979354610713365 1.0d0) -109)
+ (scale-float (float 7232528073004636 1.0d0) -165)
+ (scale-float (float -4516178550529618 1.0d0) -219)
+ (scale-float (float -4847993273450496 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5783045501145455 1.0d0) -54)
+ (scale-float (float -6304116472496983 1.0d0) -109)
+ (scale-float (float 5711449803591210 1.0d0) -163)
+ (scale-float (float -4652508805398252 1.0d0) -218)
+ (scale-float (float 6550443868160000 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5813542109645739 1.0d0) -54)
+ (scale-float (float -5079950301079660 1.0d0) -110)
+ (scale-float (float 8105916438721082 1.0d0) -165)
+ (scale-float (float -6869172908268741 1.0d0) -223)
+ (scale-float (float 4731809985200128 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5844068927254233 1.0d0) -54)
+ (scale-float (float -4895765363457933 1.0d0) -108)
+ (scale-float (float -5371546970455416 1.0d0) -162)
+ (scale-float (float -5909702315966344 1.0d0) -216)
+ (scale-float (float 7063626975682560 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5874626142758993 1.0d0) -54)
+ (scale-float (float -8731864477600014 1.0d0) -109)
+ (scale-float (float 8671713489173723 1.0d0) -163)
+ (scale-float (float -8257188715405224 1.0d0) -217)
+ (scale-float (float -5225084106424320 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5905213945610648 1.0d0) -54)
+ (scale-float (float 8403779153830187 1.0d0) -109)
+ (scale-float (float -6402734478336312 1.0d0) -163)
+ (scale-float (float 8065779743282186 1.0d0) -218)
+ (scale-float (float 8709739050369024 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5935832525927484 1.0d0) -54)
+ (scale-float (float -8890845793660549 1.0d0) -108)
+ (scale-float (float -6579356270110174 1.0d0) -162)
+ (scale-float (float 6434789947547405 1.0d0) -216)
+ (scale-float (float -9003078871040000 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5966482074500553 1.0d0) -54)
+ (scale-float (float -7895124968817094 1.0d0) -110)
+ (scale-float (float -8335943129160730 1.0d0) -165)
+ (scale-float (float 8815909484887820 1.0d0) -220)
+ (scale-float (float 6269149903978496 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5997162782798828 1.0d0) -54)
+ (scale-float (float 5824806598401903 1.0d0) -109)
+ (scale-float (float 8009371669873568 1.0d0) -163)
+ (scale-float (float 8867548339866293 1.0d0) -218)
+ (scale-float (float -5056738669625344 1.0d0) -278))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6027874842974379 1.0d0) -54)
+ (scale-float (float 6721359812215525 1.0d0) -111)
+ (scale-float (float -6671679555227129 1.0d0) -169)
+ (scale-float (float 8484805345815585 1.0d0) -223)
+ (scale-float (float 8406483778666496 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6058618447867587 1.0d0) -54)
+ (scale-float (float 6665502109414749 1.0d0) -114)
+ (scale-float (float -5646878233586915 1.0d0) -168)
+ (scale-float (float 5107681250807062 1.0d0) -222)
+ (scale-float (float 4728774270124032 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6089393791012393 1.0d0) -54)
+ (scale-float (float -6664119958937848 1.0d0) -108)
+ (scale-float (float -5594778416446073 1.0d0) -162)
+ (scale-float (float 8862952943802850 1.0d0) -216)
+ (scale-float (float 7871812910972928 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6120201066641577 1.0d0) -54)
+ (scale-float (float -4586179663279275 1.0d0) -111)
+ (scale-float (float -4740319963361780 1.0d0) -165)
+ (scale-float (float 8468127784929610 1.0d0) -221)
+ (scale-float (float 5321007091941376 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6151040469692077 1.0d0) -54)
+ (scale-float (float 7595239050365428 1.0d0) -110)
+ (scale-float (float -7870200882167234 1.0d0) -164)
+ (scale-float (float 5481763067590111 1.0d0) -218)
+ (scale-float (float 7735369483354112 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6181912195810336 1.0d0) -54)
+ (scale-float (float 5734592145016950 1.0d0) -108)
+ (scale-float (float 5793784248012981 1.0d0) -163)
+ (scale-float (float 5031554736338549 1.0d0) -217)
+ (scale-float (float -5789642176856064 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6212816441357689 1.0d0) -54)
+ (scale-float (float 4769667021305317 1.0d0) -109)
+ (scale-float (float 5592378482013590 1.0d0) -163)
+ (scale-float (float -7726471147684740 1.0d0) -217)
+ (scale-float (float -8040648413511680 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6243753403415782 1.0d0) -54)
+ (scale-float (float -6982176687015804 1.0d0) -108)
+ (scale-float (float 6706517513227136 1.0d0) -162)
+ (scale-float (float -4912014726411816 1.0d0) -216)
+ (scale-float (float -4840380048596992 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6274723279792027 1.0d0) -54)
+ (scale-float (float 7911934173639660 1.0d0) -109)
+ (scale-float (float 7426404250565983 1.0d0) -163)
+ (scale-float (float 6500628645233949 1.0d0) -218)
+ (scale-float (float -6494658032304128 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6305726269025099 1.0d0) -54)
+ (scale-float (float -7726465659787471 1.0d0) -108)
+ (scale-float (float 8344572022741855 1.0d0) -163)
+ (scale-float (float -6608471203849376 1.0d0) -217)
+ (scale-float (float -7877975504535552 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6336762570390455 1.0d0) -54)
+ (scale-float (float 7960954202580189 1.0d0) -108)
+ (scale-float (float 5618998746368161 1.0d0) -164)
+ (scale-float (float 8738559645587944 1.0d0) -218)
+ (scale-float (float 6005059025371136 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6367832383905909 1.0d0) -54)
+ (scale-float (float 6341398666024320 1.0d0) -108)
+ (scale-float (float -7750769088142911 1.0d0) -162)
+ (scale-float (float 7565057165817819 1.0d0) -223)
+ (scale-float (float 5358045278240768 1.0d0) -278))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6398935910337225 1.0d0) -54)
+ (scale-float (float 6082529185902398 1.0d0) -110)
+ (scale-float (float 8826435700564561 1.0d0) -164)
+ (scale-float (float -4974436677305734 1.0d0) -219)
+ (scale-float (float -6164256670351360 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6430073351203759 1.0d0) -54)
+ (scale-float (float 8716837033735824 1.0d0) -108)
+ (scale-float (float -8267129588204290 1.0d0) -163)
+ (scale-float (float 7681516409160421 1.0d0) -217)
+ (scale-float (float 7895267187064832 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6461244908784138 1.0d0) -54)
+ (scale-float (float -8015310492706090 1.0d0) -110)
+ (scale-float (float 5688100874886187 1.0d0) -164)
+ (scale-float (float 6737850011901015 1.0d0) -218)
+ (scale-float (float -5018238653169664 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6492450786121969 1.0d0) -54)
+ (scale-float (float -8071548204338623 1.0d0) -108)
+ (scale-float (float 6892426759581498 1.0d0) -167)
+ (scale-float (float 7560938407038692 1.0d0) -223)
+ (scale-float (float 6059942507184128 1.0d0) -280))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6523691187031595 1.0d0) -54)
+ (scale-float (float 7393070964670067 1.0d0) -108)
+ (scale-float (float -7895924667637526 1.0d0) -168)
+ (scale-float (float 4894569363002079 1.0d0) -223)
+ (scale-float (float -4822397773414400 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6554966316103890 1.0d0) -54)
+ (scale-float (float -7812680289478938 1.0d0) -108)
+ (scale-float (float -4747481491721066 1.0d0) -162)
+ (scale-float (float 7026538431791632 1.0d0) -218)
+ (scale-float (float -5556862227775488 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6586276378712080 1.0d0) -54)
+ (scale-float (float -5552081879869431 1.0d0) -109)
+ (scale-float (float -6453048663881517 1.0d0) -166)
+ (scale-float (float -7895139828044812 1.0d0) -221)
+ (scale-float (float -7105785926516736 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6617621581017623 1.0d0) -54)
+ (scale-float (float -6987794792010451 1.0d0) -109)
+ (scale-float (float -8067070328466877 1.0d0) -163)
+ (scale-float (float 5679181663198016 1.0d0) -221)
+ (scale-float (float -8281718232449024 1.0d0) -278))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6649002129976113 1.0d0) -54)
+ (scale-float (float -7889229320358413 1.0d0) -108)
+ (scale-float (float 5079592112992827 1.0d0) -162)
+ (scale-float (float 4770612839289417 1.0d0) -217)
+ (scale-float (float 8596794325204992 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6680418233343231 1.0d0) -54)
+ (scale-float (float -6715292935978436 1.0d0) -109)
+ (scale-float (float 5239032292278013 1.0d0) -163)
+ (scale-float (float -5486156789369719 1.0d0) -217)
+ (scale-float (float -7247670266085376 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6711870099680737 1.0d0) -54)
+ (scale-float (float 8100517469707447 1.0d0) -108)
+ (scale-float (float -5818270211694313 1.0d0) -162)
+ (scale-float (float -7135832861027332 1.0d0) -217)
+ (scale-float (float 6169913247891456 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6743357938362502 1.0d0) -54)
+ (scale-float (float 8406423559910851 1.0d0) -110)
+ (scale-float (float 7933780431293024 1.0d0) -164)
+ (scale-float (float -7562587897290264 1.0d0) -218)
+ (scale-float (float -6100958529716224 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6774881959580577 1.0d0) -54)
+ (scale-float (float 4977346743827364 1.0d0) -109)
+ (scale-float (float 4607196061547035 1.0d0) -163)
+ (scale-float (float 8066156034828473 1.0d0) -218)
+ (scale-float (float 5037825028259840 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6806442374351312 1.0d0) -54)
+ (scale-float (float 6405985611020453 1.0d0) -109)
+ (scale-float (float -6828688062399183 1.0d0) -164)
+ (scale-float (float 5764728187240446 1.0d0) -220)
+ (scale-float (float 4772520399470592 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6838039394521511 1.0d0) -54)
+ (scale-float (float 5980093326535112 1.0d0) -111)
+ (scale-float (float -4538397269512401 1.0d0) -165)
+ (scale-float (float -7707091638445773 1.0d0) -221)
+ (scale-float (float -4778485829599232 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6869673232774631 1.0d0) -54)
+ (scale-float (float 5210418775440372 1.0d0) -112)
+ (scale-float (float 7716467412191416 1.0d0) -166)
+ (scale-float (float 8174180801788395 1.0d0) -220)
+ (scale-float (float 8647097880936448 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6901344102637025 1.0d0) -54)
+ (scale-float (float 5849067171328751 1.0d0) -109)
+ (scale-float (float 6902158935478196 1.0d0) -165)
+ (scale-float (float -5088148634858931 1.0d0) -219)
+ (scale-float (float -4891851776065536 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6933052218484228 1.0d0) -54)
+ (scale-float (float -5210185363200856 1.0d0) -110)
+ (scale-float (float 4947085291004524 1.0d0) -165)
+ (scale-float (float 7191218893116563 1.0d0) -223)
+ (scale-float (float -7240506083901440 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6964797795547285 1.0d0) -54)
+ (scale-float (float -7927418103768110 1.0d0) -108)
+ (scale-float (float -4626642970937846 1.0d0) -162)
+ (scale-float (float -8959477845897736 1.0d0) -216)
+ (scale-float (float -5803103154798592 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6996581049919125 1.0d0) -54)
+ (scale-float (float -5984083944925790 1.0d0) -108)
+ (scale-float (float -7041800036255568 1.0d0) -162)
+ (scale-float (float -5252522570170604 1.0d0) -217)
+ (scale-float (float -5009998060322816 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7028402198560980 1.0d0) -54)
+ (scale-float (float 7022371942120564 1.0d0) -108)
+ (scale-float (float 5584947292561995 1.0d0) -163)
+ (scale-float (float -6291408783677312 1.0d0) -218)
+ (scale-float (float 8049645261422592 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7060261459308850 1.0d0) -54)
+ (scale-float (float -7545139092737973 1.0d0) -108)
+ (scale-float (float -5160084157449151 1.0d0) -166)
+ (scale-float (float -7152310661688458 1.0d0) -220)
+ (scale-float (float 6771426700034048 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7092159050880004 1.0d0) -54)
+ (scale-float (float 8085220958576014 1.0d0) -108)
+ (scale-float (float -7671705211491780 1.0d0) -171)
+ (scale-float (float -5814378343259683 1.0d0) -227)
+ (scale-float (float -4626430038114304 1.0d0) -281))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7124095192879546 1.0d0) -54)
+ (scale-float (float 4823424312094686 1.0d0) -110)
+ (scale-float (float -5654579007885514 1.0d0) -166)
+ (scale-float (float -6437871800462990 1.0d0) -220)
+ (scale-float (float 7241901420576768 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7156070105807005 1.0d0) -54)
+ (scale-float (float 7532537016246719 1.0d0) -109)
+ (scale-float (float 7626881242328308 1.0d0) -163)
+ (scale-float (float -5132260599118611 1.0d0) -217)
+ (scale-float (float -7501720078532608 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7188084011062990 1.0d0) -54)
+ (scale-float (float -8909263844798631 1.0d0) -111)
+ (scale-float (float 7800760643100730 1.0d0) -168)
+ (scale-float (float 7859518598022284 1.0d0) -222)
+ (scale-float (float -8625834056744960 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7220137130955880 1.0d0) -54)
+ (scale-float (float 7199807520451720 1.0d0) -108)
+ (scale-float (float -7328209004091986 1.0d0) -162)
+ (scale-float (float 7701332358883269 1.0d0) -216)
+ (scale-float (float 6078029432520704 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7252229688708571 1.0d0) -54)
+ (scale-float (float 4812819055312174 1.0d0) -108)
+ (scale-float (float -8491983200397909 1.0d0) -162)
+ (scale-float (float 5454059749320355 1.0d0) -216)
+ (scale-float (float -8271053339123712 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7284361908465262 1.0d0) -54)
+ (scale-float (float 5319679790284386 1.0d0) -108)
+ (scale-float (float -8245116306922651 1.0d0) -165)
+ (scale-float (float -6471320710836658 1.0d0) -219)
+ (scale-float (float -7670199828086784 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7316534015298297 1.0d0) -54)
+ (scale-float (float 7895945118490535 1.0d0) -108)
+ (scale-float (float 5349823435762808 1.0d0) -165)
+ (scale-float (float 7276162246990058 1.0d0) -222)
+ (scale-float (float -8794174295900160 1.0d0) -281))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7348746235215053 1.0d0) -54)
+ (scale-float (float -4991787978102074 1.0d0) -115)
+ (scale-float (float -7017284277871086 1.0d0) -171)
+ (scale-float (float -7312995970083636 1.0d0) -225)
+ (scale-float (float 8085754261536768 1.0d0) -279))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7380998795164875 1.0d0) -54)
+ (scale-float (float 4827938254464316 1.0d0) -108)
+ (scale-float (float -7887003139000389 1.0d0) -162)
+ (scale-float (float -7365280714533250 1.0d0) -219)
+ (scale-float (float 8198060750536704 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7413291923046068 1.0d0) -54)
+ (scale-float (float 5428082564665360 1.0d0) -109)
+ (scale-float (float 7083631705761830 1.0d0) -165)
+ (scale-float (float 7603729640466046 1.0d0) -221)
+ (scale-float (float -5353176324112384 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7445625847712931 1.0d0) -54)
+ (scale-float (float 7862653154659977 1.0d0) -109)
+ (scale-float (float 8290472501720887 1.0d0) -163)
+ (scale-float (float -7182702065350219 1.0d0) -217)
+ (scale-float (float 8324752635920384 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7478000798982849 1.0d0) -54)
+ (scale-float (float -5282688215399631 1.0d0) -108)
+ (scale-float (float 6866342896636518 1.0d0) -162)
+ (scale-float (float 6602737659878245 1.0d0) -217)
+ (scale-float (float 7924527228387328 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7510417007643430 1.0d0) -54)
+ (scale-float (float -5312097031438001 1.0d0) -110)
+ (scale-float (float -5304207428933764 1.0d0) -165)
+ (scale-float (float 6868179069579583 1.0d0) -220)
+ (scale-float (float -8196403042189312 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7542874705459702 1.0d0) -54)
+ (scale-float (float -7547066079720037 1.0d0) -108)
+ (scale-float (float -8598616365401002 1.0d0) -162)
+ (scale-float (float 4633397926691352 1.0d0) -216)
+ (scale-float (float 8651451060289536 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7575374125181352 1.0d0) -54)
+ (scale-float (float 8946318489507782 1.0d0) -108)
+ (scale-float (float -7008593049193040 1.0d0) -166)
+ (scale-float (float -5068333483699604 1.0d0) -220)
+ (scale-float (float -8567930020167680 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7607915500550031 1.0d0) -54)
+ (scale-float (float 4617504925406170 1.0d0) -108)
+ (scale-float (float -8774422373357135 1.0d0) -162)
+ (scale-float (float 6297747381347345 1.0d0) -216)
+ (scale-float (float -7442442641997824 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7640499066306697 1.0d0) -54)
+ (scale-float (float 4587036321529128 1.0d0) -108)
+ (scale-float (float 6568698335803356 1.0d0) -169)
+ (scale-float (float -6632857361191396 1.0d0) -223)
+ (scale-float (float -5340676170448896 1.0d0) -279))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7673125058199026 1.0d0) -54)
+ (scale-float (float -5764419905786180 1.0d0) -108)
+ (scale-float (float 5805594213017354 1.0d0) -162)
+ (scale-float (float 5382041942773009 1.0d0) -217)
+ (scale-float (float 8186629037555712 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7705793712988867 1.0d0) -54)
+ (scale-float (float -7888055214971411 1.0d0) -111)
+ (scale-float (float -7026570502213510 1.0d0) -165)
+ (scale-float (float 8608953594467743 1.0d0) -219)
+ (scale-float (float -8603590727827456 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7738505268459761 1.0d0) -54)
+ (scale-float (float 6387592051483503 1.0d0) -110)
+ (scale-float (float -8407409032907008 1.0d0) -164)
+ (scale-float (float -8507697269050430 1.0d0) -220)
+ (scale-float (float -8780860362588160 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7771259963424508 1.0d0) -54)
+ (scale-float (float -5866464212855829 1.0d0) -108)
+ (scale-float (float -5271098738052139 1.0d0) -162)
+ (scale-float (float -8560361395811918 1.0d0) -216)
+ (scale-float (float 6729017663750144 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7804058037732792 1.0d0) -54)
+ (scale-float (float -4926517300904794 1.0d0) -108)
+ (scale-float (float -6029400928008200 1.0d0) -169)
+ (scale-float (float 5266108208833520 1.0d0) -223)
+ (scale-float (float -4896566125002752 1.0d0) -280))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7836899732278866 1.0d0) -54)
+ (scale-float (float 8518756895838226 1.0d0) -109)
+ (scale-float (float 4601698873773235 1.0d0) -163)
+ (scale-float (float 7049777900397769 1.0d0) -217)
+ (scale-float (float 6948615965507584 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7869785289009292 1.0d0) -54)
+ (scale-float (float -7639657292759528 1.0d0) -109)
+ (scale-float (float -6449484396219519 1.0d0) -165)
+ (scale-float (float -7147029134618641 1.0d0) -222)
+ (scale-float (float 5495928106516480 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7902714950930734 1.0d0) -54)
+ (scale-float (float -5326045191975680 1.0d0) -109)
+ (scale-float (float 7755380088573731 1.0d0) -164)
+ (scale-float (float -5217187004155150 1.0d0) -223)
+ (scale-float (float 5080926778294272 1.0d0) -279))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7935688962117818 1.0d0) -54)
+ (scale-float (float 5546292034164684 1.0d0) -108)
+ (scale-float (float -8607573575534375 1.0d0) -162)
+ (scale-float (float 6480272707685079 1.0d0) -217)
+ (scale-float (float 5576809248817152 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7968707567721046 1.0d0) -54)
+ (scale-float (float -9003360136692083 1.0d0) -109)
+ (scale-float (float -6622940525097786 1.0d0) -163)
+ (scale-float (float -5160538338653791 1.0d0) -217)
+ (scale-float (float -5958876320825344 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8001771013974765 1.0d0) -54)
+ (scale-float (float 5584281041302382 1.0d0) -109)
+ (scale-float (float 7625925347880865 1.0d0) -163)
+ (scale-float (float -8904732484875342 1.0d0) -220)
+ (scale-float (float -7818294859923456 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8034879548205207 1.0d0) -54)
+ (scale-float (float 8560262197066170 1.0d0) -108)
+ (scale-float (float 6051747633474110 1.0d0) -164)
+ (scale-float (float -5401001151418960 1.0d0) -219)
+ (scale-float (float -5649580774916096 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8068033418838580 1.0d0) -54)
+ (scale-float (float -4578423666026153 1.0d0) -108)
+ (scale-float (float -6198162187973330 1.0d0) -167)
+ (scale-float (float -7555234083626692 1.0d0) -224)
+ (scale-float (float -6213524892155904 1.0d0) -282))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8101232875409220 1.0d0) -54)
+ (scale-float (float 5179194167787136 1.0d0) -108)
+ (scale-float (float -6117166347437036 1.0d0) -163)
+ (scale-float (float -4682182761916766 1.0d0) -217)
+ (scale-float (float 7518016439648256 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8134478168567816 1.0d0) -54)
+ (scale-float (float -7238386717282695 1.0d0) -108)
+ (scale-float (float 7761898490504190 1.0d0) -162)
+ (scale-float (float 6836914584744388 1.0d0) -216)
+ (scale-float (float 7171581006692352 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8167769550089680 1.0d0) -54)
+ (scale-float (float -8406287594341733 1.0d0) -108)
+ (scale-float (float 5558874863684631 1.0d0) -163)
+ (scale-float (float -6359785738596049 1.0d0) -221)
+ (scale-float (float 5835044828741632 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8201107272883095 1.0d0) -54)
+ (scale-float (float 6819244751509620 1.0d0) -108)
+ (scale-float (float -8350047850773748 1.0d0) -162)
+ (scale-float (float 6664290543717181 1.0d0) -217)
+ (scale-float (float -4718600353021952 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8234491590997721 1.0d0) -54)
+ (scale-float (float 7674489027423640 1.0d0) -108)
+ (scale-float (float -7182247942677747 1.0d0) -163)
+ (scale-float (float 6641823103494972 1.0d0) -217)
+ (scale-float (float -8622907994931200 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8267922759633061 1.0d0) -54)
+ (scale-float (float -5887776338599171 1.0d0) -108)
+ (scale-float (float -7437751711660818 1.0d0) -164)
+ (scale-float (float 7604569927329693 1.0d0) -218)
+ (scale-float (float -8743040785711104 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8301401035146995 1.0d0) -54)
+ (scale-float (float 4806497044565932 1.0d0) -108)
+ (scale-float (float -6749104744499533 1.0d0) -162)
+ (scale-float (float 8249719069242703 1.0d0) -216)
+ (scale-float (float 6289215142641664 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8334926675064386 1.0d0) -54)
+ (scale-float (float 5845402606195911 1.0d0) -108)
+ (scale-float (float -5757618533525676 1.0d0) -162)
+ (scale-float (float -5270578863655340 1.0d0) -219)
+ (scale-float (float 7133410972139520 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8368499938085740 1.0d0) -54)
+ (scale-float (float -8287120335192946 1.0d0) -109)
+ (scale-float (float -8184830548315435 1.0d0) -163)
+ (scale-float (float 8844281371019119 1.0d0) -221)
+ (scale-float (float -5219569598201856 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8402121084095939 1.0d0) -54)
+ (scale-float (float -6203229334290092 1.0d0) -109)
+ (scale-float (float -6587859673795460 1.0d0) -163)
+ (scale-float (float -8841880772166605 1.0d0) -217)
+ (scale-float (float 6580136024211456 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8435790374173044 1.0d0) -54)
+ (scale-float (float -6212088324992798 1.0d0) -109)
+ (scale-float (float -6674216506995482 1.0d0) -163)
+ (scale-float (float 6814816290043487 1.0d0) -217)
+ (scale-float (float -8885155688923136 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8469508070597160 1.0d0) -54)
+ (scale-float (float -6805582259839921 1.0d0) -112)
+ (scale-float (float 6466676163498797 1.0d0) -166)
+ (scale-float (float 7680600824547736 1.0d0) -220)
+ (scale-float (float -6642278083854336 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8503274436859374 1.0d0) -54)
+ (scale-float (float -8475499633333840 1.0d0) -109)
+ (scale-float (float 6763900476303258 1.0d0) -166)
+ (scale-float (float 4882721766729865 1.0d0) -220)
+ (scale-float (float 8973267754811392 1.0d0) -278))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8537089737670759 1.0d0) -54)
+ (scale-float (float -5801170934983928 1.0d0) -108)
+ (scale-float (float -4697776840284003 1.0d0) -164)
+ (scale-float (float 5379807769471472 1.0d0) -218)
+ (scale-float (float -8700538418888704 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8570954238971451 1.0d0) -54)
+ (scale-float (float -7738415965214164 1.0d0) -110)
+ (scale-float (float -6665924590477186 1.0d0) -165)
+ (scale-float (float -8124192976210029 1.0d0) -221)
+ (scale-float (float -7016246188965888 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8604868207939796 1.0d0) -54)
+ (scale-float (float -6395360095484724 1.0d0) -108)
+ (scale-float (float -5870362319522650 1.0d0) -164)
+ (scale-float (float -5606804937162585 1.0d0) -219)
+ (scale-float (float -7448167887994880 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8638831913001565 1.0d0) -54)
+ (scale-float (float -4944544095268153 1.0d0) -111)
+ (scale-float (float 6156925504330773 1.0d0) -165)
+ (scale-float (float 8928340496120296 1.0d0) -223)
+ (scale-float (float -5017713508352000 1.0d0) -278))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8672845623839247 1.0d0) -54)
+ (scale-float (float 8680633327830432 1.0d0) -108)
+ (scale-float (float 6118373041142822 1.0d0) -162)
+ (scale-float (float -6558252580692457 1.0d0) -217)
+ (scale-float (float 7965753749798912 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8706909611401411 1.0d0) -54)
+ (scale-float (float -7974378731410113 1.0d0) -115)
+ (scale-float (float -4831926012855593 1.0d0) -169)
+ (scale-float (float 6581858524670323 1.0d0) -225)
+ (scale-float (float -7364008021590016 1.0d0) -279))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8741024147912139 1.0d0) -54)
+ (scale-float (float -7894740025852426 1.0d0) -108)
+ (scale-float (float 8727197805527673 1.0d0) -162)
+ (scale-float (float 7710277888852085 1.0d0) -220)
+ (scale-float (float 8629521043423232 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8775189506880539 1.0d0) -54)
+ (scale-float (float -8274348958325742 1.0d0) -109)
+ (scale-float (float -7073233940354662 1.0d0) -163)
+ (scale-float (float 4699521416387840 1.0d0) -219)
+ (scale-float (float -6663577282281472 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8809405963110331 1.0d0) -54)
+ (scale-float (float -5960301673094160 1.0d0) -116)
+ (scale-float (float 6121743203934206 1.0d0) -171)
+ (scale-float (float 7421203062486710 1.0d0) -225)
+ (scale-float (float -7033729436352512 1.0d0) -280))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8843673792709506 1.0d0) -54)
+ (scale-float (float 6145771466055675 1.0d0) -108)
+ (scale-float (float -5702574178855182 1.0d0) -166)
+ (scale-float (float 4596183322651793 1.0d0) -222)
+ (scale-float (float 7162140500688896 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8877993273100065 1.0d0) -54)
+ (scale-float (float -4532819900220661 1.0d0) -112)
+ (scale-float (float -7328591704416441 1.0d0) -170)
+ (scale-float (float -6146277383691935 1.0d0) -224)
+ (scale-float (float 5983492940759040 1.0d0) -278))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8912364683027831 1.0d0) -54)
+ (scale-float (float -7998088743659896 1.0d0) -109)
+ (scale-float (float -8754589644848436 1.0d0) -163)
+ (scale-float (float 7758214011275658 1.0d0) -217)
+ (scale-float (float 8635004735242240 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8946788302572344 1.0d0) -54)
+ (scale-float (float -8342125019512553 1.0d0) -109)
+ (scale-float (float 5043067800815301 1.0d0) -165)
+ (scale-float (float -4630586221759956 1.0d0) -219)
+ (scale-float (float -5343017905946624 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8981264413156831 1.0d0) -54)
+ (scale-float (float 8387100890146983 1.0d0) -108)
+ (scale-float (float 7077808819832290 1.0d0) -162)
+ (scale-float (float 6464987353676952 1.0d0) -220)
+ (scale-float (float -7958912599851008 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4507896648779130 1.0d0) -53)
+ (scale-float (float -6708660077383512 1.0d0) -108)
+ (scale-float (float -8366916357197759 1.0d0) -162)
+ (scale-float (float -6444782262033265 1.0d0) -218)
+ (scale-float (float -5240782611546112 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4525187619958732 1.0d0) -53)
+ (scale-float (float -5832235559064189 1.0d0) -107)
+ (scale-float (float -6381676804949200 1.0d0) -162)
+ (scale-float (float 5722970937527277 1.0d0) -217)
+ (scale-float (float -6526499804872704 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4542505262874680 1.0d0) -53)
+ (scale-float (float -6525517655455450 1.0d0) -107)
+ (scale-float (float 8041703082737745 1.0d0) -161)
+ (scale-float (float 5097832762543963 1.0d0) -215)
+ (scale-float (float 5473796674256896 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4559849720976620 1.0d0) -53)
+ (scale-float (float -5754093533148655 1.0d0) -108)
+ (scale-float (float 8701202803183230 1.0d0) -162)
+ (scale-float (float 7678887392295697 1.0d0) -223)
+ (scale-float (float 5405639708770304 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4577221138411575 1.0d0) -53)
+ (scale-float (float -5925398864355862 1.0d0) -107)
+ (scale-float (float -8059665889346077 1.0d0) -161)
+ (scale-float (float 6861742371547520 1.0d0) -216)
+ (scale-float (float 6388023080321024 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4594619660029173 1.0d0) -53)
+ (scale-float (float -5515543270131506 1.0d0) -110)
+ (scale-float (float -6550537778056912 1.0d0) -166)
+ (scale-float (float -8075402668322711 1.0d0) -221)
+ (scale-float (float -5658595394322432 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4612045431386922 1.0d0) -53)
+ (scale-float (float 6897855639256251 1.0d0) -107)
+ (scale-float (float 8960455873051377 1.0d0) -166)
+ (scale-float (float 8697994798164569 1.0d0) -220)
+ (scale-float (float -4761501487333376 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4629498598755524 1.0d0) -53)
+ (scale-float (float 8224425622834411 1.0d0) -107)
+ (scale-float (float -6544230532358318 1.0d0) -161)
+ (scale-float (float -5299884883995828 1.0d0) -215)
+ (scale-float (float 5770603125129216 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4646979309124233 1.0d0) -53)
+ (scale-float (float -6981988261618077 1.0d0) -107)
+ (scale-float (float 6782506950776312 1.0d0) -163)
+ (scale-float (float -7245724661788897 1.0d0) -217)
+ (scale-float (float -6720267960090624 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4664487710206254 1.0d0) -53)
+ (scale-float (float -5035270749134246 1.0d0) -107)
+ (scale-float (float 6422566611494565 1.0d0) -161)
+ (scale-float (float 7369062648218613 1.0d0) -215)
+ (scale-float (float -8695047731109888 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4682023950444194 1.0d0) -53)
+ (scale-float (float -8372160660951103 1.0d0) -107)
+ (scale-float (float 5928434783576150 1.0d0) -161)
+ (scale-float (float 6539487882792859 1.0d0) -215)
+ (scale-float (float 8029172332101632 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4699588179015546 1.0d0) -53)
+ (scale-float (float 8886853490652648 1.0d0) -107)
+ (scale-float (float 5763096061994093 1.0d0) -162)
+ (scale-float (float 4683115134902506 1.0d0) -216)
+ (scale-float (float 8653947319009280 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4717180545838230 1.0d0) -53)
+ (scale-float (float 5586622106051693 1.0d0) -107)
+ (scale-float (float 8036452037295032 1.0d0) -161)
+ (scale-float (float 6779959618503735 1.0d0) -215)
+ (scale-float (float -6507651304095744 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4734801201576166 1.0d0) -53)
+ (scale-float (float -6237190452154883 1.0d0) -108)
+ (scale-float (float 4643019522674263 1.0d0) -162)
+ (scale-float (float -7886846877117856 1.0d0) -218)
+ (scale-float (float -4979876572954624 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4752450297644903 1.0d0) -53)
+ (scale-float (float -7855643284683925 1.0d0) -107)
+ (scale-float (float -5634142083180995 1.0d0) -161)
+ (scale-float (float -7453975415905748 1.0d0) -215)
+ (scale-float (float -5042903320576000 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4770127986217290 1.0d0) -53)
+ (scale-float (float 7952138120701786 1.0d0) -107)
+ (scale-float (float 6994339212778575 1.0d0) -161)
+ (scale-float (float -5261951449576151 1.0d0) -216)
+ (scale-float (float -4880652918095872 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4787834420229198 1.0d0) -53)
+ (scale-float (float 4832995180158545 1.0d0) -108)
+ (scale-float (float 7146506912380237 1.0d0) -164)
+ (scale-float (float 6931458891275020 1.0d0) -225)
+ (scale-float (float -8866122849845248 1.0d0) -280))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4805569753385279 1.0d0) -53)
+ (scale-float (float -8439645132915322 1.0d0) -107)
+ (scale-float (float -7712816172675144 1.0d0) -161)
+ (scale-float (float 5780295532144275 1.0d0) -217)
+ (scale-float (float 7195798375137280 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4823334140164782 1.0d0) -53)
+ (scale-float (float -7915835914806744 1.0d0) -108)
+ (scale-float (float 5254921383654742 1.0d0) -167)
+ (scale-float (float -7028553178126530 1.0d0) -223)
+ (scale-float (float -4997772331712512 1.0d0) -278))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4841127735827416 1.0d0) -53)
+ (scale-float (float 7060593290410898 1.0d0) -107)
+ (scale-float (float 6209082999592452 1.0d0) -161)
+ (scale-float (float -6183708292372973 1.0d0) -215)
+ (scale-float (float 8916875373338624 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4858950696419259 1.0d0) -53)
+ (scale-float (float -7030111868925238 1.0d0) -109)
+ (scale-float (float -5975789385255586 1.0d0) -167)
+ (scale-float (float -8453427635556977 1.0d0) -221)
+ (scale-float (float 7875977965731840 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4876803178778713 1.0d0) -53)
+ (scale-float (float -7602561039636497 1.0d0) -107)
+ (scale-float (float 8732350437883983 1.0d0) -167)
+ (scale-float (float -7312555609707464 1.0d0) -226)
+ (scale-float (float -8461835581784064 1.0d0) -282))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4894685340542516 1.0d0) -53)
+ (scale-float (float -6029160542699383 1.0d0) -107)
+ (scale-float (float 4583390438723436 1.0d0) -166)
+ (scale-float (float 6971276185675703 1.0d0) -221)
+ (scale-float (float 5392966084984832 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4912597340151800 1.0d0) -53)
+ (scale-float (float -5559341022823231 1.0d0) -107)
+ (scale-float (float -6908706566934477 1.0d0) -161)
+ (scale-float (float 4504567190583232 1.0d0) -215)
+ (scale-float (float 6160722299461632 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4930539336858198 1.0d0) -53)
+ (scale-float (float 5808381280790077 1.0d0) -107)
+ (scale-float (float 7652582390475331 1.0d0) -162)
+ (scale-float (float 8292905526115757 1.0d0) -216)
+ (scale-float (float 5006018932211712 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4948511490730007 1.0d0) -53)
+ (scale-float (float 5380137563157922 1.0d0) -107)
+ (scale-float (float -8946468102123049 1.0d0) -161)
+ (scale-float (float -7958091961424530 1.0d0) -217)
+ (scale-float (float -6939132543500288 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4966513962658396 1.0d0) -53)
+ (scale-float (float -4801154165350215 1.0d0) -110)
+ (scale-float (float -6250917523177918 1.0d0) -165)
+ (scale-float (float 5993359982466520 1.0d0) -219)
+ (scale-float (float -6172549171380224 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4984546914363671 1.0d0) -53)
+ (scale-float (float -4510312476691836 1.0d0) -109)
+ (scale-float (float -4644725715913652 1.0d0) -166)
+ (scale-float (float 4819040025054874 1.0d0) -221)
+ (scale-float (float 7915631538077696 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5002610508401592 1.0d0) -53)
+ (scale-float (float 7268509579131183 1.0d0) -107)
+ (scale-float (float -6065531368859792 1.0d0) -164)
+ (scale-float (float 9002108055198699 1.0d0) -219)
+ (scale-float (float 5681413586419712 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5020704908169744 1.0d0) -53)
+ (scale-float (float -6187767767599577 1.0d0) -107)
+ (scale-float (float -7263856256433037 1.0d0) -161)
+ (scale-float (float -8043334185632342 1.0d0) -215)
+ (scale-float (float -6164890504667136 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5038830277913954 1.0d0) -53)
+ (scale-float (float 6308489395924012 1.0d0) -107)
+ (scale-float (float 6330299365742520 1.0d0) -161)
+ (scale-float (float -7096067092233219 1.0d0) -215)
+ (scale-float (float 8765274760175616 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5056986782734778 1.0d0) -53)
+ (scale-float (float 8954541236143158 1.0d0) -110)
+ (scale-float (float -5287989393068474 1.0d0) -164)
+ (scale-float (float 4569752862850596 1.0d0) -220)
+ (scale-float (float 7209227294605312 1.0d0) -282))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5075174588594025 1.0d0) -53)
+ (scale-float (float -5166053031556848 1.0d0) -107)
+ (scale-float (float 6046832473183684 1.0d0) -164)
+ (scale-float (float 8402026985378047 1.0d0) -219)
+ (scale-float (float 7024445724033024 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5093393862321348 1.0d0) -53)
+ (scale-float (float 7386336930815745 1.0d0) -107)
+ (scale-float (float 6031985376353704 1.0d0) -162)
+ (scale-float (float -7719149339935552 1.0d0) -216)
+ (scale-float (float -8439969182449664 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5111644771620891 1.0d0) -53)
+ (scale-float (float 5082012270969989 1.0d0) -107)
+ (scale-float (float -4849000853225846 1.0d0) -163)
+ (scale-float (float -9005286711373379 1.0d0) -220)
+ (scale-float (float 5960732523888640 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5129927485077984 1.0d0) -53)
+ (scale-float (float -7711696259823571 1.0d0) -109)
+ (scale-float (float -8181634545254884 1.0d0) -163)
+ (scale-float (float 4830119714244532 1.0d0) -218)
+ (scale-float (float -7684842535256064 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5148242172165903 1.0d0) -53)
+ (scale-float (float -6853718118487248 1.0d0) -108)
+ (scale-float (float -7265613443891817 1.0d0) -162)
+ (scale-float (float 6220060484368905 1.0d0) -216)
+ (scale-float (float -7959479665360896 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5166589003252686 1.0d0) -53)
+ (scale-float (float -5485187828792632 1.0d0) -109)
+ (scale-float (float 4582684015601140 1.0d0) -163)
+ (scale-float (float 4862599867172207 1.0d0) -217)
+ (scale-float (float 8645829248516096 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5184968149608006 1.0d0) -53)
+ (scale-float (float 8750112061356386 1.0d0) -109)
+ (scale-float (float -8797282462271212 1.0d0) -164)
+ (scale-float (float -7658397801125106 1.0d0) -218)
+ (scale-float (float -6383101267148800 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5203379783410104 1.0d0) -53)
+ (scale-float (float -6513967467343726 1.0d0) -109)
+ (scale-float (float 7582216673581320 1.0d0) -165)
+ (scale-float (float 6137101960205153 1.0d0) -221)
+ (scale-float (float 5756808708751360 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5221824077752780 1.0d0) -53)
+ (scale-float (float -6995222256632551 1.0d0) -107)
+ (scale-float (float 5235432663590048 1.0d0) -161)
+ (scale-float (float -8194851437607374 1.0d0) -216)
+ (scale-float (float 6520981094989824 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5240301206652446 1.0d0) -53)
+ (scale-float (float -8962962155531402 1.0d0) -108)
+ (scale-float (float -5346920386790324 1.0d0) -162)
+ (scale-float (float -7166751286312922 1.0d0) -216)
+ (scale-float (float 8803327913099264 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5258811345055240 1.0d0) -53)
+ (scale-float (float 4548627140603241 1.0d0) -107)
+ (scale-float (float 6785959233090883 1.0d0) -162)
+ (scale-float (float 8074782605936423 1.0d0) -217)
+ (scale-float (float 5302902870016000 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5277354668844201 1.0d0) -53)
+ (scale-float (float 6645976722229584 1.0d0) -109)
+ (scale-float (float -6976441490267207 1.0d0) -163)
+ (scale-float (float 8800499992292365 1.0d0) -219)
+ (scale-float (float 5740929377107968 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5295931354846503 1.0d0) -53)
+ (scale-float (float 6449707834347061 1.0d0) -110)
+ (scale-float (float -7408853158102049 1.0d0) -165)
+ (scale-float (float 7349688746864014 1.0d0) -219)
+ (scale-float (float -5880496552673280 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5314541580840757 1.0d0) -53)
+ (scale-float (float 6138343049086733 1.0d0) -108)
+ (scale-float (float 5657544090698938 1.0d0) -162)
+ (scale-float (float -8569769515850394 1.0d0) -217)
+ (scale-float (float -6985609341992960 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5333185525564374 1.0d0) -53)
+ (scale-float (float -5324775252196552 1.0d0) -107)
+ (scale-float (float -7995619244570482 1.0d0) -162)
+ (scale-float (float 5183311238314717 1.0d0) -216)
+ (scale-float (float -6598569264349184 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5351863368720989 1.0d0) -53)
+ (scale-float (float 6994431788365202 1.0d0) -112)
+ (scale-float (float 7109236508237865 1.0d0) -167)
+ (scale-float (float 6867467258518706 1.0d0) -221)
+ (scale-float (float -5720226719072256 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5370575290987957 1.0d0) -53)
+ (scale-float (float 5089657113578193 1.0d0) -107)
+ (scale-float (float -4943326533344381 1.0d0) -162)
+ (scale-float (float 8334651651111165 1.0d0) -216)
+ (scale-float (float 8271632375726080 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5389321474023908 1.0d0) -53)
+ (scale-float (float -6446635779152745 1.0d0) -107)
+ (scale-float (float -5262159419143121 1.0d0) -163)
+ (scale-float (float 8760915925882190 1.0d0) -217)
+ (scale-float (float -7902450944999424 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5408102100476367 1.0d0) -53)
+ (scale-float (float 6805824131313844 1.0d0) -107)
+ (scale-float (float 5493224380911482 1.0d0) -161)
+ (scale-float (float -4571666489023266 1.0d0) -215)
+ (scale-float (float 8091290950320128 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5426917353989452 1.0d0) -53)
+ (scale-float (float -4932469610987991 1.0d0) -110)
+ (scale-float (float 5210704726919113 1.0d0) -167)
+ (scale-float (float -6429443084199812 1.0d0) -221)
+ (scale-float (float -8830633450668032 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5445767419211623 1.0d0) -53)
+ (scale-float (float -6976738914405561 1.0d0) -107)
+ (scale-float (float -4766393948990555 1.0d0) -161)
+ (scale-float (float 6552575107738495 1.0d0) -215)
+ (scale-float (float 5489868854796288 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5464652481803512 1.0d0) -53)
+ (scale-float (float 6469309716544036 1.0d0) -111)
+ (scale-float (float 8969702922195184 1.0d0) -166)
+ (scale-float (float -4570737248529081 1.0d0) -220)
+ (scale-float (float 7217367262167040 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5483572728445819 1.0d0) -53)
+ (scale-float (float 8004354601024729 1.0d0) -109)
+ (scale-float (float 6008808968600362 1.0d0) -164)
+ (scale-float (float 5741937663559221 1.0d0) -218)
+ (scale-float (float 5147459998449664 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5502528346847273 1.0d0) -53)
+ (scale-float (float 7233685709174836 1.0d0) -107)
+ (scale-float (float 5337260350655458 1.0d0) -162)
+ (scale-float (float 5148299775661637 1.0d0) -217)
+ (scale-float (float 5534802547376128 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5521519525752670 1.0d0) -53)
+ (scale-float (float -5858768564677182 1.0d0) -108)
+ (scale-float (float 5834167477915559 1.0d0) -163)
+ (scale-float (float 5334691320641575 1.0d0) -222)
+ (scale-float (float 5846312622751744 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5540546454950975 1.0d0) -53)
+ (scale-float (float -8482706766789253 1.0d0) -108)
+ (scale-float (float 4713472632522986 1.0d0) -163)
+ (scale-float (float -7174964795760410 1.0d0) -219)
+ (scale-float (float 7840888941838336 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5559609325283504 1.0d0) -53)
+ (scale-float (float -5801096331837773 1.0d0) -108)
+ (scale-float (float 8349118959361147 1.0d0) -162)
+ (scale-float (float -8616923555710993 1.0d0) -216)
+ (scale-float (float -8277916418179072 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5578708328652173 1.0d0) -53)
+ (scale-float (float -6726027650163837 1.0d0) -107)
+ (scale-float (float -6458353095643775 1.0d0) -162)
+ (scale-float (float -7398184401868909 1.0d0) -217)
+ (scale-float (float 5513143109287936 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5597843658027821 1.0d0) -53)
+ (scale-float (float -5906077944565103 1.0d0) -107)
+ (scale-float (float -7712269679175265 1.0d0) -161)
+ (scale-float (float -7005083680928545 1.0d0) -215)
+ (scale-float (float 5912419796393984 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5617015507458610 1.0d0) -53)
+ (scale-float (float -6427887237256213 1.0d0) -108)
+ (scale-float (float 8291301624756519 1.0d0) -164)
+ (scale-float (float 5349317807458978 1.0d0) -218)
+ (scale-float (float 6781118151720960 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5636224072078498 1.0d0) -53)
+ (scale-float (float -7313466148984719 1.0d0) -107)
+ (scale-float (float -5096669862601970 1.0d0) -161)
+ (scale-float (float -6664904833847981 1.0d0) -217)
+ (scale-float (float 8623134364270592 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5655469548115786 1.0d0) -53)
+ (scale-float (float 7323968426193609 1.0d0) -107)
+ (scale-float (float 6909804660179918 1.0d0) -164)
+ (scale-float (float 7297668636421731 1.0d0) -218)
+ (scale-float (float 7817035921752064 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5674752132901749 1.0d0) -53)
+ (scale-float (float 8415820872262924 1.0d0) -107)
+ (scale-float (float 6325479523844406 1.0d0) -162)
+ (scale-float (float 5111824692059650 1.0d0) -219)
+ (scale-float (float 5923502290108416 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5694072024879334 1.0d0) -53)
+ (scale-float (float 5739172865711330 1.0d0) -108)
+ (scale-float (float -5309535411364129 1.0d0) -162)
+ (scale-float (float -5391533390420244 1.0d0) -217)
+ (scale-float (float -5925284324573184 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5713429423611944 1.0d0) -53)
+ (scale-float (float -8915223606812791 1.0d0) -108)
+ (scale-float (float 4751061400487997 1.0d0) -162)
+ (scale-float (float -7308202214641270 1.0d0) -219)
+ (scale-float (float -8636432941580288 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5732824529792298 1.0d0) -53)
+ (scale-float (float 5113127260853617 1.0d0) -107)
+ (scale-float (float 8891688761727341 1.0d0) -161)
+ (scale-float (float 7504016892162005 1.0d0) -216)
+ (scale-float (float 6104404979154944 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5752257545251375 1.0d0) -53)
+ (scale-float (float 8347677106118095 1.0d0) -107)
+ (scale-float (float 4569883314052263 1.0d0) -164)
+ (scale-float (float 7177291325178548 1.0d0) -224)
+ (scale-float (float -6824779101241344 1.0d0) -281))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5771728672967432 1.0d0) -53)
+ (scale-float (float 8484855433571242 1.0d0) -107)
+ (scale-float (float -5540643457551870 1.0d0) -161)
+ (scale-float (float -8024020514455082 1.0d0) -215)
+ (scale-float (float 7526135653564416 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5791238117075110 1.0d0) -53)
+ (scale-float (float -8683982340171619 1.0d0) -107)
+ (scale-float (float 5289543814090115 1.0d0) -162)
+ (scale-float (float -6723364338842405 1.0d0) -216)
+ (scale-float (float -7277010529615872 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5810786082874616 1.0d0) -53)
+ (scale-float (float 8790361234865319 1.0d0) -110)
+ (scale-float (float 5759176720388606 1.0d0) -167)
+ (scale-float (float 4510151470287175 1.0d0) -222)
+ (scale-float (float -5964301560971264 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5830372776841001 1.0d0) -53)
+ (scale-float (float -7819250223482096 1.0d0) -107)
+ (scale-float (float 7292176465032656 1.0d0) -162)
+ (scale-float (float 6025098403014024 1.0d0) -216)
+ (scale-float (float -5048370178293760 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5849998406633505 1.0d0) -53)
+ (scale-float (float -4887031518721363 1.0d0) -107)
+ (scale-float (float 8379160051259355 1.0d0) -161)
+ (scale-float (float 8700917185261401 1.0d0) -216)
+ (scale-float (float 6543372499058688 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5869663181105003 1.0d0) -53)
+ (scale-float (float 5312029725434625 1.0d0) -109)
+ (scale-float (float 6200976698660522 1.0d0) -166)
+ (scale-float (float -6920924912106943 1.0d0) -220)
+ (scale-float (float -6217422547714048 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5889367310311529 1.0d0) -53)
+ (scale-float (float -5036777720432086 1.0d0) -108)
+ (scale-float (float -7281977183806205 1.0d0) -165)
+ (scale-float (float 7080651115402901 1.0d0) -219)
+ (scale-float (float -5796073143271424 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5909111005521887 1.0d0) -53)
+ (scale-float (float 8608067358818559 1.0d0) -108)
+ (scale-float (float -5621495144964180 1.0d0) -165)
+ (scale-float (float -7958973580478594 1.0d0) -220)
+ (scale-float (float 4694466641264640 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5928894479227357 1.0d0) -53)
+ (scale-float (float -6968761675730439 1.0d0) -107)
+ (scale-float (float 5943398530360704 1.0d0) -162)
+ (scale-float (float 5419670585448168 1.0d0) -216)
+ (scale-float (float 7394564270243840 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5948717945151479 1.0d0) -53)
+ (scale-float (float 6118415071219352 1.0d0) -108)
+ (scale-float (float -6652352552802771 1.0d0) -165)
+ (scale-float (float 5153879126680074 1.0d0) -222)
+ (scale-float (float 8351832358256640 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5968581618259942 1.0d0) -53)
+ (scale-float (float -7952958649125782 1.0d0) -107)
+ (scale-float (float 5479887006069038 1.0d0) -161)
+ (scale-float (float -6512461720229267 1.0d0) -216)
+ (scale-float (float 7696028983525376 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5988485714770547 1.0d0) -53)
+ (scale-float (float -5251349357223009 1.0d0) -107)
+ (scale-float (float 7438666141884381 1.0d0) -164)
+ (scale-float (float 7490698343639347 1.0d0) -218)
+ (scale-float (float 5695032139513856 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6008430452163278 1.0d0) -53)
+ (scale-float (float -7721909803024264 1.0d0) -108)
+ (scale-float (float -6841804881253504 1.0d0) -162)
+ (scale-float (float -8637326590839421 1.0d0) -218)
+ (scale-float (float 7692880784261120 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6028416049190455 1.0d0) -53)
+ (scale-float (float 5490352636223063 1.0d0) -107)
+ (scale-float (float -5865713820623546 1.0d0) -161)
+ (scale-float (float -6023431982012020 1.0d0) -217)
+ (scale-float (float 8327712147144704 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6048442725886988 1.0d0) -53)
+ (scale-float (float 7633179135868726 1.0d0) -107)
+ (scale-float (float -7308637258439807 1.0d0) -161)
+ (scale-float (float 7449615287420723 1.0d0) -216)
+ (scale-float (float -7741100103663616 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6068510703580721 1.0d0) -53)
+ (scale-float (float 8302506352608812 1.0d0) -107)
+ (scale-float (float 7681842875737732 1.0d0) -162)
+ (scale-float (float 6760463189437108 1.0d0) -216)
+ (scale-float (float -8782952538505216 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6088620204902877 1.0d0) -53)
+ (scale-float (float -5614528300739308 1.0d0) -107)
+ (scale-float (float -6381410024212059 1.0d0) -161)
+ (scale-float (float -7575462798141215 1.0d0) -215)
+ (scale-float (float 6724338145435648 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6108771453798594 1.0d0) -53)
+ (scale-float (float 8428986198267384 1.0d0) -107)
+ (scale-float (float -7368493697479974 1.0d0) -163)
+ (scale-float (float 6885287767027032 1.0d0) -219)
+ (scale-float (float -4970409271492608 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6128964675537572 1.0d0) -53)
+ (scale-float (float -6850362211190262 1.0d0) -108)
+ (scale-float (float -8672645779356558 1.0d0) -166)
+ (scale-float (float 7848917473800914 1.0d0) -222)
+ (scale-float (float -4919754221420544 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6149200096724800 1.0d0) -53)
+ (scale-float (float 8069164014779663 1.0d0) -107)
+ (scale-float (float 6823984770404817 1.0d0) -163)
+ (scale-float (float 5213546811559889 1.0d0) -220)
+ (scale-float (float 5288554594304000 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6169477945311406 1.0d0) -53)
+ (scale-float (float -8323227482201309 1.0d0) -107)
+ (scale-float (float -7513891739766802 1.0d0) -161)
+ (scale-float (float 5255557352228375 1.0d0) -216)
+ (scale-float (float -7718470909870080 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6189798450605586 1.0d0) -53)
+ (scale-float (float 7338005412010287 1.0d0) -109)
+ (scale-float (float -7664517034923179 1.0d0) -163)
+ (scale-float (float -5319235542261744 1.0d0) -217)
+ (scale-float (float -8567897407094784 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6210161843283658 1.0d0) -53)
+ (scale-float (float 6338971771918698 1.0d0) -107)
+ (scale-float (float -7636929382334548 1.0d0) -161)
+ (scale-float (float -8406235371787294 1.0d0) -215)
+ (scale-float (float -7314669467172864 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6230568355401203 1.0d0) -53)
+ (scale-float (float 6654931320247571 1.0d0) -110)
+ (scale-float (float -6230554486496306 1.0d0) -165)
+ (scale-float (float -5482836438122252 1.0d0) -222)
+ (scale-float (float 5069125470650368 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6251018220404318 1.0d0) -53)
+ (scale-float (float 5618962477129716 1.0d0) -110)
+ (scale-float (float 7593404637521974 1.0d0) -164)
+ (scale-float (float 8638510965412985 1.0d0) -219)
+ (scale-float (float 8068704777535488 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6271511673140977 1.0d0) -53)
+ (scale-float (float 7421352672543606 1.0d0) -108)
+ (scale-float (float 8620345730855296 1.0d0) -163)
+ (scale-float (float 6639677352137442 1.0d0) -219)
+ (scale-float (float -5409021636902912 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6292048949872497 1.0d0) -53)
+ (scale-float (float -8857813897462558 1.0d0) -110)
+ (scale-float (float 7392530850313307 1.0d0) -165)
+ (scale-float (float -4537786935860907 1.0d0) -219)
+ (scale-float (float -7082404550672384 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6312630288285111 1.0d0) -53)
+ (scale-float (float 7509336674701880 1.0d0) -107)
+ (scale-float (float 6044142360856574 1.0d0) -161)
+ (scale-float (float 8599218212312243 1.0d0) -216)
+ (scale-float (float 8354433115160576 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6333255927501658 1.0d0) -53)
+ (scale-float (float -8140356168250674 1.0d0) -109)
+ (scale-float (float -5702674584962561 1.0d0) -164)
+ (scale-float (float 5931226997974245 1.0d0) -218)
+ (scale-float (float -8263498496606208 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6353926108093373 1.0d0) -53)
+ (scale-float (float 6589821568525975 1.0d0) -108)
+ (scale-float (float -6572073962416708 1.0d0) -162)
+ (scale-float (float -6487361657571746 1.0d0) -220)
+ (scale-float (float 4833459568902144 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6374641072091803 1.0d0) -53)
+ (scale-float (float -4514495565987436 1.0d0) -107)
+ (scale-float (float 8447465510996955 1.0d0) -161)
+ (scale-float (float 6803330883106611 1.0d0) -217)
+ (scale-float (float 7903128583143424 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6395401063000823 1.0d0) -53)
+ (scale-float (float 7930988607636647 1.0d0) -107)
+ (scale-float (float -7565745581456994 1.0d0) -162)
+ (scale-float (float -4683963637191814 1.0d0) -216)
+ (scale-float (float -5126170729218048 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6416206325808781 1.0d0) -53)
+ (scale-float (float 6836393141875629 1.0d0) -107)
+ (scale-float (float 8073301901373620 1.0d0) -161)
+ (scale-float (float 8736916660370043 1.0d0) -215)
+ (scale-float (float 4774547646119936 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6437057107000746 1.0d0) -53)
+ (scale-float (float 6928617888081640 1.0d0) -108)
+ (scale-float (float -7427544809498318 1.0d0) -162)
+ (scale-float (float 6627230776011924 1.0d0) -217)
+ (scale-float (float -6247808682295296 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6457953654570883 1.0d0) -53)
+ (scale-float (float -5165186856237497 1.0d0) -109)
+ (scale-float (float 4918279154521545 1.0d0) -164)
+ (scale-float (float -8811085442930856 1.0d0) -218)
+ (scale-float (float -6616978950193152 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6478896218034943 1.0d0) -53)
+ (scale-float (float 4879347854922066 1.0d0) -111)
+ (scale-float (float -5462196167969035 1.0d0) -166)
+ (scale-float (float 8663483589318429 1.0d0) -220)
+ (scale-float (float 5890701520011264 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6499885048442876 1.0d0) -53)
+ (scale-float (float -6989966011466320 1.0d0) -107)
+ (scale-float (float 7279280353831330 1.0d0) -161)
+ (scale-float (float -5174472520893718 1.0d0) -217)
+ (scale-float (float -7018581477425152 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6520920398391561 1.0d0) -53)
+ (scale-float (float -5394587080112204 1.0d0) -107)
+ (scale-float (float -8226645231850230 1.0d0) -161)
+ (scale-float (float -7088064298636490 1.0d0) -216)
+ (scale-float (float -8013330166005760 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6542002522037665 1.0d0) -53)
+ (scale-float (float 6638215752912053 1.0d0) -107)
+ (scale-float (float -4951421407978267 1.0d0) -161)
+ (scale-float (float -4911493110608025 1.0d0) -215)
+ (scale-float (float -5806823123394560 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6563131675110625 1.0d0) -53)
+ (scale-float (float -6598438387944019 1.0d0) -107)
+ (scale-float (float 7536043809937061 1.0d0) -161)
+ (scale-float (float -5305137025734497 1.0d0) -216)
+ (scale-float (float -4603630755102720 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6584308114925748 1.0d0) -53)
+ (scale-float (float 4972281342743943 1.0d0) -107)
+ (scale-float (float -4632599375740696 1.0d0) -163)
+ (scale-float (float 4643807646818792 1.0d0) -218)
+ (scale-float (float -5442254938177536 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6605532100397455 1.0d0) -53)
+ (scale-float (float 8055888471286139 1.0d0) -109)
+ (scale-float (float 4770399969332277 1.0d0) -163)
+ (scale-float (float -5473251773502087 1.0d0) -217)
+ (scale-float (float -7881440168771584 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6626803892052636 1.0d0) -53)
+ (scale-float (float 6488245425345948 1.0d0) -108)
+ (scale-float (float 5562789575597814 1.0d0) -163)
+ (scale-float (float -5372015377078589 1.0d0) -219)
+ (scale-float (float -5982506051829760 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6648123752044148 1.0d0) -53)
+ (scale-float (float 5874398012701245 1.0d0) -107)
+ (scale-float (float -5803044584828416 1.0d0) -162)
+ (scale-float (float 8511751429212730 1.0d0) -216)
+ (scale-float (float 4946653239214080 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6669491944164440 1.0d0) -53)
+ (scale-float (float -5624312045436656 1.0d0) -107)
+ (scale-float (float -4597335009545018 1.0d0) -163)
+ (scale-float (float 7195474151359717 1.0d0) -217)
+ (scale-float (float 6666336165953536 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6690908733859309 1.0d0) -53)
+ (scale-float (float -7011846689449807 1.0d0) -107)
+ (scale-float (float -5677938497198289 1.0d0) -162)
+ (scale-float (float 4979679215188252 1.0d0) -217)
+ (scale-float (float 7683091793739776 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6712374388241798 1.0d0) -53)
+ (scale-float (float -8342396362532271 1.0d0) -107)
+ (scale-float (float -7301001365374014 1.0d0) -161)
+ (scale-float (float -5138139637484640 1.0d0) -217)
+ (scale-float (float 7682369785430016 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6733889176106223 1.0d0) -53)
+ (scale-float (float 7792381923708606 1.0d0) -107)
+ (scale-float (float 6471339874944355 1.0d0) -164)
+ (scale-float (float 4732005485759927 1.0d0) -218)
+ (scale-float (float -6808595479396352 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6755453367942346 1.0d0) -53)
+ (scale-float (float 6175721691710946 1.0d0) -107)
+ (scale-float (float -6028029605412425 1.0d0) -164)
+ (scale-float (float 5256969686420298 1.0d0) -218)
+ (scale-float (float 5669827437920256 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6777067235949678 1.0d0) -53)
+ (scale-float (float -5777998203458229 1.0d0) -107)
+ (scale-float (float 4999851299562179 1.0d0) -161)
+ (scale-float (float 6380879754393186 1.0d0) -215)
+ (scale-float (float -5055533398499328 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6798731054051930 1.0d0) -53)
+ (scale-float (float -4680524066525680 1.0d0) -108)
+ (scale-float (float -5997138621692692 1.0d0) -163)
+ (scale-float (float -6321265150334476 1.0d0) -219)
+ (scale-float (float 4561019590934528 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6820445097911609 1.0d0) -53)
+ (scale-float (float 6659686401322849 1.0d0) -111)
+ (scale-float (float -6847406476484904 1.0d0) -166)
+ (scale-float (float 4672175214956743 1.0d0) -221)
+ (scale-float (float -5961100301434880 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6842209644944752 1.0d0) -53)
+ (scale-float (float 4931936476281349 1.0d0) -107)
+ (scale-float (float 8462066848554214 1.0d0) -161)
+ (scale-float (float 6152040779958350 1.0d0) -215)
+ (scale-float (float 7058749701914624 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6864024974335812 1.0d0) -53)
+ (scale-float (float -8768233734947463 1.0d0) -107)
+ (scale-float (float 4813414018372889 1.0d0) -161)
+ (scale-float (float 8493023960937571 1.0d0) -215)
+ (scale-float (float -8753112707694592 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6885891367052685 1.0d0) -53)
+ (scale-float (float 7695998834519785 1.0d0) -108)
+ (scale-float (float -7175044461110627 1.0d0) -163)
+ (scale-float (float -5222084002130223 1.0d0) -217)
+ (scale-float (float 6140570121273344 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6907809105861900 1.0d0) -53)
+ (scale-float (float 6512205285460979 1.0d0) -109)
+ (scale-float (float -5454870314443376 1.0d0) -166)
+ (scale-float (float 7517832200208971 1.0d0) -221)
+ (scale-float (float 8907944229863424 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6929778475343944 1.0d0) -53)
+ (scale-float (float 6600166868286725 1.0d0) -107)
+ (scale-float (float -4744135650967495 1.0d0) -161)
+ (scale-float (float -5196563536802579 1.0d0) -215)
+ (scale-float (float 5429403813019648 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6951799761908754 1.0d0) -53)
+ (scale-float (float 7632484309790633 1.0d0) -107)
+ (scale-float (float 8009868778783074 1.0d0) -161)
+ (scale-float (float 6588230050688490 1.0d0) -216)
+ (scale-float (float 5508771572580352 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6973873253811357 1.0d0) -53)
+ (scale-float (float -6212033100287769 1.0d0) -107)
+ (scale-float (float 4970218338041347 1.0d0) -162)
+ (scale-float (float -8911420747191686 1.0d0) -217)
+ (scale-float (float 6302041361874944 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6995999241167666 1.0d0) -53)
+ (scale-float (float 6328236746153829 1.0d0) -107)
+ (scale-float (float -4832401190571815 1.0d0) -161)
+ (scale-float (float -4738178747624107 1.0d0) -215)
+ (scale-float (float -6331678518968320 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7018178015970445 1.0d0) -53)
+ (scale-float (float 8693325308644363 1.0d0) -107)
+ (scale-float (float -5905735549495128 1.0d0) -165)
+ (scale-float (float -5667499600006175 1.0d0) -221)
+ (scale-float (float -6198771774914560 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7040409872105421 1.0d0) -53)
+ (scale-float (float 4741064262231424 1.0d0) -107)
+ (scale-float (float 4691698288735137 1.0d0) -161)
+ (scale-float (float -7143159556540374 1.0d0) -215)
+ (scale-float (float -8185350168903680 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7062695105367567 1.0d0) -53)
+ (scale-float (float 7327174320052685 1.0d0) -107)
+ (scale-float (float -7553773536037985 1.0d0) -161)
+ (scale-float (float -5758114137250723 1.0d0) -215)
+ (scale-float (float -6849176083791872 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7085034013477550 1.0d0) -53)
+ (scale-float (float 6584036402783920 1.0d0) -112)
+ (scale-float (float -7406924919159347 1.0d0) -167)
+ (scale-float (float -7824106271153368 1.0d0) -222)
+ (scale-float (float 4732788412514304 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7107426896098340 1.0d0) -53)
+ (scale-float (float 5399014976600412 1.0d0) -110)
+ (scale-float (float 7298881050276739 1.0d0) -167)
+ (scale-float (float -6867429789884018 1.0d0) -222)
+ (scale-float (float 8264577527578624 1.0d0) -278))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7129874054851994 1.0d0) -53)
+ (scale-float (float 6614001005352835 1.0d0) -107)
+ (scale-float (float 7634940184247852 1.0d0) -161)
+ (scale-float (float -6831806495477589 1.0d0) -215)
+ (scale-float (float 8934680409948160 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7152375793336607 1.0d0) -53)
+ (scale-float (float 8364974981864600 1.0d0) -107)
+ (scale-float (float -6311686389648201 1.0d0) -164)
+ (scale-float (float -4637059313689644 1.0d0) -219)
+ (scale-float (float 7383780874518528 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7174932417143436 1.0d0) -53)
+ (scale-float (float -5796968535489143 1.0d0) -107)
+ (scale-float (float 4928181976158043 1.0d0) -161)
+ (scale-float (float 7955493171792892 1.0d0) -215)
+ (scale-float (float -6953110126395392 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7197544233874196 1.0d0) -53)
+ (scale-float (float 4748414102601974 1.0d0) -107)
+ (scale-float (float 8880927905236005 1.0d0) -164)
+ (scale-float (float 6109711501971867 1.0d0) -218)
+ (scale-float (float -8282289163468800 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7220211553158543 1.0d0) -53)
+ (scale-float (float 7900768273370478 1.0d0) -108)
+ (scale-float (float 6933824857669688 1.0d0) -164)
+ (scale-float (float 7254671536149485 1.0d0) -219)
+ (scale-float (float -8350994747490304 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7242934686671722 1.0d0) -53)
+ (scale-float (float 5309504171066984 1.0d0) -109)
+ (scale-float (float -5122988516431698 1.0d0) -163)
+ (scale-float (float 6584449924241886 1.0d0) -218)
+ (scale-float (float -8316101431918592 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7265713948152406 1.0d0) -53)
+ (scale-float (float -8033425307825410 1.0d0) -108)
+ (scale-float (float 8130448204387311 1.0d0) -162)
+ (scale-float (float 6426579576520950 1.0d0) -216)
+ (scale-float (float -4962505341419520 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7288549653420714 1.0d0) -53)
+ (scale-float (float -7989794718975489 1.0d0) -109)
+ (scale-float (float 6569932289376149 1.0d0) -166)
+ (scale-float (float -7841323471366964 1.0d0) -222)
+ (scale-float (float 4903201419558912 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7311442120396417 1.0d0) -53)
+ (scale-float (float 5068112771906245 1.0d0) -107)
+ (scale-float (float -4856399553212702 1.0d0) -165)
+ (scale-float (float -8934581780644956 1.0d0) -219)
+ (scale-float (float -7631078879264768 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7334391669117331 1.0d0) -53)
+ (scale-float (float -7157283853490985 1.0d0) -107)
+ (scale-float (float 6475867358585331 1.0d0) -162)
+ (scale-float (float -6804670913858790 1.0d0) -216)
+ (scale-float (float -6662910566744064 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7357398621757895 1.0d0) -53)
+ (scale-float (float -7541544127007012 1.0d0) -108)
+ (scale-float (float -6682403846365707 1.0d0) -163)
+ (scale-float (float 4916849880278154 1.0d0) -218)
+ (scale-float (float 7490114615771136 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7380463302647952 1.0d0) -53)
+ (scale-float (float -8740647607973436 1.0d0) -110)
+ (scale-float (float 5640111204189321 1.0d0) -164)
+ (scale-float (float -7575635623810851 1.0d0) -218)
+ (scale-float (float -7212361104228352 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7403586038291715 1.0d0) -53)
+ (scale-float (float -4716870367260494 1.0d0) -108)
+ (scale-float (float 8406026715833763 1.0d0) -163)
+ (scale-float (float 7200006117875989 1.0d0) -218)
+ (scale-float (float -6172363614846976 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7426767157386934 1.0d0) -53)
+ (scale-float (float -8097352767323886 1.0d0) -108)
+ (scale-float (float -4783784860828662 1.0d0) -165)
+ (scale-float (float -6360312361983177 1.0d0) -219)
+ (scale-float (float 6005358880358400 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7450006990844262 1.0d0) -53)
+ (scale-float (float 6594405845551003 1.0d0) -107)
+ (scale-float (float -5470945792167345 1.0d0) -161)
+ (scale-float (float 8519366929612250 1.0d0) -218)
+ (scale-float (float -4581567665405952 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7473305871806826 1.0d0) -53)
+ (scale-float (float -4797517457964302 1.0d0) -109)
+ (scale-float (float -7201383191262454 1.0d0) -165)
+ (scale-float (float -7821998491946557 1.0d0) -219)
+ (scale-float (float 4569120411484160 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7496664135669994 1.0d0) -53)
+ (scale-float (float -5942641208015133 1.0d0) -108)
+ (scale-float (float -5008120399258158 1.0d0) -163)
+ (scale-float (float 8190074749553979 1.0d0) -220)
+ (scale-float (float 8038018199846912 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7520082120101359 1.0d0) -53)
+ (scale-float (float -7157152977534339 1.0d0) -109)
+ (scale-float (float 8814246379462356 1.0d0) -163)
+ (scale-float (float 7243096029783026 1.0d0) -217)
+ (scale-float (float -8560744818573312 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7543560165060926 1.0d0) -53)
+ (scale-float (float 5588817402130513 1.0d0) -107)
+ (scale-float (float 8042708607155840 1.0d0) -166)
+ (scale-float (float 8396680967361966 1.0d0) -220)
+ (scale-float (float -4949718619652096 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7567098612821515 1.0d0) -53)
+ (scale-float (float -8495300079994658 1.0d0) -107)
+ (scale-float (float 8781061923485742 1.0d0) -163)
+ (scale-float (float -6400638668817874 1.0d0) -218)
+ (scale-float (float 7815631493332992 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7590697807989371 1.0d0) -53)
+ (scale-float (float -6096328714491285 1.0d0) -109)
+ (scale-float (float -5575907227705798 1.0d0) -165)
+ (scale-float (float 6422975798838036 1.0d0) -219)
+ (scale-float (float 5892148816248832 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7614358097525005 1.0d0) -53)
+ (scale-float (float -5916720685774714 1.0d0) -107)
+ (scale-float (float 8857104375212096 1.0d0) -162)
+ (scale-float (float 7008156325172581 1.0d0) -217)
+ (scale-float (float -5600520692531200 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7638079830764240 1.0d0) -53)
+ (scale-float (float -6818840990546812 1.0d0) -108)
+ (scale-float (float 8997729909247508 1.0d0) -162)
+ (scale-float (float -8741649368021309 1.0d0) -216)
+ (scale-float (float -6309344172376064 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7661863359439491 1.0d0) -53)
+ (scale-float (float -7546001022464851 1.0d0) -109)
+ (scale-float (float -6620724787361487 1.0d0) -163)
+ (scale-float (float 6980840709739750 1.0d0) -218)
+ (scale-float (float -5480493353271296 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7685709037701264 1.0d0) -53)
+ (scale-float (float 5486546145900664 1.0d0) -107)
+ (scale-float (float 6806373956490753 1.0d0) -163)
+ (scale-float (float -8849464367074310 1.0d0) -218)
+ (scale-float (float 4899098092830720 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7709617222139888 1.0d0) -53)
+ (scale-float (float -5461900952150440 1.0d0) -108)
+ (scale-float (float -5333472911075645 1.0d0) -162)
+ (scale-float (float -7655257973867897 1.0d0) -218)
+ (scale-float (float -7965697631518720 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7733588271807472 1.0d0) -53)
+ (scale-float (float -7630903581439654 1.0d0) -107)
+ (scale-float (float 5380155588858051 1.0d0) -161)
+ (scale-float (float -8931157972723682 1.0d0) -215)
+ (scale-float (float 6006098174410752 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7757622548240103 1.0d0) -53)
+ (scale-float (float -5848642006623040 1.0d0) -107)
+ (scale-float (float 8542048380056207 1.0d0) -163)
+ (scale-float (float 5163260520491771 1.0d0) -218)
+ (scale-float (float 6438106016645120 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7781720415480277 1.0d0) -53)
+ (scale-float (float 6984797329812719 1.0d0) -107)
+ (scale-float (float -7690177921321912 1.0d0) -162)
+ (scale-float (float -8265427123030351 1.0d0) -217)
+ (scale-float (float 6801395232309248 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7805882240099573 1.0d0) -53)
+ (scale-float (float -5265955349538985 1.0d0) -109)
+ (scale-float (float -8827899539121056 1.0d0) -163)
+ (scale-float (float -5255030146784910 1.0d0) -221)
+ (scale-float (float 6745819923349504 1.0d0) -278))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7830108391221562 1.0d0) -53)
+ (scale-float (float 7321798369818104 1.0d0) -107)
+ (scale-float (float -5450429932727538 1.0d0) -163)
+ (scale-float (float 8578678519609887 1.0d0) -217)
+ (scale-float (float -4530877669933056 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7854399240544976 1.0d0) -53)
+ (scale-float (float -5579012622279187 1.0d0) -108)
+ (scale-float (float -6604588012660813 1.0d0) -162)
+ (scale-float (float -8763707137316885 1.0d0) -216)
+ (scale-float (float 8439216653369344 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7878755162367110 1.0d0) -53)
+ (scale-float (float 6364082281490861 1.0d0) -107)
+ (scale-float (float 7258533968310424 1.0d0) -163)
+ (scale-float (float -6986912674548370 1.0d0) -218)
+ (scale-float (float -6749728530235392 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7903176533607493 1.0d0) -53)
+ (scale-float (float -6312354728140860 1.0d0) -107)
+ (scale-float (float -6079934402661587 1.0d0) -162)
+ (scale-float (float -7947116798882248 1.0d0) -217)
+ (scale-float (float -6494620577595392 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7927663733831797 1.0d0) -53)
+ (scale-float (float 7588583393310369 1.0d0) -109)
+ (scale-float (float 4926923406696488 1.0d0) -163)
+ (scale-float (float 5875513675435690 1.0d0) -217)
+ (scale-float (float 9005406160289792 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7952217145276023 1.0d0) -53)
+ (scale-float (float -7988214656229649 1.0d0) -107)
+ (scale-float (float 8916113688064027 1.0d0) -164)
+ (scale-float (float -8798182984014942 1.0d0) -218)
+ (scale-float (float -8813846793945088 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7976837152870931 1.0d0) -53)
+ (scale-float (float 6281130396178132 1.0d0) -108)
+ (scale-float (float 5053113788652460 1.0d0) -162)
+ (scale-float (float 7445307602683223 1.0d0) -216)
+ (scale-float (float -4587186110332928 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8001524144266753 1.0d0) -53)
+ (scale-float (float -4890942851380072 1.0d0) -107)
+ (scale-float (float -8333481270992366 1.0d0) -163)
+ (scale-float (float 8043846653364294 1.0d0) -219)
+ (scale-float (float -7604684706545664 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8026278509858158 1.0d0) -53)
+ (scale-float (float -6645063954389217 1.0d0) -107)
+ (scale-float (float -8440558770289832 1.0d0) -162)
+ (scale-float (float 4659797981112325 1.0d0) -217)
+ (scale-float (float 8042706631458816 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8051100642809502 1.0d0) -53)
+ (scale-float (float 6976671463024742 1.0d0) -108)
+ (scale-float (float -7183527759491300 1.0d0) -162)
+ (scale-float (float -8016415236006329 1.0d0) -216)
+ (scale-float (float -4743673581436928 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8075990939080350 1.0d0) -53)
+ (scale-float (float -7520953070864713 1.0d0) -107)
+ (scale-float (float 6068946773753275 1.0d0) -162)
+ (scale-float (float 5091248695561804 1.0d0) -220)
+ (scale-float (float 8899676903833600 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8100949797451270 1.0d0) -53)
+ (scale-float (float 5245004490337224 1.0d0) -112)
+ (scale-float (float -5253567047745086 1.0d0) -168)
+ (scale-float (float -7084483432379754 1.0d0) -222)
+ (scale-float (float 8178321552572416 1.0d0) -280))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8125977619549924 1.0d0) -53)
+ (scale-float (float -4658568559652424 1.0d0) -107)
+ (scale-float (float 6867398170675822 1.0d0) -161)
+ (scale-float (float -4541596059666313 1.0d0) -217)
+ (scale-float (float 7482041640452096 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8151074809877431 1.0d0) -53)
+ (scale-float (float -7610217818445776 1.0d0) -107)
+ (scale-float (float -6095647772218825 1.0d0) -162)
+ (scale-float (float 6865193923761303 1.0d0) -217)
+ (scale-float (float -6428783669149696 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8176241775835029 1.0d0) -53)
+ (scale-float (float 8560232790989323 1.0d0) -107)
+ (scale-float (float 7359621998241362 1.0d0) -164)
+ (scale-float (float 4801148992851907 1.0d0) -220)
+ (scale-float (float -6305213134667776 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8201478927751032 1.0d0) -53)
+ (scale-float (float 6102070198424190 1.0d0) -109)
+ (scale-float (float -6060221899305443 1.0d0) -165)
+ (scale-float (float 5259164461600536 1.0d0) -220)
+ (scale-float (float -6422931809501184 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8226786678908074 1.0d0) -53)
+ (scale-float (float -5851326319355656 1.0d0) -112)
+ (scale-float (float -8283369726632874 1.0d0) -167)
+ (scale-float (float 8878868809856389 1.0d0) -221)
+ (scale-float (float -6175866932428800 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8252165445570668 1.0d0) -53)
+ (scale-float (float -8718823515764037 1.0d0) -107)
+ (scale-float (float 8805256989172961 1.0d0) -161)
+ (scale-float (float -4738010113354872 1.0d0) -216)
+ (scale-float (float 5848447494586368 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8277615647013060 1.0d0) -53)
+ (scale-float (float 6459501802289401 1.0d0) -111)
+ (scale-float (float 7072708753498208 1.0d0) -166)
+ (scale-float (float -7718190893329992 1.0d0) -220)
+ (scale-float (float 8595188360675328 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8303137705547402 1.0d0) -53)
+ (scale-float (float -6228211833521035 1.0d0) -107)
+ (scale-float (float -5581617560287088 1.0d0) -163)
+ (scale-float (float 5012062299178787 1.0d0) -217)
+ (scale-float (float -7407036704292864 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8328732046552227 1.0d0) -53)
+ (scale-float (float -7409103056721529 1.0d0) -107)
+ (scale-float (float -6903063365050583 1.0d0) -161)
+ (scale-float (float 7134063934511133 1.0d0) -218)
+ (scale-float (float 5447755729731584 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8354399098501252 1.0d0) -53)
+ (scale-float (float -4710105360622104 1.0d0) -108)
+ (scale-float (float 8343481108478018 1.0d0) -163)
+ (scale-float (float 8956405625835619 1.0d0) -219)
+ (scale-float (float -8999478092365824 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8380139292992498 1.0d0) -53)
+ (scale-float (float -4508117588148750 1.0d0) -111)
+ (scale-float (float -8824987011862181 1.0d0) -166)
+ (scale-float (float 4965477254719000 1.0d0) -220)
+ (scale-float (float 6748132458364928 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8405953064777735 1.0d0) -53)
+ (scale-float (float 7345932721507363 1.0d0) -107)
+ (scale-float (float -8171020395378729 1.0d0) -161)
+ (scale-float (float -5564945044042364 1.0d0) -215)
+ (scale-float (float -5705962937040896 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8431840851792261 1.0d0) -53)
+ (scale-float (float 6883770841136624 1.0d0) -107)
+ (scale-float (float -8142688000849865 1.0d0) -161)
+ (scale-float (float 8633529322438489 1.0d0) -216)
+ (scale-float (float -8961867390943232 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8457803095185011 1.0d0) -53)
+ (scale-float (float 5233457175812493 1.0d0) -107)
+ (scale-float (float 4808487125521499 1.0d0) -163)
+ (scale-float (float -7882489688196387 1.0d0) -217)
+ (scale-float (float -8453015639654400 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8483840239349009 1.0d0) -53)
+ (scale-float (float 7886368790362451 1.0d0) -111)
+ (scale-float (float -8517838315688775 1.0d0) -165)
+ (scale-float (float 7900303080111426 1.0d0) -221)
+ (scale-float (float -7147524854906880 1.0d0) -281))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8509952731952161 1.0d0) -53)
+ (scale-float (float -5570993980771626 1.0d0) -108)
+ (scale-float (float -8842355259453782 1.0d0) -165)
+ (scale-float (float -8397010105898517 1.0d0) -219)
+ (scale-float (float 5995398816071680 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8536141023968397 1.0d0) -53)
+ (scale-float (float 8057665154952155 1.0d0) -108)
+ (scale-float (float -6157142822959682 1.0d0) -163)
+ (scale-float (float -7068505284834252 1.0d0) -218)
+ (scale-float (float -6751843311288320 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8562405569709167 1.0d0) -53)
+ (scale-float (float 6673028388163185 1.0d0) -107)
+ (scale-float (float -8610349431143555 1.0d0) -161)
+ (scale-float (float -8705397019758406 1.0d0) -216)
+ (scale-float (float -6030688589512704 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8588746826855291 1.0d0) -53)
+ (scale-float (float 6364108654741911 1.0d0) -110)
+ (scale-float (float 5892471695622050 1.0d0) -164)
+ (scale-float (float -7102881658973179 1.0d0) -218)
+ (scale-float (float 8920282408419328 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8615165256489172 1.0d0) -53)
+ (scale-float (float 8060470171979680 1.0d0) -107)
+ (scale-float (float -4619617987590102 1.0d0) -163)
+ (scale-float (float 8287007451997053 1.0d0) -217)
+ (scale-float (float 8724765436674048 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8641661323127381 1.0d0) -53)
+ (scale-float (float 6066517437068684 1.0d0) -111)
+ (scale-float (float 5250467349509403 1.0d0) -167)
+ (scale-float (float 6685473055229670 1.0d0) -221)
+ (scale-float (float -4836810138583040 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8668235494753604 1.0d0) -53)
+ (scale-float (float 5557070272544918 1.0d0) -110)
+ (scale-float (float -4947414467654574 1.0d0) -164)
+ (scale-float (float -7520894809676669 1.0d0) -219)
+ (scale-float (float -6407757146095616 1.0d0) -278))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8694888242851976 1.0d0) -53)
+ (scale-float (float -6540407861882371 1.0d0) -111)
+ (scale-float (float -5815361697203401 1.0d0) -166)
+ (scale-float (float -8439034091791918 1.0d0) -220)
+ (scale-float (float -5819800893784064 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8721620042440790 1.0d0) -53)
+ (scale-float (float -5095223744578196 1.0d0) -107)
+ (scale-float (float -5228059708250487 1.0d0) -163)
+ (scale-float (float -8385980199329285 1.0d0) -217)
+ (scale-float (float 8099938663071744 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8748431372106595 1.0d0) -53)
+ (scale-float (float -5468977090421742 1.0d0) -107)
+ (scale-float (float 4648065984177666 1.0d0) -161)
+ (scale-float (float 4887496669042302 1.0d0) -216)
+ (scale-float (float -5741049437995008 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8775322714038687 1.0d0) -53)
+ (scale-float (float 8386279959528226 1.0d0) -108)
+ (scale-float (float -4855805776680614 1.0d0) -162)
+ (scale-float (float 8230707796848990 1.0d0) -216)
+ (scale-float (float -4866433439760384 1.0d0) -279))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8802294554063998 1.0d0) -53)
+ (scale-float (float 5359540294548577 1.0d0) -107)
+ (scale-float (float 7917158757864538 1.0d0) -161)
+ (scale-float (float -8485973020235656 1.0d0) -215)
+ (scale-float (float 7306586827284480 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8829347381682384 1.0d0) -53)
+ (scale-float (float 8120007671276584 1.0d0) -109)
+ (scale-float (float 6438487506681473 1.0d0) -164)
+ (scale-float (float 8501675737329949 1.0d0) -219)
+ (scale-float (float 7489948646899712 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8856481690102325 1.0d0) -53)
+ (scale-float (float 6887036250058757 1.0d0) -111)
+ (scale-float (float 7354119490276761 1.0d0) -165)
+ (scale-float (float 6366038464632081 1.0d0) -219)
+ (scale-float (float 8383393752940544 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8883697976277038 1.0d0) -53)
+ (scale-float (float 6700939389556605 1.0d0) -108)
+ (scale-float (float -5972484495771231 1.0d0) -163)
+ (scale-float (float 8627378264628643 1.0d0) -217)
+ (scale-float (float 4891841076789248 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8910996740941010 1.0d0) -53)
+ (scale-float (float -5680864098302667 1.0d0) -107)
+ (scale-float (float 6055705265869279 1.0d0) -164)
+ (scale-float (float -8661517336363967 1.0d0) -218)
+ (scale-float (float 7316445130457088 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8938378488646952 1.0d0) -53)
+ (scale-float (float -7049498443229161 1.0d0) -108)
+ (scale-float (float -8328283461480476 1.0d0) -164)
+ (scale-float (float 4619430383801108 1.0d0) -218)
+ (scale-float (float 4620567185457152 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8965843727803191 1.0d0) -53)
+ (scale-float (float 8721417660928667 1.0d0) -108)
+ (scale-float (float 5682018208833727 1.0d0) -162)
+ (scale-float (float 6999700715867513 1.0d0) -216)
+ (scale-float (float -7822677952987136 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8993392970711494 1.0d0) -53)
+ (scale-float (float 5653460995961166 1.0d0) -108)
+ (scale-float (float 5928713244473703 1.0d0) -165)
+ (scale-float (float -8587456646495567 1.0d0) -222)
+ (scale-float (float 4923439894757376 1.0d0) -281))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4510513366802667 1.0d0) -52)
+ (scale-float (float 5373872988342920 1.0d0) -110)
+ (scale-float (float -8606500254519528 1.0d0) -165)
+ (scale-float (float -6855951617059037 1.0d0) -223)
+ (scale-float (float 7929633697693696 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4524372768344304 1.0d0) -52)
+ (scale-float (float 8317904890851914 1.0d0) -107)
+ (scale-float (float 8594750619195149 1.0d0) -166)
+ (scale-float (float -7306789725115964 1.0d0) -220)
+ (scale-float (float -8574773586034688 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4538274952087405 1.0d0) -52)
+ (scale-float (float 8326257921126996 1.0d0) -106)
+ (scale-float (float -6022210771707739 1.0d0) -162)
+ (scale-float (float -4520561563519313 1.0d0) -216)
+ (scale-float (float 7859974008373248 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4552220182163332 1.0d0) -52)
+ (scale-float (float -7688418407588221 1.0d0) -113)
+ (scale-float (float 6056179036562030 1.0d0) -167)
+ (scale-float (float 4940221467301023 1.0d0) -222)
+ (scale-float (float -4749127669776384 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4566208724748110 1.0d0) -52)
+ (scale-float (float 6076277320393968 1.0d0) -108)
+ (scale-float (float 7876705740801642 1.0d0) -162)
+ (scale-float (float -6201281096292325 1.0d0) -218)
+ (scale-float (float 6268449461895168 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4580240848082718 1.0d0) -52)
+ (scale-float (float 8179344656213134 1.0d0) -106)
+ (scale-float (float 8263941875504708 1.0d0) -160)
+ (scale-float (float -4889725374845191 1.0d0) -214)
+ (scale-float (float -8473860704370688 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4594316822493616 1.0d0) -52)
+ (scale-float (float 7021650685021080 1.0d0) -107)
+ (scale-float (float 5593581328329166 1.0d0) -161)
+ (scale-float (float -4904011921719053 1.0d0) -217)
+ (scale-float (float -5241820563505152 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4608436920413514 1.0d0) -52)
+ (scale-float (float 6181796558444830 1.0d0) -106)
+ (scale-float (float 7403778107152819 1.0d0) -160)
+ (scale-float (float -8414786340930895 1.0d0) -215)
+ (scale-float (float -5307068381282304 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4622601416402395 1.0d0) -52)
+ (scale-float (float -7834869622036172 1.0d0) -106)
+ (scale-float (float -7307397629585693 1.0d0) -163)
+ (scale-float (float -6569063674381729 1.0d0) -217)
+ (scale-float (float 6809893652660224 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4636810587168778 1.0d0) -52)
+ (scale-float (float 6830096924257010 1.0d0) -106)
+ (scale-float (float -5427308353430949 1.0d0) -161)
+ (scale-float (float -7802984689345102 1.0d0) -215)
+ (scale-float (float -8927666695487488 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4651064711591250 1.0d0) -52)
+ (scale-float (float 7512911659394497 1.0d0) -106)
+ (scale-float (float -7385896910854919 1.0d0) -160)
+ (scale-float (float 8925595323455295 1.0d0) -215)
+ (scale-float (float -6393790348148736 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4665364070740239 1.0d0) -52)
+ (scale-float (float 5007334232109639 1.0d0) -106)
+ (scale-float (float -8840477727548287 1.0d0) -161)
+ (scale-float (float 4629730203101687 1.0d0) -215)
+ (scale-float (float 5853079094755328 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4679708947900060 1.0d0) -52)
+ (scale-float (float -7421817048839393 1.0d0) -106)
+ (scale-float (float 8881478316442419 1.0d0) -160)
+ (scale-float (float -7295139224947122 1.0d0) -219)
+ (scale-float (float 5839318421602304 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4694099628591219 1.0d0) -52)
+ (scale-float (float -4714668244017924 1.0d0) -108)
+ (scale-float (float -7160785211617394 1.0d0) -163)
+ (scale-float (float -7124080371647673 1.0d0) -218)
+ (scale-float (float 5944547016572928 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4708536400592993 1.0d0) -52)
+ (scale-float (float 7281476218263343 1.0d0) -106)
+ (scale-float (float -7567298247391942 1.0d0) -163)
+ (scale-float (float 8192080464660650 1.0d0) -219)
+ (scale-float (float 5875747071721472 1.0d0) -278))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4723019553966276 1.0d0) -52)
+ (scale-float (float -8775791375353805 1.0d0) -106)
+ (scale-float (float 7583102150147494 1.0d0) -160)
+ (scale-float (float 8815003366817974 1.0d0) -216)
+ (scale-float (float 7267072469368832 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4737549381076698 1.0d0) -52)
+ (scale-float (float 6816018358827065 1.0d0) -106)
+ (scale-float (float 6569463977966645 1.0d0) -161)
+ (scale-float (float -4595288463441023 1.0d0) -215)
+ (scale-float (float 6818627725983744 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4752126176618040 1.0d0) -52)
+ (scale-float (float 6857704915056138 1.0d0) -109)
+ (scale-float (float -5972272852499703 1.0d0) -168)
+ (scale-float (float -4918156448418907 1.0d0) -222)
+ (scale-float (float -8552616313225216 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4766750237635912 1.0d0) -52)
+ (scale-float (float -6708499437719188 1.0d0) -109)
+ (scale-float (float 5404138731523196 1.0d0) -165)
+ (scale-float (float 7150130184829864 1.0d0) -219)
+ (scale-float (float 8731047611072512 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4781421863551736 1.0d0) -52)
+ (scale-float (float -8241281382353791 1.0d0) -106)
+ (scale-float (float -5452977649518454 1.0d0) -160)
+ (scale-float (float -5311098437373721 1.0d0) -215)
+ (scale-float (float -6851081815506944 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4796141356187011 1.0d0) -52)
+ (scale-float (float 6438705586616948 1.0d0) -107)
+ (scale-float (float -8740596883780232 1.0d0) -163)
+ (scale-float (float 4668321052107958 1.0d0) -217)
+ (scale-float (float 8956197122080768 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4810909019787883 1.0d0) -52)
+ (scale-float (float 8939827386391622 1.0d0) -106)
+ (scale-float (float -4927081605746216 1.0d0) -160)
+ (scale-float (float -5796206272465988 1.0d0) -217)
+ (scale-float (float 7410701441171456 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4825725161050007 1.0d0) -52)
+ (scale-float (float 7978699904595670 1.0d0) -106)
+ (scale-float (float 5043056517264442 1.0d0) -166)
+ (scale-float (float 5944486897923303 1.0d0) -220)
+ (scale-float (float 8648547797827584 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4840590089143719 1.0d0) -52)
+ (scale-float (float 5835026127202296 1.0d0) -106)
+ (scale-float (float -6090775331742930 1.0d0) -160)
+ (scale-float (float 5434019500109520 1.0d0) -214)
+ (scale-float (float -7511032646074368 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4855504115739517 1.0d0) -52)
+ (scale-float (float 8219229379643238 1.0d0) -107)
+ (scale-float (float -8280528309578644 1.0d0) -165)
+ (scale-float (float 6955752537067324 1.0d0) -224)
+ (scale-float (float 6973762423488512 1.0d0) -282))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4870467555033855 1.0d0) -52)
+ (scale-float (float 5215081086506637 1.0d0) -106)
+ (scale-float (float -8754660302215727 1.0d0) -160)
+ (scale-float (float -8665700668756015 1.0d0) -215)
+ (scale-float (float 5221191974584320 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4885480723775256 1.0d0) -52)
+ (scale-float (float 5593621396445884 1.0d0) -106)
+ (scale-float (float 7000918906137663 1.0d0) -161)
+ (scale-float (float 8021672180640724 1.0d0) -215)
+ (scale-float (float -6007330252292096 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4900543941290747 1.0d0) -52)
+ (scale-float (float 6290919489352317 1.0d0) -106)
+ (scale-float (float 6334905453979755 1.0d0) -160)
+ (scale-float (float 6944550348266955 1.0d0) -215)
+ (scale-float (float -6469421670465536 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4915657529512623 1.0d0) -52)
+ (scale-float (float -7613066849359035 1.0d0) -109)
+ (scale-float (float -5136397204029515 1.0d0) -164)
+ (scale-float (float 5560007453778495 1.0d0) -219)
+ (scale-float (float -5153490908741632 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4930821813005541 1.0d0) -52)
+ (scale-float (float -8881793026676418 1.0d0) -107)
+ (scale-float (float 5504735906988997 1.0d0) -161)
+ (scale-float (float 6777093210908856 1.0d0) -215)
+ (scale-float (float 6411579100626944 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4946037118993954 1.0d0) -52)
+ (scale-float (float 6826859455969554 1.0d0) -106)
+ (scale-float (float -6968865100220813 1.0d0) -161)
+ (scale-float (float 5447120854281151 1.0d0) -215)
+ (scale-float (float -8912054969221120 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4961303777389888 1.0d0) -52)
+ (scale-float (float 7117061828607587 1.0d0) -106)
+ (scale-float (float -5086957522406139 1.0d0) -163)
+ (scale-float (float 6059636259898474 1.0d0) -217)
+ (scale-float (float -8743060072562688 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4976622120821060 1.0d0) -52)
+ (scale-float (float 8538597454922991 1.0d0) -106)
+ (scale-float (float -8991967489309672 1.0d0) -160)
+ (scale-float (float 8783978521154163 1.0d0) -215)
+ (scale-float (float -8760871855390720 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4991992484659356 1.0d0) -52)
+ (scale-float (float -9006119685025844 1.0d0) -107)
+ (scale-float (float 4723688273641999 1.0d0) -163)
+ (scale-float (float -6541017641516469 1.0d0) -218)
+ (scale-float (float 7075834761838592 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5007415207049659 1.0d0) -52)
+ (scale-float (float -7790026231594742 1.0d0) -106)
+ (scale-float (float -5881571118215087 1.0d0) -160)
+ (scale-float (float 4704498823319804 1.0d0) -216)
+ (scale-float (float 7579919313305600 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5022890628939047 1.0d0) -52)
+ (scale-float (float -4784194655338363 1.0d0) -107)
+ (scale-float (float -6722340729519126 1.0d0) -161)
+ (scale-float (float 8864327283596236 1.0d0) -215)
+ (scale-float (float 7305967402942464 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5038419094106355 1.0d0) -52)
+ (scale-float (float -8095413947525302 1.0d0) -106)
+ (scale-float (float 5973898770254795 1.0d0) -161)
+ (scale-float (float -8175371115065459 1.0d0) -215)
+ (scale-float (float -6448894573412352 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5054000949192107 1.0d0) -52)
+ (scale-float (float 4576622003551932 1.0d0) -106)
+ (scale-float (float -6280920038839795 1.0d0) -163)
+ (scale-float (float -5964351723445421 1.0d0) -217)
+ (scale-float (float -8789617640800256 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5069636543728837 1.0d0) -52)
+ (scale-float (float 7615405559326406 1.0d0) -109)
+ (scale-float (float 8915089175933485 1.0d0) -163)
+ (scale-float (float -6845584439143439 1.0d0) -218)
+ (scale-float (float 6881245024223232 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5085326230171782 1.0d0) -52)
+ (scale-float (float -5188030278619813 1.0d0) -106)
+ (scale-float (float -7670667270949476 1.0d0) -160)
+ (scale-float (float 5927839957767808 1.0d0) -214)
+ (scale-float (float 5047352890245120 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5101070363929974 1.0d0) -52)
+ (scale-float (float 6989089148026713 1.0d0) -107)
+ (scale-float (float -7049420810638702 1.0d0) -161)
+ (scale-float (float 8297412754210179 1.0d0) -216)
+ (scale-float (float 5867720828157952 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5116869303397728 1.0d0) -52)
+ (scale-float (float 8329812992574599 1.0d0) -107)
+ (scale-float (float 6377283168321324 1.0d0) -161)
+ (scale-float (float 7984586113876115 1.0d0) -215)
+ (scale-float (float 5181206205054976 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5132723409986526 1.0d0) -52)
+ (scale-float (float -4674864813782685 1.0d0) -107)
+ (scale-float (float -7077980832873344 1.0d0) -161)
+ (scale-float (float 5844928677959085 1.0d0) -215)
+ (scale-float (float -6429472025395200 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5148633048157313 1.0d0) -52)
+ (scale-float (float -5284173815860955 1.0d0) -112)
+ (scale-float (float -6020281412596533 1.0d0) -166)
+ (scale-float (float -6243343542943099 1.0d0) -221)
+ (scale-float (float -6774776310792192 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5164598585453209 1.0d0) -52)
+ (scale-float (float -8371268565646575 1.0d0) -109)
+ (scale-float (float -5928699848938293 1.0d0) -166)
+ (scale-float (float -5577546956928573 1.0d0) -220)
+ (scale-float (float -5557818044186624 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5180620392532636 1.0d0) -52)
+ (scale-float (float 7458540146606520 1.0d0) -106)
+ (scale-float (float -5065483521296945 1.0d0) -165)
+ (scale-float (float -6619629262341034 1.0d0) -219)
+ (scale-float (float -4634909328539648 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5196698843202878 1.0d0) -52)
+ (scale-float (float 8738885124257553 1.0d0) -110)
+ (scale-float (float 7338651146732341 1.0d0) -165)
+ (scale-float (float -6809790515043482 1.0d0) -221)
+ (scale-float (float 8512275809828864 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5212834314454066 1.0d0) -52)
+ (scale-float (float -5290152464726882 1.0d0) -108)
+ (scale-float (float 4644401085980292 1.0d0) -164)
+ (scale-float (float -6250563093646647 1.0d0) -220)
+ (scale-float (float 7049956235935744 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5229027186493611 1.0d0) -52)
+ (scale-float (float -5954443973126675 1.0d0) -109)
+ (scale-float (float -6822110243961435 1.0d0) -163)
+ (scale-float (float -8110606359604683 1.0d0) -218)
+ (scale-float (float -4629257773907968 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5245277842781078 1.0d0) -52)
+ (scale-float (float 5767491684932488 1.0d0) -107)
+ (scale-float (float -7737754426130316 1.0d0) -162)
+ (scale-float (float 7499508915059979 1.0d0) -219)
+ (scale-float (float 5221957255036928 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5261586670063515 1.0d0) -52)
+ (scale-float (float 8092088342324354 1.0d0) -107)
+ (scale-float (float -8078867331127163 1.0d0) -161)
+ (scale-float (float -8005642369698191 1.0d0) -215)
+ (scale-float (float 8929082156384256 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5277954058411241 1.0d0) -52)
+ (scale-float (float -7036199311826221 1.0d0) -108)
+ (scale-float (float 7117690108558109 1.0d0) -162)
+ (scale-float (float 6207200172835691 1.0d0) -216)
+ (scale-float (float -7277808465117184 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5294380401254100 1.0d0) -52)
+ (scale-float (float 5706029853483685 1.0d0) -106)
+ (scale-float (float -5815604514362005 1.0d0) -160)
+ (scale-float (float 8521653366576726 1.0d0) -214)
+ (scale-float (float 6786336136888320 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5310866095418194 1.0d0) -52)
+ (scale-float (float 5994935175650606 1.0d0) -106)
+ (scale-float (float 7126614214549771 1.0d0) -160)
+ (scale-float (float 5474583295283949 1.0d0) -214)
+ (scale-float (float 5441015082524672 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5327411541163090 1.0d0) -52)
+ (scale-float (float 8339335851452668 1.0d0) -107)
+ (scale-float (float -8505483720564920 1.0d0) -161)
+ (scale-float (float -7197230750372089 1.0d0) -215)
+ (scale-float (float -4656659777912832 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5344017142219521 1.0d0) -52)
+ (scale-float (float 5208858328734713 1.0d0) -108)
+ (scale-float (float 8137524158548272 1.0d0) -162)
+ (scale-float (float -7253520036064748 1.0d0) -217)
+ (scale-float (float 8684576010665984 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5360683305827581 1.0d0) -52)
+ (scale-float (float 4602936313837160 1.0d0) -106)
+ (scale-float (float 6415285630475648 1.0d0) -160)
+ (scale-float (float 5562752314641467 1.0d0) -214)
+ (scale-float (float -5267158257303552 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5377410442775426 1.0d0) -52)
+ (scale-float (float -5192042960740330 1.0d0) -108)
+ (scale-float (float 5166126632519932 1.0d0) -163)
+ (scale-float (float 6927823736692903 1.0d0) -222)
+ (scale-float (float 5782847046549504 1.0d0) -286))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5394198967438482 1.0d0) -52)
+ (scale-float (float 6315956000158604 1.0d0) -111)
+ (scale-float (float 5966144786559365 1.0d0) -165)
+ (scale-float (float -8203894255240486 1.0d0) -219)
+ (scale-float (float 8004101172363264 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5411049297819179 1.0d0) -52)
+ (scale-float (float -8397424058330032 1.0d0) -107)
+ (scale-float (float -8159858214369219 1.0d0) -162)
+ (scale-float (float -7909686408741444 1.0d0) -216)
+ (scale-float (float 5263630784266240 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5427961855587206 1.0d0) -52)
+ (scale-float (float -5690707459234180 1.0d0) -109)
+ (scale-float (float 6835025015348311 1.0d0) -163)
+ (scale-float (float 7942519163738825 1.0d0) -218)
+ (scale-float (float -4953815436623872 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5444937066120308 1.0d0) -52)
+ (scale-float (float -6691027865349732 1.0d0) -107)
+ (scale-float (float -6409317624735656 1.0d0) -161)
+ (scale-float (float 8374494464257080 1.0d0) -218)
+ (scale-float (float -5531596394856448 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5461975358545621 1.0d0) -52)
+ (scale-float (float 7500961901156157 1.0d0) -108)
+ (scale-float (float -4636008327268895 1.0d0) -165)
+ (scale-float (float -8555632135998677 1.0d0) -219)
+ (scale-float (float -8208324901208064 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5479077165781566 1.0d0) -52)
+ (scale-float (float -8035194041030797 1.0d0) -108)
+ (scale-float (float -5962231852151354 1.0d0) -165)
+ (scale-float (float 7929597504189371 1.0d0) -222)
+ (scale-float (float 5827583677562880 1.0d0) -278))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5496242924580298 1.0d0) -52)
+ (scale-float (float -8678215523185610 1.0d0) -106)
+ (scale-float (float 6949749475682773 1.0d0) -161)
+ (scale-float (float -5441816062852521 1.0d0) -218)
+ (scale-float (float 7849732370595840 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5513473075570729 1.0d0) -52)
+ (scale-float (float -4914577453872905 1.0d0) -106)
+ (scale-float (float 5287889611523812 1.0d0) -162)
+ (scale-float (float -8682246605406829 1.0d0) -218)
+ (scale-float (float -4623466191519744 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5530768063302131 1.0d0) -52)
+ (scale-float (float -8540850324370053 1.0d0) -107)
+ (scale-float (float 5352058853624586 1.0d0) -163)
+ (scale-float (float -5899803125205499 1.0d0) -219)
+ (scale-float (float -6102539598036992 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5548128336288323 1.0d0) -52)
+ (scale-float (float -5790201446462966 1.0d0) -106)
+ (scale-float (float 5014731876302398 1.0d0) -164)
+ (scale-float (float 8044648793444329 1.0d0) -219)
+ (scale-float (float 6502522436976640 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5565554347052458 1.0d0) -52)
+ (scale-float (float 4990106669279342 1.0d0) -108)
+ (scale-float (float 4609278271169318 1.0d0) -162)
+ (scale-float (float 5494028895009767 1.0d0) -217)
+ (scale-float (float 5497404612018176 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5583046552172419 1.0d0) -52)
+ (scale-float (float -5279252507732072 1.0d0) -106)
+ (scale-float (float 7505024773670359 1.0d0) -160)
+ (scale-float (float -5476728672433502 1.0d0) -214)
+ (scale-float (float -6396501575327744 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5600605412326825 1.0d0) -52)
+ (scale-float (float -5457624583692494 1.0d0) -106)
+ (scale-float (float 6336563765071964 1.0d0) -160)
+ (scale-float (float 5213718407137512 1.0d0) -214)
+ (scale-float (float 7165577912451072 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5618231392341671 1.0d0) -52)
+ (scale-float (float -6412950612034594 1.0d0) -109)
+ (scale-float (float 6364069957984329 1.0d0) -166)
+ (scale-float (float -5737836969701466 1.0d0) -221)
+ (scale-float (float -7861948491235328 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5635924961237600 1.0d0) -52)
+ (scale-float (float -4719518540539413 1.0d0) -110)
+ (scale-float (float -5059147957561951 1.0d0) -164)
+ (scale-float (float 5316979180165650 1.0d0) -218)
+ (scale-float (float -4673256824897536 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5653686592277821 1.0d0) -52)
+ (scale-float (float 7172255247592050 1.0d0) -108)
+ (scale-float (float -7359911268552394 1.0d0) -162)
+ (scale-float (float -7053345504866867 1.0d0) -218)
+ (scale-float (float 7758518823157760 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5671516763016686 1.0d0) -52)
+ (scale-float (float 8487374385387579 1.0d0) -106)
+ (scale-float (float 5873942733899488 1.0d0) -163)
+ (scale-float (float 8805059241745009 1.0d0) -218)
+ (scale-float (float 5927199432507392 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5689415955348934 1.0d0) -52)
+ (scale-float (float 8738024021307785 1.0d0) -106)
+ (scale-float (float 7510259923252762 1.0d0) -160)
+ (scale-float (float 5520099911876322 1.0d0) -214)
+ (scale-float (float -7309762608463872 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5707384655559611 1.0d0) -52)
+ (scale-float (float 6459916791599166 1.0d0) -107)
+ (scale-float (float 6223860923451742 1.0d0) -161)
+ (scale-float (float -8716185646546994 1.0d0) -215)
+ (scale-float (float -7732385065992192 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5725423354374681 1.0d0) -52)
+ (scale-float (float -6029530846362609 1.0d0) -106)
+ (scale-float (float -4625752521263551 1.0d0) -160)
+ (scale-float (float 6098689829632159 1.0d0) -215)
+ (scale-float (float 5847830143434752 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5743532547012336 1.0d0) -52)
+ (scale-float (float -6013779054881446 1.0d0) -106)
+ (scale-float (float 7122622630003096 1.0d0) -161)
+ (scale-float (float 5669642311466823 1.0d0) -216)
+ (scale-float (float 7404549888016384 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5761712733235020 1.0d0) -52)
+ (scale-float (float -8931581765904744 1.0d0) -106)
+ (scale-float (float -5013853585609784 1.0d0) -160)
+ (scale-float (float -7143313514817958 1.0d0) -214)
+ (scale-float (float 7255070610489344 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5779964417402171 1.0d0) -52)
+ (scale-float (float 5791804225797192 1.0d0) -108)
+ (scale-float (float 6708084643792698 1.0d0) -162)
+ (scale-float (float -8753804200262557 1.0d0) -220)
+ (scale-float (float 4750231165992960 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5798288108523705 1.0d0) -52)
+ (scale-float (float -7141603768493522 1.0d0) -106)
+ (scale-float (float 5205999419054766 1.0d0) -161)
+ (scale-float (float -8592293713979073 1.0d0) -216)
+ (scale-float (float 5481657350750208 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5816684320314236 1.0d0) -52)
+ (scale-float (float 6573462437317069 1.0d0) -109)
+ (scale-float (float 4792592445373436 1.0d0) -164)
+ (scale-float (float -7631628124441599 1.0d0) -218)
+ (scale-float (float -5681490784419840 1.0d0) -282))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5835153571248069 1.0d0) -52)
+ (scale-float (float -8600069340415753 1.0d0) -106)
+ (scale-float (float -6934992260155357 1.0d0) -161)
+ (scale-float (float -7284932739931237 1.0d0) -215)
+ (scale-float (float 7921473233092608 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5853696384614949 1.0d0) -52)
+ (scale-float (float 8753985821878505 1.0d0) -110)
+ (scale-float (float 7588763546987094 1.0d0) -166)
+ (scale-float (float -4822814022461911 1.0d0) -220)
+ (scale-float (float -5098205003907072 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5872313288576609 1.0d0) -52)
+ (scale-float (float 7059581222146147 1.0d0) -107)
+ (scale-float (float 6495908225136828 1.0d0) -163)
+ (scale-float (float -4800808499275605 1.0d0) -217)
+ (scale-float (float 5131309679050752 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5891004816224103 1.0d0) -52)
+ (scale-float (float -8041490862869318 1.0d0) -109)
+ (scale-float (float 4584573142867331 1.0d0) -164)
+ (scale-float (float -6014319477349891 1.0d0) -219)
+ (scale-float (float 6630773803974656 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5909771505635954 1.0d0) -52)
+ (scale-float (float 8016272326855618 1.0d0) -107)
+ (scale-float (float -5373590184064874 1.0d0) -162)
+ (scale-float (float 7109789654252430 1.0d0) -217)
+ (scale-float (float -4771493424529408 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5928613899937128 1.0d0) -52)
+ (scale-float (float 6267816781867526 1.0d0) -107)
+ (scale-float (float -8630517228603178 1.0d0) -162)
+ (scale-float (float 8851222611199826 1.0d0) -217)
+ (scale-float (float 6589868740182016 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5947532547358839 1.0d0) -52)
+ (scale-float (float 7277517922925136 1.0d0) -106)
+ (scale-float (float 6346112563729487 1.0d0) -161)
+ (scale-float (float -8741185442950528 1.0d0) -218)
+ (scale-float (float 6969978271039488 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5966528001299211 1.0d0) -52)
+ (scale-float (float 8757183460747464 1.0d0) -107)
+ (scale-float (float -8410599300272382 1.0d0) -164)
+ (scale-float (float 5292846953000673 1.0d0) -218)
+ (scale-float (float 4932172707397632 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5985600820384800 1.0d0) -52)
+ (scale-float (float 6272184283852451 1.0d0) -107)
+ (scale-float (float 4668335067410742 1.0d0) -163)
+ (scale-float (float 4706453372433253 1.0d0) -217)
+ (scale-float (float 5109096012840960 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6004751568533000 1.0d0) -52)
+ (scale-float (float -4975292337006020 1.0d0) -107)
+ (scale-float (float 7851618381824783 1.0d0) -162)
+ (scale-float (float -6139515456651951 1.0d0) -216)
+ (scale-float (float 6832920489394176 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6023980815015339 1.0d0) -52)
+ (scale-float (float 8993844967752448 1.0d0) -106)
+ (scale-float (float 7401505998919928 1.0d0) -163)
+ (scale-float (float -6224493420691051 1.0d0) -218)
+ (scale-float (float 4861583549267968 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6043289134521691 1.0d0) -52)
+ (scale-float (float 8377404922548014 1.0d0) -106)
+ (scale-float (float 6035662126969883 1.0d0) -160)
+ (scale-float (float 7017822045852159 1.0d0) -215)
+ (scale-float (float -5406069888663552 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6062677107225404 1.0d0) -52)
+ (scale-float (float -7586238684211779 1.0d0) -106)
+ (scale-float (float -5077135864344308 1.0d0) -161)
+ (scale-float (float -4927713954038121 1.0d0) -217)
+ (scale-float (float -8357402780893184 1.0d0) -281))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6082145318849372 1.0d0) -52)
+ (scale-float (float -8461948866653765 1.0d0) -106)
+ (scale-float (float -6004474504194072 1.0d0) -166)
+ (scale-float (float 8133368293449913 1.0d0) -221)
+ (scale-float (float -6403734876717056 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6101694360733067 1.0d0) -52)
+ (scale-float (float 6506035565326645 1.0d0) -106)
+ (scale-float (float -7920306083919709 1.0d0) -160)
+ (scale-float (float -7282338225209605 1.0d0) -217)
+ (scale-float (float -8494527724191744 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6121324829900540 1.0d0) -52)
+ (scale-float (float 6779113520304759 1.0d0) -107)
+ (scale-float (float 8345818896409513 1.0d0) -167)
+ (scale-float (float 7537522447287433 1.0d0) -221)
+ (scale-float (float 8763676585623552 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6141037329129406 1.0d0) -52)
+ (scale-float (float -6046793357693206 1.0d0) -106)
+ (scale-float (float 6476781133268162 1.0d0) -160)
+ (scale-float (float 8054550865298174 1.0d0) -214)
+ (scale-float (float -5634747365982208 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6160832467020841 1.0d0) -52)
+ (scale-float (float 6525079494891090 1.0d0) -114)
+ (scale-float (float 6668863838306178 1.0d0) -169)
+ (scale-float (float -7013244843573090 1.0d0) -223)
+ (scale-float (float -7747321374703616 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6180710858070603 1.0d0) -52)
+ (scale-float (float -5386688662936188 1.0d0) -106)
+ (scale-float (float -8722383211191819 1.0d0) -160)
+ (scale-float (float 8238315842088120 1.0d0) -214)
+ (scale-float (float -5669210505543680 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6200673122741084 1.0d0) -52)
+ (scale-float (float 8615614287833476 1.0d0) -106)
+ (scale-float (float -4583197203175174 1.0d0) -160)
+ (scale-float (float 7699463666822583 1.0d0) -215)
+ (scale-float (float 4573364962066432 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6220719887534433 1.0d0) -52)
+ (scale-float (float 7369404154056336 1.0d0) -107)
+ (scale-float (float 5181777001559422 1.0d0) -161)
+ (scale-float (float 8260880733251165 1.0d0) -215)
+ (scale-float (float 7807180307415040 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6240851785066741 1.0d0) -52)
+ (scale-float (float 6348378407384716 1.0d0) -109)
+ (scale-float (float 7511671646668410 1.0d0) -164)
+ (scale-float (float -5572446876538636 1.0d0) -219)
+ (scale-float (float 8377341413425152 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6261069454143332 1.0d0) -52)
+ (scale-float (float 5747929756161303 1.0d0) -106)
+ (scale-float (float -6677627263003850 1.0d0) -160)
+ (scale-float (float -6087124692506903 1.0d0) -214)
+ (scale-float (float -5317388961480704 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6281373539835164 1.0d0) -52)
+ (scale-float (float 5756069487280759 1.0d0) -113)
+ (scale-float (float 8304859187052268 1.0d0) -168)
+ (scale-float (float -5939878643484909 1.0d0) -222)
+ (scale-float (float 6878925414203392 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6301764693556359 1.0d0) -52)
+ (scale-float (float 7987736006957214 1.0d0) -108)
+ (scale-float (float -5572446676996546 1.0d0) -162)
+ (scale-float (float 4898987619554823 1.0d0) -216)
+ (scale-float (float 5230535808712704 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6322243573142893 1.0d0) -52)
+ (scale-float (float -6250088559429980 1.0d0) -106)
+ (scale-float (float 8214082164433534 1.0d0) -160)
+ (scale-float (float -4575537593711052 1.0d0) -214)
+ (scale-float (float -8340865070530560 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6342810842932450 1.0d0) -52)
+ (scale-float (float 6506191290004624 1.0d0) -107)
+ (scale-float (float 7538309343941042 1.0d0) -169)
+ (scale-float (float -8070490757490432 1.0d0) -224)
+ (scale-float (float -4993531739373568 1.0d0) -278))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6363467173845479 1.0d0) -52)
+ (scale-float (float 6925650850841739 1.0d0) -106)
+ (scale-float (float 5108965269756902 1.0d0) -160)
+ (scale-float (float -8629508249266946 1.0d0) -214)
+ (scale-float (float 4953499151360000 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6384213243467456 1.0d0) -52)
+ (scale-float (float -7342296707473874 1.0d0) -106)
+ (scale-float (float 6038926499762338 1.0d0) -161)
+ (scale-float (float 7685790639120757 1.0d0) -215)
+ (scale-float (float -8848979685736448 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6405049736132382 1.0d0) -52)
+ (scale-float (float 7887038119644342 1.0d0) -106)
+ (scale-float (float 6835732962519886 1.0d0) -162)
+ (scale-float (float 5220068172814735 1.0d0) -216)
+ (scale-float (float 7637110284353536 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6425977343007549 1.0d0) -52)
+ (scale-float (float 7171158296027162 1.0d0) -106)
+ (scale-float (float 6508422249345121 1.0d0) -160)
+ (scale-float (float 6685325118486165 1.0d0) -214)
+ (scale-float (float -6687511699652608 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6446996762179568 1.0d0) -52)
+ (scale-float (float 6088154024111339 1.0d0) -106)
+ (scale-float (float -7454841177630762 1.0d0) -161)
+ (scale-float (float 5817067961732498 1.0d0) -216)
+ (scale-float (float -5777234774065152 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6468108698741712 1.0d0) -52)
+ (scale-float (float -6504469837046684 1.0d0) -106)
+ (scale-float (float -7517687439391069 1.0d0) -160)
+ (scale-float (float 5970146526803503 1.0d0) -215)
+ (scale-float (float -7723609005948928 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6489313864882575 1.0d0) -52)
+ (scale-float (float -6774799132907203 1.0d0) -109)
+ (scale-float (float -8315742042881489 1.0d0) -164)
+ (scale-float (float 6112336297364101 1.0d0) -219)
+ (scale-float (float -7987040040779776 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6510612979976088 1.0d0) -52)
+ (scale-float (float 6226083990960552 1.0d0) -108)
+ (scale-float (float 7341374943629366 1.0d0) -164)
+ (scale-float (float -6530116627673930 1.0d0) -218)
+ (scale-float (float -8401182632968192 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6532006770672898 1.0d0) -52)
+ (scale-float (float -7796678970447868 1.0d0) -113)
+ (scale-float (float -8658218327003408 1.0d0) -167)
+ (scale-float (float -5795595477529954 1.0d0) -224)
+ (scale-float (float -8925892940136448 1.0d0) -278))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6553495970993148 1.0d0) -52)
+ (scale-float (float 6747345131888698 1.0d0) -106)
+ (scale-float (float 5103927603270423 1.0d0) -160)
+ (scale-float (float -4700944483650471 1.0d0) -214)
+ (scale-float (float -5307894413082624 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6575081322420681 1.0d0) -52)
+ (scale-float (float -7766283014252395 1.0d0) -107)
+ (scale-float (float -4770464226344590 1.0d0) -161)
+ (scale-float (float 5154386876010200 1.0d0) -215)
+ (scale-float (float 6802411293868032 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6596763573998683 1.0d0) -52)
+ (scale-float (float -5583094043640132 1.0d0) -107)
+ (scale-float (float -7156474088532523 1.0d0) -161)
+ (scale-float (float -7226294897288106 1.0d0) -215)
+ (scale-float (float 7618534444236800 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6618543482426809 1.0d0) -52)
+ (scale-float (float 8275116950050689 1.0d0) -106)
+ (scale-float (float 5836691759444780 1.0d0) -160)
+ (scale-float (float -5813124647742540 1.0d0) -214)
+ (scale-float (float 6667275556569088 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6640421812159804 1.0d0) -52)
+ (scale-float (float -6561721455047894 1.0d0) -106)
+ (scale-float (float 8806804288909803 1.0d0) -160)
+ (scale-float (float -7340991492336673 1.0d0) -214)
+ (scale-float (float 6867019602067456 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6662399335507644 1.0d0) -52)
+ (scale-float (float -5238284397741824 1.0d0) -111)
+ (scale-float (float 8052692811667187 1.0d0) -165)
+ (scale-float (float 7972819986943405 1.0d0) -223)
+ (scale-float (float -6700908117229568 1.0d0) -283))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6684476832737247 1.0d0) -52)
+ (scale-float (float -7450639657259925 1.0d0) -106)
+ (scale-float (float 5439660369532272 1.0d0) -161)
+ (scale-float (float -7119626218695057 1.0d0) -215)
+ (scale-float (float -8656258223161344 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6706655092175749 1.0d0) -52)
+ (scale-float (float 5833795028591143 1.0d0) -106)
+ (scale-float (float 7324366237328699 1.0d0) -160)
+ (scale-float (float -6869513400425664 1.0d0) -214)
+ (scale-float (float 4892074833190912 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6728934910315408 1.0d0) -52)
+ (scale-float (float -5200892477964869 1.0d0) -106)
+ (scale-float (float 5576996548553061 1.0d0) -161)
+ (scale-float (float 5619447164581062 1.0d0) -215)
+ (scale-float (float 7351499394121728 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6751317091920131 1.0d0) -52)
+ (scale-float (float 7467026548779001 1.0d0) -106)
+ (scale-float (float -6178942986382428 1.0d0) -160)
+ (scale-float (float 7692144611413038 1.0d0) -218)
+ (scale-float (float -5580126894686208 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6773802450133692 1.0d0) -52)
+ (scale-float (float -6816832241503857 1.0d0) -106)
+ (scale-float (float 8260178159117390 1.0d0) -160)
+ (scale-float (float -6551512745169617 1.0d0) -214)
+ (scale-float (float 4883039946211328 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6796391806589630 1.0d0) -52)
+ (scale-float (float -8668990636265864 1.0d0) -108)
+ (scale-float (float 8397506793143135 1.0d0) -164)
+ (scale-float (float 5718287097465055 1.0d0) -218)
+ (scale-float (float 4812293576851456 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6819085991522900 1.0d0) -52)
+ (scale-float (float -5285788322252561 1.0d0) -106)
+ (scale-float (float -7351450710905316 1.0d0) -160)
+ (scale-float (float 4946109326684738 1.0d0) -215)
+ (scale-float (float 7741481556918272 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6841885843883273 1.0d0) -52)
+ (scale-float (float -8636872191266454 1.0d0) -109)
+ (scale-float (float 6939692820059570 1.0d0) -163)
+ (scale-float (float 8267368046853228 1.0d0) -220)
+ (scale-float (float -6533860717232128 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6864792211450543 1.0d0) -52)
+ (scale-float (float 8354214851379978 1.0d0) -106)
+ (scale-float (float -8249099892746736 1.0d0) -161)
+ (scale-float (float -8360809668092333 1.0d0) -216)
+ (scale-float (float -5235150416904192 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6887805950951562 1.0d0) -52)
+ (scale-float (float -6501576794659794 1.0d0) -106)
+ (scale-float (float -7742084937739441 1.0d0) -160)
+ (scale-float (float -7392327108699901 1.0d0) -215)
+ (scale-float (float -6262293079818240 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6910927928179133 1.0d0) -52)
+ (scale-float (float 8687248921953122 1.0d0) -106)
+ (scale-float (float 7034012859521834 1.0d0) -162)
+ (scale-float (float -7908001720275377 1.0d0) -216)
+ (scale-float (float -6416580544036864 1.0d0) -278))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6934159018112819 1.0d0) -52)
+ (scale-float (float 6288381700438587 1.0d0) -106)
+ (scale-float (float -6060408457304216 1.0d0) -160)
+ (scale-float (float 5873323538885371 1.0d0) -214)
+ (scale-float (float -5146780495060992 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6957500105041668 1.0d0) -52)
+ (scale-float (float -6583746692347551 1.0d0) -106)
+ (scale-float (float -8486074429733762 1.0d0) -160)
+ (scale-float (float -7180404084121772 1.0d0) -214)
+ (scale-float (float -7221627621801984 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6980952082688920 1.0d0) -52)
+ (scale-float (float -8905385616289737 1.0d0) -107)
+ (scale-float (float 7640976598311277 1.0d0) -164)
+ (scale-float (float 8161224665381221 1.0d0) -219)
+ (scale-float (float -6721040647192576 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7004515854338723 1.0d0) -52)
+ (scale-float (float 8000392164923254 1.0d0) -106)
+ (scale-float (float 7722991884981353 1.0d0) -160)
+ (scale-float (float 7646998333594993 1.0d0) -215)
+ (scale-float (float -8531580850438144 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7028192332964892 1.0d0) -52)
+ (scale-float (float 4515480771177063 1.0d0) -106)
+ (scale-float (float 4904288642245017 1.0d0) -161)
+ (scale-float (float -7238020353858612 1.0d0) -217)
+ (scale-float (float 8119658144464896 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7051982441361750 1.0d0) -52)
+ (scale-float (float -6376278041806644 1.0d0) -107)
+ (scale-float (float -4550649320529980 1.0d0) -161)
+ (scale-float (float -8383745255731473 1.0d0) -217)
+ (scale-float (float 5137393694932992 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7075887112277099 1.0d0) -52)
+ (scale-float (float -8044158469028999 1.0d0) -106)
+ (scale-float (float 8219820830511956 1.0d0) -161)
+ (scale-float (float 8824995761199473 1.0d0) -215)
+ (scale-float (float -6955216711057408 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7099907288547353 1.0d0) -52)
+ (scale-float (float -7819467642589553 1.0d0) -108)
+ (scale-float (float -7537052374028336 1.0d0) -162)
+ (scale-float (float 8351454283533806 1.0d0) -216)
+ (scale-float (float 5816491862654976 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7124043923234879 1.0d0) -52)
+ (scale-float (float -7659477916393316 1.0d0) -106)
+ (scale-float (float 8579150223223901 1.0d0) -164)
+ (scale-float (float -8420355484116036 1.0d0) -218)
+ (scale-float (float 8952810691362816 1.0d0) -279))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7148297979767580 1.0d0) -52)
+ (scale-float (float -6552479776343909 1.0d0) -108)
+ (scale-float (float -7908601887231407 1.0d0) -162)
+ (scale-float (float 4523484557435432 1.0d0) -218)
+ (scale-float (float 8969533245095936 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7172670432080778 1.0d0) -52)
+ (scale-float (float 5465746047268065 1.0d0) -107)
+ (scale-float (float -7589308106397731 1.0d0) -161)
+ (scale-float (float -8670147957950623 1.0d0) -217)
+ (scale-float (float 7337509779931136 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7197162264761425 1.0d0) -52)
+ (scale-float (float 7051217613783884 1.0d0) -115)
+ (scale-float (float -5918159213175868 1.0d0) -169)
+ (scale-float (float -4964773714017637 1.0d0) -226)
+ (scale-float (float 8184825894666240 1.0d0) -280))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7221774473194696 1.0d0) -52)
+ (scale-float (float 5663929995290417 1.0d0) -107)
+ (scale-float (float 8192791094983764 1.0d0) -162)
+ (scale-float (float -6895747937922063 1.0d0) -223)
+ (scale-float (float 6161309452206080 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7246508063713011 1.0d0) -52)
+ (scale-float (float -5607075886301902 1.0d0) -108)
+ (scale-float (float 5295475845913378 1.0d0) -162)
+ (scale-float (float 5094595004503787 1.0d0) -216)
+ (scale-float (float 8544810988404736 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7271364053747525 1.0d0) -52)
+ (scale-float (float -6930449084885358 1.0d0) -107)
+ (scale-float (float -7738310043986010 1.0d0) -161)
+ (scale-float (float -5820997457322006 1.0d0) -216)
+ (scale-float (float 6462652592422912 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7296343471982143 1.0d0) -52)
+ (scale-float (float 6524098474463173 1.0d0) -107)
+ (scale-float (float -6611863837141324 1.0d0) -161)
+ (scale-float (float -4691185552056161 1.0d0) -215)
+ (scale-float (float -5945686706995200 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7321447358510105 1.0d0) -52)
+ (scale-float (float 4915999262946911 1.0d0) -109)
+ (scale-float (float -5634512347330806 1.0d0) -163)
+ (scale-float (float 7560272692792706 1.0d0) -219)
+ (scale-float (float -7625361640390656 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7346676764993187 1.0d0) -52)
+ (scale-float (float 8597020209551177 1.0d0) -109)
+ (scale-float (float 5327684078683971 1.0d0) -164)
+ (scale-float (float -6541739214290562 1.0d0) -221)
+ (scale-float (float -5728886669180928 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7372032754823579 1.0d0) -52)
+ (scale-float (float 6229152596919430 1.0d0) -106)
+ (scale-float (float -7828718708088660 1.0d0) -161)
+ (scale-float (float -5312559619272123 1.0d0) -218)
+ (scale-float (float -7215659148509184 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7397516403288485 1.0d0) -52)
+ (scale-float (float 5245235763543538 1.0d0) -107)
+ (scale-float (float 8249183213479079 1.0d0) -163)
+ (scale-float (float 5683491486088472 1.0d0) -219)
+ (scale-float (float -8326405532155904 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7423128797737498 1.0d0) -52)
+ (scale-float (float 6534789125887563 1.0d0) -106)
+ (scale-float (float -5416343419560325 1.0d0) -162)
+ (scale-float (float -7897115342906696 1.0d0) -218)
+ (scale-float (float 7923576875253760 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7448871037752814 1.0d0) -52)
+ (scale-float (float -7144027731086266 1.0d0) -106)
+ (scale-float (float -6372697590546829 1.0d0) -160)
+ (scale-float (float 5170058560926944 1.0d0) -214)
+ (scale-float (float -6449806776803328 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7474744235322325 1.0d0) -52)
+ (scale-float (float -8235027695704343 1.0d0) -108)
+ (scale-float (float 8351406254756054 1.0d0) -162)
+ (scale-float (float 5457294044055005 1.0d0) -216)
+ (scale-float (float -6871998316544000 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7500749515015670 1.0d0) -52)
+ (scale-float (float 6695285130942172 1.0d0) -106)
+ (scale-float (float 6796561291551790 1.0d0) -160)
+ (scale-float (float -8407223091930427 1.0d0) -218)
+ (scale-float (float -8964850462359552 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7526888014163282 1.0d0) -52)
+ (scale-float (float -7501433522090210 1.0d0) -107)
+ (scale-float (float 8896885186748969 1.0d0) -161)
+ (scale-float (float 7778774552930541 1.0d0) -215)
+ (scale-float (float -4765951651020800 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7553160883038499 1.0d0) -52)
+ (scale-float (float -7717301072954270 1.0d0) -106)
+ (scale-float (float -4736066215208579 1.0d0) -160)
+ (scale-float (float 6167583482750279 1.0d0) -214)
+ (scale-float (float -4887683722108928 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7579569285042808 1.0d0) -52)
+ (scale-float (float 6183147635439386 1.0d0) -109)
+ (scale-float (float -8813002412175406 1.0d0) -163)
+ (scale-float (float 5400591826237277 1.0d0) -217)
+ (scale-float (float -6596357257560064 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7606114396894275 1.0d0) -52)
+ (scale-float (float -8430495514121248 1.0d0) -106)
+ (scale-float (float -5257730309726180 1.0d0) -160)
+ (scale-float (float -6797878334323030 1.0d0) -214)
+ (scale-float (float 6705517761331200 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7632797408819222 1.0d0) -52)
+ (scale-float (float -7883724294294040 1.0d0) -106)
+ (scale-float (float 7790123274327648 1.0d0) -163)
+ (scale-float (float 6652158382482046 1.0d0) -217)
+ (scale-float (float -5084508566585344 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7659619524747233 1.0d0) -52)
+ (scale-float (float -7767836673805280 1.0d0) -108)
+ (scale-float (float 6818006961459375 1.0d0) -162)
+ (scale-float (float 8474320068246006 1.0d0) -217)
+ (scale-float (float 5921933685882880 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7686581962509540 1.0d0) -52)
+ (scale-float (float -6669745040010299 1.0d0) -106)
+ (scale-float (float 7647642713755227 1.0d0) -162)
+ (scale-float (float 7719520442751879 1.0d0) -218)
+ (scale-float (float 5610811217018880 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7713685954040862 1.0d0) -52)
+ (scale-float (float 8282411342758270 1.0d0) -107)
+ (scale-float (float 5351595586394364 1.0d0) -161)
+ (scale-float (float 4968620750082420 1.0d0) -215)
+ (scale-float (float -8794130094555136 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7740932745584778 1.0d0) -52)
+ (scale-float (float -7983253716465345 1.0d0) -107)
+ (scale-float (float -6191366840246599 1.0d0) -163)
+ (scale-float (float -5937368954491445 1.0d0) -217)
+ (scale-float (float -7175676447555584 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7768323597902685 1.0d0) -52)
+ (scale-float (float -6932574340848239 1.0d0) -106)
+ (scale-float (float -8922024896109103 1.0d0) -160)
+ (scale-float (float 7317260498562562 1.0d0) -214)
+ (scale-float (float -5494842149044224 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7795859786486438 1.0d0) -52)
+ (scale-float (float 4926530016014015 1.0d0) -109)
+ (scale-float (float 6677817833809299 1.0d0) -166)
+ (scale-float (float 7063476649184661 1.0d0) -224)
+ (scale-float (float -4846339795976192 1.0d0) -279))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7823542601774733 1.0d0) -52)
+ (scale-float (float -8419218412396898 1.0d0) -106)
+ (scale-float (float -6739987301542550 1.0d0) -161)
+ (scale-float (float -6132721933945695 1.0d0) -215)
+ (scale-float (float 4560492812746752 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7851373349373308 1.0d0) -52)
+ (scale-float (float -5126389915225982 1.0d0) -107)
+ (scale-float (float 5388704434706194 1.0d0) -163)
+ (scale-float (float 8906887707616199 1.0d0) -221)
+ (scale-float (float 5654274299133952 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7879353350279058 1.0d0) -52)
+ (scale-float (float -5264522129973202 1.0d0) -108)
+ (scale-float (float 8552676307083459 1.0d0) -162)
+ (scale-float (float -8067891896217601 1.0d0) -216)
+ (scale-float (float -6300549562892288 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7907483941108124 1.0d0) -52)
+ (scale-float (float -7718165431409574 1.0d0) -106)
+ (scale-float (float -5012972602409400 1.0d0) -161)
+ (scale-float (float 5384985500885942 1.0d0) -215)
+ (scale-float (float 4846701156630528 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7935766474328052 1.0d0) -52)
+ (scale-float (float -6613046675471234 1.0d0) -110)
+ (scale-float (float -7998668785658521 1.0d0) -165)
+ (scale-float (float -8081984933026363 1.0d0) -220)
+ (scale-float (float -8538456164663296 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7964202318494108 1.0d0) -52)
+ (scale-float (float -5922853960098892 1.0d0) -106)
+ (scale-float (float -6989445158679706 1.0d0) -160)
+ (scale-float (float -5138375199156798 1.0d0) -216)
+ (scale-float (float -7227344691593216 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7992792858489822 1.0d0) -52)
+ (scale-float (float -8768480214781638 1.0d0) -109)
+ (scale-float (float 7844372482637495 1.0d0) -163)
+ (scale-float (float 7588451423670197 1.0d0) -217)
+ (scale-float (float -5991539517292544 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8021539495771870 1.0d0) -52)
+ (scale-float (float -6681294409622045 1.0d0) -106)
+ (scale-float (float 8096854178246647 1.0d0) -160)
+ (scale-float (float 5418560818338247 1.0d0) -215)
+ (scale-float (float -8372603276656640 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8050443648619364 1.0d0) -52)
+ (scale-float (float 8160498528136282 1.0d0) -106)
+ (scale-float (float 6595987209952523 1.0d0) -162)
+ (scale-float (float 8913285169724375 1.0d0) -217)
+ (scale-float (float 6566292738408448 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8079506752387666 1.0d0) -52)
+ (scale-float (float 6086478506215249 1.0d0) -108)
+ (scale-float (float 6943915041499786 1.0d0) -163)
+ (scale-float (float 7726225471978347 1.0d0) -218)
+ (scale-float (float 6857460569079808 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8108730259766795 1.0d0) -52)
+ (scale-float (float -6924020594629539 1.0d0) -106)
+ (scale-float (float 7039599443349448 1.0d0) -160)
+ (scale-float (float 6636542293060408 1.0d0) -219)
+ (scale-float (float -8248062889426944 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8138115641044550 1.0d0) -52)
+ (scale-float (float 4571670723019047 1.0d0) -106)
+ (scale-float (float -8675626971024832 1.0d0) -165)
+ (scale-float (float -7135813161318007 1.0d0) -219)
+ (scale-float (float -5345958708117504 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8167664384374439 1.0d0) -52)
+ (scale-float (float -8594344220421759 1.0d0) -106)
+ (scale-float (float 6225470882867097 1.0d0) -162)
+ (scale-float (float -7345519967758384 1.0d0) -216)
+ (scale-float (float 5861875726876672 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8197377996048504 1.0d0) -52)
+ (scale-float (float -5680382695110323 1.0d0) -106)
+ (scale-float (float 6838449163819191 1.0d0) -161)
+ (scale-float (float 4967392806520383 1.0d0) -215)
+ (scale-float (float 5273246981521408 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8227258000775176 1.0d0) -52)
+ (scale-float (float -7040163401690535 1.0d0) -106)
+ (scale-float (float -6666536014285352 1.0d0) -161)
+ (scale-float (float 5792720759523620 1.0d0) -215)
+ (scale-float (float 7489611402264576 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8257305941962238 1.0d0) -52)
+ (scale-float (float -6235229666522037 1.0d0) -108)
+ (scale-float (float 4886700734167849 1.0d0) -162)
+ (scale-float (float -8770431451309683 1.0d0) -217)
+ (scale-float (float -6563036633497600 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8287523382005028 1.0d0) -52)
+ (scale-float (float -5678060077809221 1.0d0) -107)
+ (scale-float (float -5668834439524685 1.0d0) -162)
+ (scale-float (float 6576156667945915 1.0d0) -216)
+ (scale-float (float -5809058938880000 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8317911902579981 1.0d0) -52)
+ (scale-float (float 7194286263118379 1.0d0) -108)
+ (scale-float (float 5473490977664520 1.0d0) -165)
+ (scale-float (float 6742601015555680 1.0d0) -220)
+ (scale-float (float 5056301815562240 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8348473104943638 1.0d0) -52)
+ (scale-float (float -6391621016681863 1.0d0) -106)
+ (scale-float (float -7626545638484088 1.0d0) -160)
+ (scale-float (float 7339375963687856 1.0d0) -215)
+ (scale-float (float -8892024670191616 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8379208610237227 1.0d0) -52)
+ (scale-float (float 6449046509943769 1.0d0) -106)
+ (scale-float (float 6254439204059236 1.0d0) -161)
+ (scale-float (float -7597582828738449 1.0d0) -218)
+ (scale-float (float 5647662500806656 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8410120059796957 1.0d0) -52)
+ (scale-float (float 7939398310619298 1.0d0) -106)
+ (scale-float (float -7794544180520912 1.0d0) -160)
+ (scale-float (float 8583629970279667 1.0d0) -214)
+ (scale-float (float -6928989817044992 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8441209115470126 1.0d0) -52)
+ (scale-float (float 8678333495882426 1.0d0) -106)
+ (scale-float (float -6472637329889902 1.0d0) -167)
+ (scale-float (float -6995649561992337 1.0d0) -221)
+ (scale-float (float 5802169899941888 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8472477459937193 1.0d0) -52)
+ (scale-float (float 8570521679063611 1.0d0) -107)
+ (scale-float (float -5936880060582285 1.0d0) -162)
+ (scale-float (float 7777084781837767 1.0d0) -216)
+ (scale-float (float -4878182560661504 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8503926797039931 1.0d0) -52)
+ (scale-float (float 7619653518793156 1.0d0) -106)
+ (scale-float (float -8638980237674381 1.0d0) -162)
+ (scale-float (float 5695617643824624 1.0d0) -216)
+ (scale-float (float -5256575696240640 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8535558852115805 1.0d0) -52)
+ (scale-float (float 7717483963968495 1.0d0) -108)
+ (scale-float (float -4946550152273178 1.0d0) -166)
+ (scale-float (float -7543815510835142 1.0d0) -220)
+ (scale-float (float 8182459373977600 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8567375372338703 1.0d0) -52)
+ (scale-float (float -4607123785883404 1.0d0) -106)
+ (scale-float (float 6615374890321791 1.0d0) -160)
+ (scale-float (float -7913190996117973 1.0d0) -219)
+ (scale-float (float -4539914053484544 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8599378127066171 1.0d0) -52)
+ (scale-float (float 6433926300689068 1.0d0) -106)
+ (scale-float (float 6337489561898200 1.0d0) -160)
+ (scale-float (float -7162187518913546 1.0d0) -217)
+ (scale-float (float -7719566845542400 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8631568908193296 1.0d0) -52)
+ (scale-float (float 5573684129894211 1.0d0) -110)
+ (scale-float (float 4697922104472433 1.0d0) -164)
+ (scale-float (float 8332790213185398 1.0d0) -218)
+ (scale-float (float 8799754147332096 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8663949530513373 1.0d0) -52)
+ (scale-float (float 8831742268778019 1.0d0) -106)
+ (scale-float (float -6588195514106582 1.0d0) -160)
+ (scale-float (float 8642684274769891 1.0d0) -214)
+ (scale-float (float -6113857327710208 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8696521832085533 1.0d0) -52)
+ (scale-float (float -5725705447987637 1.0d0) -106)
+ (scale-float (float -5578988538519052 1.0d0) -161)
+ (scale-float (float -5454464946830045 1.0d0) -215)
+ (scale-float (float 8479328624017408 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8729287674609459 1.0d0) -52)
+ (scale-float (float -7726755428081233 1.0d0) -106)
+ (scale-float (float -7169128636578129 1.0d0) -160)
+ (scale-float (float -6117985949368032 1.0d0) -215)
+ (scale-float (float -7484662462382080 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8762248943807380 1.0d0) -52)
+ (scale-float (float 7661335807960245 1.0d0) -107)
+ (scale-float (float 8164699070030703 1.0d0) -161)
+ (scale-float (float -4953426430901129 1.0d0) -215)
+ (scale-float (float 6326202891730944 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8795407549813488 1.0d0) -52)
+ (scale-float (float -5595262607081735 1.0d0) -106)
+ (scale-float (float 6899825784168106 1.0d0) -162)
+ (scale-float (float -6384797474881585 1.0d0) -217)
+ (scale-float (float 6749614365736960 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8828765427570947 1.0d0) -52)
+ (scale-float (float 7542763819981613 1.0d0) -108)
+ (scale-float (float -5280373115681684 1.0d0) -162)
+ (scale-float (float 7965342904929630 1.0d0) -216)
+ (scale-float (float -5138888297742336 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8862324537236687 1.0d0) -52)
+ (scale-float (float 5478740957742512 1.0d0) -107)
+ (scale-float (float -8688011568025747 1.0d0) -161)
+ (scale-float (float -6347940529072431 1.0d0) -216)
+ (scale-float (float 7918870876717056 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8896086864594135 1.0d0) -52)
+ (scale-float (float 6011240247440891 1.0d0) -106)
+ (scale-float (float -7904570401654965 1.0d0) -160)
+ (scale-float (float 5109940160585919 1.0d0) -215)
+ (scale-float (float 7277104927342592 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8930054421474087 1.0d0) -52)
+ (scale-float (float -7585717744927642 1.0d0) -106)
+ (scale-float (float 6426909277625247 1.0d0) -161)
+ (scale-float (float 6454109566985921 1.0d0) -215)
+ (scale-float (float 6846354419548160 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8964229246183892 1.0d0) -52)
+ (scale-float (float -6044505343434685 1.0d0) -107)
+ (scale-float (float -8843438673200297 1.0d0) -162)
+ (scale-float (float -6740266892894322 1.0d0) -216)
+ (scale-float (float 6612994665807872 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8998613403945159 1.0d0) -52)
+ (scale-float (float 5036138781958602 1.0d0) -107)
+ (scale-float (float 6307340486192282 1.0d0) -161)
+ (scale-float (float 8264728164523381 1.0d0) -216)
+ (scale-float (float -8863674547503104 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4516604493670082 1.0d0) -51)
+ (scale-float (float 7855269771490288 1.0d0) -105)
+ (scale-float (float -8517128085935100 1.0d0) -160)
+ (scale-float (float -7525493275887105 1.0d0) -214)
+ (scale-float (float 8847437596540928 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4534009058383589 1.0d0) -51)
+ (scale-float (float -4947501464113715 1.0d0) -110)
+ (scale-float (float 7017443131106966 1.0d0) -165)
+ (scale-float (float -5971498470999696 1.0d0) -219)
+ (scale-float (float 6345468010299392 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4551521470452453 1.0d0) -51)
+ (scale-float (float -6806333081011709 1.0d0) -106)
+ (scale-float (float -7596521103898869 1.0d0) -160)
+ (scale-float (float -7954691276532210 1.0d0) -214)
+ (scale-float (float 4699163648704512 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4569142818593137 1.0d0) -51)
+ (scale-float (float 8737340629906869 1.0d0) -112)
+ (scale-float (float 6683145983175485 1.0d0) -166)
+ (scale-float (float 6585002720071419 1.0d0) -223)
+ (scale-float (float 8792138431070208 1.0d0) -279))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4586874206140882 1.0d0) -51)
+ (scale-float (float 7409519956751576 1.0d0) -107)
+ (scale-float (float 8482593100011898 1.0d0) -161)
+ (scale-float (float 6682587412044156 1.0d0) -220)
+ (scale-float (float 4897098872913920 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4604716751296264 1.0d0) -51)
+ (scale-float (float 7315591678768290 1.0d0) -106)
+ (scale-float (float -6478307761602943 1.0d0) -160)
+ (scale-float (float 7390627878378408 1.0d0) -214)
+ (scale-float (float -4980006345588736 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4622671587376759 1.0d0) -51)
+ (scale-float (float 6764505505310787 1.0d0) -106)
+ (scale-float (float 5651713447799281 1.0d0) -163)
+ (scale-float (float -5595386708242591 1.0d0) -217)
+ (scale-float (float -8817533386752000 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4640739863073432 1.0d0) -51)
+ (scale-float (float 5235586652355695 1.0d0) -108)
+ (scale-float (float -6774633309161685 1.0d0) -164)
+ (scale-float (float 6292936258452966 1.0d0) -218)
+ (scale-float (float 7402532084908032 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4658922742712873 1.0d0) -51)
+ (scale-float (float 8047926806184342 1.0d0) -105)
+ (scale-float (float 8665597744908349 1.0d0) -161)
+ (scale-float (float 5884825387558272 1.0d0) -215)
+ (scale-float (float -7854888618328064 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4677221406524509 1.0d0) -51)
+ (scale-float (float 6309071459272219 1.0d0) -105)
+ (scale-float (float -5861678673822895 1.0d0) -160)
+ (scale-float (float 6481463496541750 1.0d0) -215)
+ (scale-float (float -5883100386852864 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4695637050913412 1.0d0) -51)
+ (scale-float (float 6155122819224400 1.0d0) -105)
+ (scale-float (float -6900683102254314 1.0d0) -163)
+ (scale-float (float 6663900883485306 1.0d0) -217)
+ (scale-float (float 7332552562180096 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4714170888738748 1.0d0) -51)
+ (scale-float (float -7154050573951264 1.0d0) -105)
+ (scale-float (float -5228176980015465 1.0d0) -159)
+ (scale-float (float 8322218519568072 1.0d0) -213)
+ (scale-float (float 5453215976521728 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4732824149597990 1.0d0) -51)
+ (scale-float (float -7952293513954034 1.0d0) -105)
+ (scale-float (float 5313971258372717 1.0d0) -159)
+ (scale-float (float -6373220212301441 1.0d0) -213)
+ (scale-float (float 8038061422133248 1.0d0) -267))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4751598080117049 1.0d0) -51)
+ (scale-float (float 5116657367694205 1.0d0) -105)
+ (scale-float (float 5002113055115020 1.0d0) -160)
+ (scale-float (float 6122924223721361 1.0d0) -214)
+ (scale-float (float 7794473060352000 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4770493944246457 1.0d0) -51)
+ (scale-float (float -7593639115449901 1.0d0) -105)
+ (scale-float (float 8288324301389426 1.0d0) -159)
+ (scale-float (float 8471126431613674 1.0d0) -216)
+ (scale-float (float 8496158537089024 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4789513023563745 1.0d0) -51)
+ (scale-float (float -6536375340057158 1.0d0) -105)
+ (scale-float (float 7154047310973683 1.0d0) -160)
+ (scale-float (float -8282736304647735 1.0d0) -216)
+ (scale-float (float -7997052826550272 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4808656617582189 1.0d0) -51)
+ (scale-float (float 7220506481736491 1.0d0) -105)
+ (scale-float (float -5763496948405995 1.0d0) -159)
+ (scale-float (float 8855283341820409 1.0d0) -214)
+ (scale-float (float -6641182903107584 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4827926044066060 1.0d0) -51)
+ (scale-float (float -4566027902376150 1.0d0) -107)
+ (scale-float (float -5660018282286580 1.0d0) -164)
+ (scale-float (float -6525492458400559 1.0d0) -220)
+ (scale-float (float 7352562499977216 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4847322639352541 1.0d0) -51)
+ (scale-float (float -6886081033979822 1.0d0) -105)
+ (scale-float (float -4965782539411056 1.0d0) -159)
+ (scale-float (float -6530044887954106 1.0d0) -213)
+ (scale-float (float -7579985518395392 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4866847758680490 1.0d0) -51)
+ (scale-float (float 7577167154580700 1.0d0) -105)
+ (scale-float (float -8097090336510504 1.0d0) -161)
+ (scale-float (float -5125334469688733 1.0d0) -218)
+ (scale-float (float -7005706487070720 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4886502776526209 1.0d0) -51)
+ (scale-float (float 6447728718743388 1.0d0) -105)
+ (scale-float (float 6352685077616183 1.0d0) -160)
+ (scale-float (float -4847490480269497 1.0d0) -214)
+ (scale-float (float 6826529376108544 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4906289086946387 1.0d0) -51)
+ (scale-float (float -6225707041977363 1.0d0) -107)
+ (scale-float (float 6937474968385968 1.0d0) -165)
+ (scale-float (float -5485182190259269 1.0d0) -219)
+ (scale-float (float -6120096300793856 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4926208103928412 1.0d0) -51)
+ (scale-float (float 6338830329417148 1.0d0) -105)
+ (scale-float (float 6188917082250096 1.0d0) -162)
+ (scale-float (float 5149131390511145 1.0d0) -216)
+ (scale-float (float -7852795551285248 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4946261261748232 1.0d0) -51)
+ (scale-float (float -8817433990373634 1.0d0) -108)
+ (scale-float (float 8891587898717767 1.0d0) -166)
+ (scale-float (float -7337766033399816 1.0d0) -223)
+ (scale-float (float 7572261796052992 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4966450015335943 1.0d0) -51)
+ (scale-float (float 8099079459031819 1.0d0) -105)
+ (scale-float (float 7092920388820914 1.0d0) -159)
+ (scale-float (float 8634126330575689 1.0d0) -214)
+ (scale-float (float -5327712688128000 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4986775840649324 1.0d0) -51)
+ (scale-float (float -5673983972559754 1.0d0) -106)
+ (scale-float (float -5124322753939530 1.0d0) -160)
+ (scale-float (float -6561473523479162 1.0d0) -215)
+ (scale-float (float 8354510084243456 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5007240235055492 1.0d0) -51)
+ (scale-float (float -5960282226209081 1.0d0) -105)
+ (scale-float (float -7839983841639876 1.0d0) -160)
+ (scale-float (float 6275246444950574 1.0d0) -214)
+ (scale-float (float 5085487136473088 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5027844717720912 1.0d0) -51)
+ (scale-float (float -6053340750866915 1.0d0) -105)
+ (scale-float (float -8882396232419406 1.0d0) -162)
+ (scale-float (float 8415922436627511 1.0d0) -217)
+ (scale-float (float -8167642716962816 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5048590830009955 1.0d0) -51)
+ (scale-float (float 7335918697772098 1.0d0) -109)
+ (scale-float (float 7423528817062502 1.0d0) -163)
+ (scale-float (float -4886998882716538 1.0d0) -219)
+ (scale-float (float 8753680899637248 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5069480135892235 1.0d0) -51)
+ (scale-float (float 6045661561354841 1.0d0) -106)
+ (scale-float (float 8363566791655380 1.0d0) -161)
+ (scale-float (float 6845974533746061 1.0d0) -215)
+ (scale-float (float -4509504156139520 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5090514222358945 1.0d0) -51)
+ (scale-float (float 7190510340535113 1.0d0) -106)
+ (scale-float (float 5890419486080867 1.0d0) -167)
+ (scale-float (float -7122745049242660 1.0d0) -224)
+ (scale-float (float 7310302068604928 1.0d0) -278))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5111694699848430 1.0d0) -51)
+ (scale-float (float 5483748244787137 1.0d0) -107)
+ (scale-float (float -5020254488207729 1.0d0) -161)
+ (scale-float (float 6670570467928192 1.0d0) -215)
+ (scale-float (float 6912704542277632 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5133023202681233 1.0d0) -51)
+ (scale-float (float 5187364127395310 1.0d0) -105)
+ (scale-float (float 8300646378869403 1.0d0) -159)
+ (scale-float (float -5221669431796945 1.0d0) -215)
+ (scale-float (float 4714004968767488 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5154501389504865 1.0d0) -51)
+ (scale-float (float 6803343744872140 1.0d0) -107)
+ (scale-float (float -5203608947079411 1.0d0) -162)
+ (scale-float (float 4522094436765395 1.0d0) -216)
+ (scale-float (float 8611772949594112 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5176130943748547 1.0d0) -51)
+ (scale-float (float -5441889602618156 1.0d0) -105)
+ (scale-float (float 6259432116541894 1.0d0) -161)
+ (scale-float (float 4941127140625123 1.0d0) -217)
+ (scale-float (float -8637838431092736 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5197913574088192 1.0d0) -51)
+ (scale-float (float 7066328729374402 1.0d0) -105)
+ (scale-float (float -6287158470809953 1.0d0) -159)
+ (scale-float (float 6935368526095743 1.0d0) -213)
+ (scale-float (float -7711666968453120 1.0d0) -267))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5219851014921900 1.0d0) -51)
+ (scale-float (float -6974571225775474 1.0d0) -105)
+ (scale-float (float -4901240255402509 1.0d0) -159)
+ (scale-float (float -4786990831072783 1.0d0) -213)
+ (scale-float (float 6575470324473856 1.0d0) -267))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5241945026856225 1.0d0) -51)
+ (scale-float (float -5414371478039603 1.0d0) -109)
+ (scale-float (float -7736602184165943 1.0d0) -164)
+ (scale-float (float -7046188211546697 1.0d0) -218)
+ (scale-float (float 8888955994636288 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5264197397203533 1.0d0) -51)
+ (scale-float (float -8669752661318607 1.0d0) -107)
+ (scale-float (float 8366992181009039 1.0d0) -163)
+ (scale-float (float 7423499375372000 1.0d0) -218)
+ (scale-float (float 8767186408570880 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5286609940490712 1.0d0) -51)
+ (scale-float (float -6357280574964786 1.0d0) -106)
+ (scale-float (float 7127335893195073 1.0d0) -160)
+ (scale-float (float 7981588227270946 1.0d0) -216)
+ (scale-float (float 7131279199830016 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5309184498979563 1.0d0) -51)
+ (scale-float (float -4874544659022375 1.0d0) -107)
+ (scale-float (float 6677772519316173 1.0d0) -163)
+ (scale-float (float -8282309486460135 1.0d0) -217)
+ (scale-float (float -7243769177440256 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5331922943199174 1.0d0) -51)
+ (scale-float (float 5261513758043363 1.0d0) -106)
+ (scale-float (float -5884317562049580 1.0d0) -160)
+ (scale-float (float -7923704492742146 1.0d0) -214)
+ (scale-float (float -7631285629173760 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5354827172490604 1.0d0) -51)
+ (scale-float (float -8979476452914960 1.0d0) -105)
+ (scale-float (float 4529659095750735 1.0d0) -159)
+ (scale-float (float -8055194514632460 1.0d0) -213)
+ (scale-float (float 7736670310006784 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5377899115564205 1.0d0) -51)
+ (scale-float (float -7528830301329629 1.0d0) -106)
+ (scale-float (float -8294784902659568 1.0d0) -160)
+ (scale-float (float -6672711106583245 1.0d0) -214)
+ (scale-float (float -6428203355668480 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5401140731069939 1.0d0) -51)
+ (scale-float (float 5021258835161679 1.0d0) -105)
+ (scale-float (float -8475377105953127 1.0d0) -159)
+ (scale-float (float -6465153705599298 1.0d0) -213)
+ (scale-float (float 7212519501856768 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5424554008181028 1.0d0) -51)
+ (scale-float (float -4607004270222649 1.0d0) -106)
+ (scale-float (float 5204639725983234 1.0d0) -160)
+ (scale-float (float 8705251709549022 1.0d0) -214)
+ (scale-float (float 7133914591756288 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5448140967191309 1.0d0) -51)
+ (scale-float (float 8646614564653609 1.0d0) -106)
+ (scale-float (float -5712905332475541 1.0d0) -162)
+ (scale-float (float 6938154409421564 1.0d0) -216)
+ (scale-float (float -5754158783922176 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5471903660126681 1.0d0) -51)
+ (scale-float (float -5095312074389999 1.0d0) -106)
+ (scale-float (float 7931656830074564 1.0d0) -161)
+ (scale-float (float -5830558179139865 1.0d0) -218)
+ (scale-float (float -5744915649658880 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5495844171371012 1.0d0) -51)
+ (scale-float (float -4894476073017885 1.0d0) -106)
+ (scale-float (float 6807544078025369 1.0d0) -160)
+ (scale-float (float -7133279682058488 1.0d0) -218)
+ (scale-float (float 7054428971204608 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5519964618306929 1.0d0) -51)
+ (scale-float (float -6416462666131916 1.0d0) -107)
+ (scale-float (float 7863359652854172 1.0d0) -161)
+ (scale-float (float -7838341582992422 1.0d0) -215)
+ (scale-float (float -8228378776305664 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5544267151971889 1.0d0) -51)
+ (scale-float (float -5226213724553011 1.0d0) -111)
+ (scale-float (float 8046249584213555 1.0d0) -165)
+ (scale-float (float 6563760929495511 1.0d0) -219)
+ (scale-float (float 8097551255339008 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5568753957729966 1.0d0) -51)
+ (scale-float (float 7713400854565827 1.0d0) -105)
+ (scale-float (float 6795642500519700 1.0d0) -159)
+ (scale-float (float -7106626022303940 1.0d0) -215)
+ (scale-float (float 5941329437065216 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5593427255959795 1.0d0) -51)
+ (scale-float (float -6081037327893907 1.0d0) -106)
+ (scale-float (float 7970762074757326 1.0d0) -162)
+ (scale-float (float -6749885305048105 1.0d0) -216)
+ (scale-float (float -7206150177030144 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5618289302759119 1.0d0) -51)
+ (scale-float (float 8411841686874487 1.0d0) -106)
+ (scale-float (float 6755054143227277 1.0d0) -160)
+ (scale-float (float -4938978473436258 1.0d0) -215)
+ (scale-float (float -7889371068432384 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5643342390666428 1.0d0) -51)
+ (scale-float (float 6381605915332618 1.0d0) -108)
+ (scale-float (float 5442530084911321 1.0d0) -162)
+ (scale-float (float 7512696284912952 1.0d0) -217)
+ (scale-float (float -7465305593217024 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5668588849400150 1.0d0) -51)
+ (scale-float (float -4824898652263998 1.0d0) -107)
+ (scale-float (float -7441524904278837 1.0d0) -162)
+ (scale-float (float 4647007709531591 1.0d0) -217)
+ (scale-float (float -7303187868418048 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5694031046615916 1.0d0) -51)
+ (scale-float (float 8065260404872413 1.0d0) -105)
+ (scale-float (float -6952816197282389 1.0d0) -159)
+ (scale-float (float 7343186202974057 1.0d0) -213)
+ (scale-float (float 7392816730210304 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5719671388682408 1.0d0) -51)
+ (scale-float (float -7348161466087215 1.0d0) -105)
+ (scale-float (float -7879178996262785 1.0d0) -160)
+ (scale-float (float -7711612515492415 1.0d0) -215)
+ (scale-float (float 6975023881781248 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5745512321476315 1.0d0) -51)
+ (scale-float (float -7659638510672767 1.0d0) -105)
+ (scale-float (float 6720014610390876 1.0d0) -160)
+ (scale-float (float -8073794397910470 1.0d0) -214)
+ (scale-float (float 8255404920537088 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5771556331196972 1.0d0) -51)
+ (scale-float (float -7813292155535222 1.0d0) -105)
+ (scale-float (float 5009221391627732 1.0d0) -161)
+ (scale-float (float -6456552747873212 1.0d0) -215)
+ (scale-float (float -6149339523448832 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5797805945201227 1.0d0) -51)
+ (scale-float (float -7557645550883749 1.0d0) -105)
+ (scale-float (float -7915090557340896 1.0d0) -159)
+ (scale-float (float -7018273162534285 1.0d0) -213)
+ (scale-float (float 5344075355799552 1.0d0) -267))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5824263732859141 1.0d0) -51)
+ (scale-float (float -7884952149805945 1.0d0) -105)
+ (scale-float (float -5159967214455188 1.0d0) -159)
+ (scale-float (float 7172972689937679 1.0d0) -214)
+ (scale-float (float 8157315371204608 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5850932306431123 1.0d0) -51)
+ (scale-float (float 7905935284742383 1.0d0) -105)
+ (scale-float (float -6414526615471992 1.0d0) -160)
+ (scale-float (float 4929929863576799 1.0d0) -216)
+ (scale-float (float 6126455935991808 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5877814321967136 1.0d0) -51)
+ (scale-float (float 5621961757749764 1.0d0) -105)
+ (scale-float (float -5016585245184256 1.0d0) -160)
+ (scale-float (float 6010357510970292 1.0d0) -214)
+ (scale-float (float -5624580296278016 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5904912480228610 1.0d0) -51)
+ (scale-float (float 5895526721070294 1.0d0) -106)
+ (scale-float (float 5444106544055628 1.0d0) -162)
+ (scale-float (float -7325514389665266 1.0d0) -217)
+ (scale-float (float 5112038770606080 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5932229527633753 1.0d0) -51)
+ (scale-float (float 7983624999651672 1.0d0) -105)
+ (scale-float (float -5459533031057239 1.0d0) -159)
+ (scale-float (float -4550563774532357 1.0d0) -213)
+ (scale-float (float 5859507380076544 1.0d0) -267))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5959768257226944 1.0d0) -51)
+ (scale-float (float -8966231485159654 1.0d0) -106)
+ (scale-float (float -8496750378350004 1.0d0) -163)
+ (scale-float (float -8228487213979660 1.0d0) -219)
+ (scale-float (float 8693995341348864 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5987531509672923 1.0d0) -51)
+ (scale-float (float -8200523790316435 1.0d0) -105)
+ (scale-float (float -6139567409839826 1.0d0) -159)
+ (scale-float (float 7752101045204105 1.0d0) -213)
+ (scale-float (float 8322997041922048 1.0d0) -267))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6015522174276536 1.0d0) -51)
+ (scale-float (float 7704789553074064 1.0d0) -105)
+ (scale-float (float 8433852368244117 1.0d0) -160)
+ (scale-float (float -5880951381872453 1.0d0) -216)
+ (scale-float (float -8171171564093440 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6043743190028794 1.0d0) -51)
+ (scale-float (float 6036921086851920 1.0d0) -106)
+ (scale-float (float 8234051011137247 1.0d0) -160)
+ (scale-float (float 7961946375210463 1.0d0) -216)
+ (scale-float (float 8171679322865664 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6072197546680035 1.0d0) -51)
+ (scale-float (float 5999656390687878 1.0d0) -106)
+ (scale-float (float -7514478823367291 1.0d0) -160)
+ (scale-float (float 6342307269558875 1.0d0) -214)
+ (scale-float (float 8069490120851456 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6100888285841033 1.0d0) -51)
+ (scale-float (float -4931531872331797 1.0d0) -105)
+ (scale-float (float 8176120358632703 1.0d0) -162)
+ (scale-float (float 6767487229773799 1.0d0) -218)
+ (scale-float (float 5146916243898368 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6129818502112884 1.0d0) -51)
+ (scale-float (float 5383189178707556 1.0d0) -106)
+ (scale-float (float 6675907096834086 1.0d0) -160)
+ (scale-float (float 7978880489338739 1.0d0) -215)
+ (scale-float (float 7638307093086208 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6158991344246570 1.0d0) -51)
+ (scale-float (float -8090362650898998 1.0d0) -105)
+ (scale-float (float 5369267238238968 1.0d0) -162)
+ (scale-float (float -6523759782169303 1.0d0) -217)
+ (scale-float (float 6051015543357440 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6188410016333092 1.0d0) -51)
+ (scale-float (float 4724236536359861 1.0d0) -105)
+ (scale-float (float 7059357165123802 1.0d0) -159)
+ (scale-float (float 5221739416005693 1.0d0) -216)
+ (scale-float (float 6826684288073728 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6218077779025146 1.0d0) -51)
+ (scale-float (float -6251944745414709 1.0d0) -108)
+ (scale-float (float 5123854585938166 1.0d0) -165)
+ (scale-float (float 7116456554960860 1.0d0) -219)
+ (scale-float (float 4530221452099584 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6247997950791287 1.0d0) -51)
+ (scale-float (float 5439552468708916 1.0d0) -106)
+ (scale-float (float -8882280559834756 1.0d0) -162)
+ (scale-float (float -8272987149381948 1.0d0) -217)
+ (scale-float (float 6571692570181632 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6278173909203627 1.0d0) -51)
+ (scale-float (float -6901727922723381 1.0d0) -105)
+ (scale-float (float -4986394678511562 1.0d0) -161)
+ (scale-float (float 6547555955038370 1.0d0) -218)
+ (scale-float (float -6640540286976000 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6308609092260090 1.0d0) -51)
+ (scale-float (float -8837928786541953 1.0d0) -105)
+ (scale-float (float -6613274258861481 1.0d0) -162)
+ (scale-float (float 8688491329006199 1.0d0) -217)
+ (scale-float (float 4504378864697344 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6339306999742332 1.0d0) -51)
+ (scale-float (float -8288843741059024 1.0d0) -106)
+ (scale-float (float 6350533170553388 1.0d0) -161)
+ (scale-float (float -8360560479621588 1.0d0) -218)
+ (scale-float (float 8364079593816064 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6370271194610440 1.0d0) -51)
+ (scale-float (float -6518155099083777 1.0d0) -105)
+ (scale-float (float -6038417189504289 1.0d0) -160)
+ (scale-float (float -7128785879668580 1.0d0) -216)
+ (scale-float (float 8412241397809152 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6401505304435580 1.0d0) -51)
+ (scale-float (float -4999195251707746 1.0d0) -110)
+ (scale-float (float 8038539748005316 1.0d0) -165)
+ (scale-float (float -8036607354636888 1.0d0) -220)
+ (scale-float (float -5376154848460800 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6433013022871812 1.0d0) -51)
+ (scale-float (float -7626852145047280 1.0d0) -106)
+ (scale-float (float 7459985134696886 1.0d0) -160)
+ (scale-float (float -5159078215081610 1.0d0) -216)
+ (scale-float (float 8560462123237376 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6464798111168313 1.0d0) -51)
+ (scale-float (float 7501040285603475 1.0d0) -106)
+ (scale-float (float 8018324288738598 1.0d0) -162)
+ (scale-float (float -6342949296724604 1.0d0) -216)
+ (scale-float (float -5096051963068416 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6496864399723325 1.0d0) -51)
+ (scale-float (float 7876185139232344 1.0d0) -106)
+ (scale-float (float -7609778355197976 1.0d0) -160)
+ (scale-float (float 5093494223218626 1.0d0) -214)
+ (scale-float (float 7184254992711680 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6529215789681160 1.0d0) -51)
+ (scale-float (float 6729802859343160 1.0d0) -105)
+ (scale-float (float 7796110258450682 1.0d0) -159)
+ (scale-float (float -5202284202884131 1.0d0) -214)
+ (scale-float (float 8914430446239744 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6561856254573676 1.0d0) -51)
+ (scale-float (float -5190654407787621 1.0d0) -105)
+ (scale-float (float -7263540477816891 1.0d0) -160)
+ (scale-float (float 7779826172741251 1.0d0) -215)
+ (scale-float (float 7870240966180864 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6594789842007661 1.0d0) -51)
+ (scale-float (float -7238221634569465 1.0d0) -106)
+ (scale-float (float -5053155242950983 1.0d0) -160)
+ (scale-float (float -5036373716517053 1.0d0) -215)
+ (scale-float (float -6671479789518848 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6628020675399646 1.0d0) -51)
+ (scale-float (float 5924348315271874 1.0d0) -105)
+ (scale-float (float 8366492207957549 1.0d0) -160)
+ (scale-float (float -5646892803276892 1.0d0) -215)
+ (scale-float (float 5359968125452288 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6661552955759695 1.0d0) -51)
+ (scale-float (float 6701751515766405 1.0d0) -105)
+ (scale-float (float -7926847899386801 1.0d0) -159)
+ (scale-float (float 5978713910654175 1.0d0) -213)
+ (scale-float (float 8874255562604544 1.0d0) -267))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6695390963525798 1.0d0) -51)
+ (scale-float (float 8105704162424153 1.0d0) -105)
+ (scale-float (float 8988375981610543 1.0d0) -160)
+ (scale-float (float 6383754624949512 1.0d0) -216)
+ (scale-float (float 6485553458053120 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6729539060450555 1.0d0) -51)
+ (scale-float (float 7916080741383838 1.0d0) -106)
+ (scale-float (float -7752970711675811 1.0d0) -161)
+ (scale-float (float 5901656818334949 1.0d0) -216)
+ (scale-float (float 7648927773884416 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6764001691541890 1.0d0) -51)
+ (scale-float (float -6553353190768230 1.0d0) -106)
+ (scale-float (float -5081751237339140 1.0d0) -162)
+ (scale-float (float 8176295913786153 1.0d0) -218)
+ (scale-float (float 8613530542538752 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6798783387059614 1.0d0) -51)
+ (scale-float (float -7929472031966393 1.0d0) -108)
+ (scale-float (float -4911422655204277 1.0d0) -162)
+ (scale-float (float 8955618777007174 1.0d0) -218)
+ (scale-float (float 7706521824133120 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6833888764569722 1.0d0) -51)
+ (scale-float (float -5292870815099165 1.0d0) -105)
+ (scale-float (float -5836714772574762 1.0d0) -159)
+ (scale-float (float -8180593236381880 1.0d0) -215)
+ (scale-float (float -6553879517200384 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6869322531058373 1.0d0) -51)
+ (scale-float (float 8127118399568990 1.0d0) -106)
+ (scale-float (float 5676352161425082 1.0d0) -160)
+ (scale-float (float -4514481077430716 1.0d0) -215)
+ (scale-float (float 6990784986873856 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6905089485107600 1.0d0) -51)
+ (scale-float (float 7941854388440301 1.0d0) -106)
+ (scale-float (float -6274378359705686 1.0d0) -163)
+ (scale-float (float -7730400902250684 1.0d0) -217)
+ (scale-float (float 5701128951169024 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6941194519134846 1.0d0) -51)
+ (scale-float (float 4921493231476445 1.0d0) -105)
+ (scale-float (float -7743466396743664 1.0d0) -159)
+ (scale-float (float 7307110042968542 1.0d0) -213)
+ (scale-float (float 8389575235633152 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6977642621698538 1.0d0) -51)
+ (scale-float (float -7423923522575052 1.0d0) -105)
+ (scale-float (float 7641940602421304 1.0d0) -159)
+ (scale-float (float 4629250081403575 1.0d0) -213)
+ (scale-float (float 6675849887367168 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7014438879871967 1.0d0) -51)
+ (scale-float (float -8394404652697775 1.0d0) -106)
+ (scale-float (float 7157644467169002 1.0d0) -160)
+ (scale-float (float -5820640180691281 1.0d0) -215)
+ (scale-float (float -8467445117943808 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7051588481687863 1.0d0) -51)
+ (scale-float (float -8415612935486841 1.0d0) -106)
+ (scale-float (float 5862178941276274 1.0d0) -161)
+ (scale-float (float 4530747012453627 1.0d0) -216)
+ (scale-float (float 8957285770461184 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7089096718656115 1.0d0) -51)
+ (scale-float (float -8988623810541504 1.0d0) -107)
+ (scale-float (float -6357074361166835 1.0d0) -162)
+ (scale-float (float 6154496251865445 1.0d0) -218)
+ (scale-float (float 6200049233035264 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7126968988357218 1.0d0) -51)
+ (scale-float (float -8480961676313264 1.0d0) -105)
+ (scale-float (float -7712442745791269 1.0d0) -159)
+ (scale-float (float -5239543786013774 1.0d0) -214)
+ (scale-float (float 7045658681016320 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7165210797114106 1.0d0) -51)
+ (scale-float (float 7700568231823572 1.0d0) -106)
+ (scale-float (float -7406054564472367 1.0d0) -160)
+ (scale-float (float -7358469173914418 1.0d0) -216)
+ (scale-float (float -7519544786288640 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7203827762745163 1.0d0) -51)
+ (scale-float (float -8935949083937952 1.0d0) -107)
+ (scale-float (float -8153920744736936 1.0d0) -161)
+ (scale-float (float 8688621902745907 1.0d0) -215)
+ (scale-float (float 4583263766577152 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7242825617401282 1.0d0) -51)
+ (scale-float (float 6857587878618236 1.0d0) -105)
+ (scale-float (float -4981355659199376 1.0d0) -160)
+ (scale-float (float 6874045785122838 1.0d0) -215)
+ (scale-float (float -6376800195051520 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7282210210490010 1.0d0) -51)
+ (scale-float (float -4738430057508652 1.0d0) -106)
+ (scale-float (float 8833475258022985 1.0d0) -161)
+ (scale-float (float 4981030870780250 1.0d0) -215)
+ (scale-float (float -5347870285758464 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7321987511689883 1.0d0) -51)
+ (scale-float (float -5857178150935811 1.0d0) -105)
+ (scale-float (float -6265551417104925 1.0d0) -161)
+ (scale-float (float 6844897857731275 1.0d0) -216)
+ (scale-float (float -5694651358314496 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7362163614058240 1.0d0) -51)
+ (scale-float (float 6783085541279102 1.0d0) -109)
+ (scale-float (float 7859549562576587 1.0d0) -166)
+ (scale-float (float -6321137675554510 1.0d0) -220)
+ (scale-float (float 6151580868935680 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7402744737235899 1.0d0) -51)
+ (scale-float (float 5826661825513513 1.0d0) -105)
+ (scale-float (float 4722787450303004 1.0d0) -159)
+ (scale-float (float 8889379743214574 1.0d0) -213)
+ (scale-float (float -5671615219236864 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7443737230752240 1.0d0) -51)
+ (scale-float (float -8261179564339104 1.0d0) -107)
+ (scale-float (float -5210150822761837 1.0d0) -162)
+ (scale-float (float 8435610505367672 1.0d0) -217)
+ (scale-float (float -6921801066479616 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7485147577434384 1.0d0) -51)
+ (scale-float (float -7746235839321906 1.0d0) -105)
+ (scale-float (float 8921070586273898 1.0d0) -159)
+ (scale-float (float -6923883465895084 1.0d0) -217)
+ (scale-float (float -7992444014297088 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7526982396924318 1.0d0) -51)
+ (scale-float (float -6529692868560719 1.0d0) -105)
+ (scale-float (float -8023969424071208 1.0d0) -159)
+ (scale-float (float 8466342476385449 1.0d0) -213)
+ (scale-float (float -7626166008889344 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7569248449307968 1.0d0) -51)
+ (scale-float (float 4726279542391038 1.0d0) -105)
+ (scale-float (float 6890139958585708 1.0d0) -159)
+ (scale-float (float -8999936867929505 1.0d0) -215)
+ (scale-float (float -4868498977882112 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7611952638860404 1.0d0) -51)
+ (scale-float (float 7399915739935990 1.0d0) -106)
+ (scale-float (float 8589714836764690 1.0d0) -161)
+ (scale-float (float 5977285365407618 1.0d0) -215)
+ (scale-float (float -7428450855813120 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7655102017911529 1.0d0) -51)
+ (scale-float (float 7506410393561631 1.0d0) -105)
+ (scale-float (float -5394245790627243 1.0d0) -159)
+ (scale-float (float -8242751787003902 1.0d0) -213)
+ (scale-float (float 6910160299589632 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7698703790836811 1.0d0) -51)
+ (scale-float (float 5786896408814132 1.0d0) -105)
+ (scale-float (float -4609369708837267 1.0d0) -159)
+ (scale-float (float -4540077709761017 1.0d0) -213)
+ (scale-float (float 8548340121714688 1.0d0) -267))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7742765318177789 1.0d0) -51)
+ (scale-float (float -5596500424293238 1.0d0) -105)
+ (scale-float (float -8063416793361335 1.0d0) -160)
+ (scale-float (float -7995889815279433 1.0d0) -215)
+ (scale-float (float 7770624799277056 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7787294120897310 1.0d0) -51)
+ (scale-float (float -6772199196047746 1.0d0) -106)
+ (scale-float (float -6731960923186983 1.0d0) -160)
+ (scale-float (float 4674597293263062 1.0d0) -215)
+ (scale-float (float 7139922087641088 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7832297884774669 1.0d0) -51)
+ (scale-float (float -5048038496396898 1.0d0) -105)
+ (scale-float (float 8940524654060071 1.0d0) -161)
+ (scale-float (float -6783618196883706 1.0d0) -215)
+ (scale-float (float 6637776996073472 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7877784464946035 1.0d0) -51)
+ (scale-float (float -5559913482652101 1.0d0) -108)
+ (scale-float (float 4867247987272535 1.0d0) -164)
+ (scale-float (float -6631941685441833 1.0d0) -220)
+ (scale-float (float -5317690890649600 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7923761890595812 1.0d0) -51)
+ (scale-float (float -7251158095886052 1.0d0) -105)
+ (scale-float (float -8753078656369743 1.0d0) -159)
+ (scale-float (float 5967633169533952 1.0d0) -213)
+ (scale-float (float -6325817437396992 1.0d0) -267))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7970238369804807 1.0d0) -51)
+ (scale-float (float 6771427195132246 1.0d0) -106)
+ (scale-float (float -7472855250253256 1.0d0) -160)
+ (scale-float (float -6261510490372424 1.0d0) -216)
+ (scale-float (float -7294060512280576 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8017222294561371 1.0d0) -51)
+ (scale-float (float 6188152956309083 1.0d0) -105)
+ (scale-float (float 8264282418128883 1.0d0) -161)
+ (scale-float (float 7128645473169422 1.0d0) -215)
+ (scale-float (float -5771677092806656 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8064722245941921 1.0d0) -51)
+ (scale-float (float -7696383312935042 1.0d0) -105)
+ (scale-float (float 7360946333214011 1.0d0) -160)
+ (scale-float (float 7285082360734910 1.0d0) -215)
+ (scale-float (float 8542445019725824 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8112746999467572 1.0d0) -51)
+ (scale-float (float 8187173324919323 1.0d0) -105)
+ (scale-float (float -8256765008873559 1.0d0) -159)
+ (scale-float (float -5849118320319961 1.0d0) -215)
+ (scale-float (float -5713132093308928 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8161305530643912 1.0d0) -51)
+ (scale-float (float 7190559810930833 1.0d0) -105)
+ (scale-float (float 8945174339794752 1.0d0) -160)
+ (scale-float (float -7822736574898218 1.0d0) -215)
+ (scale-float (float 6714336152485888 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8210407020691239 1.0d0) -51)
+ (scale-float (float 5282090276356495 1.0d0) -105)
+ (scale-float (float -8017162570747744 1.0d0) -159)
+ (scale-float (float -7255588291118389 1.0d0) -215)
+ (scale-float (float 7181169832034304 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8260060862472975 1.0d0) -51)
+ (scale-float (float 7672975741940125 1.0d0) -108)
+ (scale-float (float 4654982596957853 1.0d0) -163)
+ (scale-float (float 8458457888958846 1.0d0) -218)
+ (scale-float (float -7397705978478592 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8310276666630280 1.0d0) -51)
+ (scale-float (float -8561057823978051 1.0d0) -105)
+ (scale-float (float 8987823333616882 1.0d0) -159)
+ (scale-float (float 8483536639603670 1.0d0) -213)
+ (scale-float (float -6640518556999680 1.0d0) -267))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8361064267931287 1.0d0) -51)
+ (scale-float (float 4875936485634582 1.0d0) -105)
+ (scale-float (float 6474614473850059 1.0d0) -164)
+ (scale-float (float 5402310386390347 1.0d0) -218)
+ (scale-float (float -7259309102596096 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8412433731843778 1.0d0) -51)
+ (scale-float (float -5304292491435615 1.0d0) -105)
+ (scale-float (float 5222297456002257 1.0d0) -160)
+ (scale-float (float -4626527544205458 1.0d0) -215)
+ (scale-float (float 7731223709941760 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8464395361340506 1.0d0) -51)
+ (scale-float (float -6318490403494006 1.0d0) -107)
+ (scale-float (float -4947313154358635 1.0d0) -163)
+ (scale-float (float -8365986417657694 1.0d0) -217)
+ (scale-float (float 9003226564132864 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8516959703946860 1.0d0) -51)
+ (scale-float (float -7740837529246338 1.0d0) -105)
+ (scale-float (float -7327369189732175 1.0d0) -159)
+ (scale-float (float 8456165783067005 1.0d0) -213)
+ (scale-float (float -7576792096268288 1.0d0) -267))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8570137559040969 1.0d0) -51)
+ (scale-float (float 8192976842046790 1.0d0) -108)
+ (scale-float (float -7518639525906179 1.0d0) -162)
+ (scale-float (float -8976617533136752 1.0d0) -216)
+ (scale-float (float -4574964295925760 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8623939985416884 1.0d0) -51)
+ (scale-float (float 6658592239328841 1.0d0) -105)
+ (scale-float (float -5419939435203819 1.0d0) -160)
+ (scale-float (float -7495812436628397 1.0d0) -216)
+ (scale-float (float 5834452430880768 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8678378309121946 1.0d0) -51)
+ (scale-float (float -7864870860087257 1.0d0) -105)
+ (scale-float (float -4803742861282819 1.0d0) -159)
+ (scale-float (float -5120356770415822 1.0d0) -220)
+ (scale-float (float 6396238970748928 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8733464131580015 1.0d0) -51)
+ (scale-float (float -8808454025372720 1.0d0) -105)
+ (scale-float (float -4904442800084773 1.0d0) -162)
+ (scale-float (float 6143491931581079 1.0d0) -218)
+ (scale-float (float 8919004198469632 1.0d0) -278))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8789209338012807 1.0d0) -51)
+ (scale-float (float -5406296489369190 1.0d0) -105)
+ (scale-float (float 6460375952085455 1.0d0) -163)
+ (scale-float (float 7672604456401427 1.0d0) -219)
+ (scale-float (float 8577878639771648 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8845626106172164 1.0d0) -51)
+ (scale-float (float 5348045675097815 1.0d0) -105)
+ (scale-float (float -7345645369964838 1.0d0) -164)
+ (scale-float (float -4531525080663575 1.0d0) -219)
+ (scale-float (float 7010501968003072 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8902726915396748 1.0d0) -51)
+ (scale-float (float -6751675042412244 1.0d0) -106)
+ (scale-float (float 6500058370502824 1.0d0) -161)
+ (scale-float (float -4845843510975655 1.0d0) -215)
+ (scale-float (float -8677911690870784 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8960524556007295 1.0d0) -51)
+ (scale-float (float 8343960778596904 1.0d0) -105)
+ (scale-float (float 6251044459645375 1.0d0) -159)
+ (scale-float (float -6706021169010735 1.0d0) -213)
+ (scale-float (float 5632266774601728 1.0d0) -267))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4509516069527655 1.0d0) -50)
+ (scale-float (float -9003604755548678 1.0d0) -104)
+ (scale-float (float 7945002462861670 1.0d0) -158)
+ (scale-float (float -7137880400680410 1.0d0) -213)
+ (scale-float (float 5016893773414400 1.0d0) -267))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4539131553220387 1.0d0) -50)
+ (scale-float (float 6761206752834757 1.0d0) -104)
+ (scale-float (float 5133846886632951 1.0d0) -158)
+ (scale-float (float 8962299467741687 1.0d0) -214)
+ (scale-float (float 4621111823237120 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4569115620707661 1.0d0) -50)
+ (scale-float (float -5153202329852192 1.0d0) -104)
+ (scale-float (float -6471403712483476 1.0d0) -164)
+ (scale-float (float -7023121165220965 1.0d0) -218)
+ (scale-float (float -8756051585794048 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4599475339744027 1.0d0) -50)
+ (scale-float (float 6345979468902371 1.0d0) -104)
+ (scale-float (float -6867564541453276 1.0d0) -159)
+ (scale-float (float 6432872785199118 1.0d0) -213)
+ (scale-float (float 7581670466650112 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4630217959876098 1.0d0) -50)
+ (scale-float (float -4783933892416316 1.0d0) -104)
+ (scale-float (float -5954579217658060 1.0d0) -158)
+ (scale-float (float -7711445062385882 1.0d0) -212)
+ (scale-float (float -6352239898648576 1.0d0) -266))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4661350918325794 1.0d0) -50)
+ (scale-float (float -6230918561515408 1.0d0) -104)
+ (scale-float (float -8789780586633317 1.0d0) -161)
+ (scale-float (float 6462073266128705 1.0d0) -218)
+ (scale-float (float -7636234883563520 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4692881846103566 1.0d0) -50)
+ (scale-float (float 7238083593817055 1.0d0) -105)
+ (scale-float (float 8349670734560448 1.0d0) -159)
+ (scale-float (float 5733681666817907 1.0d0) -213)
+ (scale-float (float -7346060120997888 1.0d0) -267))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4724818574362134 1.0d0) -50)
+ (scale-float (float -6385143788279820 1.0d0) -104)
+ (scale-float (float 5022122131678795 1.0d0) -160)
+ (scale-float (float 8740656214833543 1.0d0) -215)
+ (scale-float (float 6341627965997056 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4757169141001852 1.0d0) -50)
+ (scale-float (float 7149429343620709 1.0d0) -104)
+ (scale-float (float -6616931038813688 1.0d0) -159)
+ (scale-float (float -7254808900455180 1.0d0) -214)
+ (scale-float (float 5191649247428608 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4789941797539425 1.0d0) -50)
+ (scale-float (float -7628787545294423 1.0d0) -106)
+ (scale-float (float 6455017983769130 1.0d0) -161)
+ (scale-float (float 6358316267805699 1.0d0) -215)
+ (scale-float (float -9002454314319872 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4823145016252275 1.0d0) -50)
+ (scale-float (float -7334035373116727 1.0d0) -104)
+ (scale-float (float 5099180732128586 1.0d0) -160)
+ (scale-float (float -5173345489809667 1.0d0) -215)
+ (scale-float (float -6540352120684544 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4856787497611582 1.0d0) -50)
+ (scale-float (float 8156218527095231 1.0d0) -104)
+ (scale-float (float -8332260027347510 1.0d0) -158)
+ (scale-float (float -7129580887322615 1.0d0) -213)
+ (scale-float (float 5952686945517568 1.0d0) -267))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4890878178017684 1.0d0) -50)
+ (scale-float (float 8461317837993017 1.0d0) -106)
+ (scale-float (float 8701936458636591 1.0d0) -163)
+ (scale-float (float -8356379822678236 1.0d0) -218)
+ (scale-float (float 7422021349146624 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4925426237852275 1.0d0) -50)
+ (scale-float (float 7980128087192890 1.0d0) -107)
+ (scale-float (float 4545289477488823 1.0d0) -161)
+ (scale-float (float -6750115855405710 1.0d0) -215)
+ (scale-float (float 6646581618802688 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4960441109862665 1.0d0) -50)
+ (scale-float (float 5080919491685400 1.0d0) -104)
+ (scale-float (float -8010274743627501 1.0d0) -159)
+ (scale-float (float -7423464212987668 1.0d0) -213)
+ (scale-float (float 5294298645381120 1.0d0) -267))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4995932487894169 1.0d0) -50)
+ (scale-float (float 7940559207040706 1.0d0) -106)
+ (scale-float (float -8788563659638543 1.0d0) -160)
+ (scale-float (float 5010624414890243 1.0d0) -215)
+ (scale-float (float 8018235342585856 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5031910335987612 1.0d0) -50)
+ (scale-float (float 4513077542546340 1.0d0) -105)
+ (scale-float (float -6401484556862434 1.0d0) -159)
+ (scale-float (float -6359957998872694 1.0d0) -218)
+ (scale-float (float -6959123998441472 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5068384897859891 1.0d0) -50)
+ (scale-float (float -8946762494427943 1.0d0) -108)
+ (scale-float (float 8559804099710120 1.0d0) -163)
+ (scale-float (float -6400264802268333 1.0d0) -218)
+ (scale-float (float 6703336401141760 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5105366706786536 1.0d0) -50)
+ (scale-float (float -8283733376201077 1.0d0) -104)
+ (scale-float (float -8807764976477015 1.0d0) -158)
+ (scale-float (float 8803214751938296 1.0d0) -212)
+ (scale-float (float 4599362420514816 1.0d0) -266))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5142866595906302 1.0d0) -50)
+ (scale-float (float 7331094116337834 1.0d0) -105)
+ (scale-float (float 4863000065712877 1.0d0) -159)
+ (scale-float (float -5277204497363467 1.0d0) -213)
+ (scale-float (float 8031190002630656 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5180895708968975 1.0d0) -50)
+ (scale-float (float 6807362163125418 1.0d0) -105)
+ (scale-float (float -6119748019175263 1.0d0) -159)
+ (scale-float (float -7378083528827103 1.0d0) -217)
+ (scale-float (float -4588861610786816 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5219465511548777 1.0d0) -50)
+ (scale-float (float -7260518796981983 1.0d0) -104)
+ (scale-float (float 6598583475956675 1.0d0) -159)
+ (scale-float (float 6173825293514267 1.0d0) -213)
+ (scale-float (float -6262313850830848 1.0d0) -267))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5258587802747089 1.0d0) -50)
+ (scale-float (float -5051042201835522 1.0d0) -104)
+ (scale-float (float 8025745141563703 1.0d0) -159)
+ (scale-float (float 7729194583210239 1.0d0) -213)
+ (scale-float (float -4703692156764160 1.0d0) -267))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5298274727409582 1.0d0) -50)
+ (scale-float (float -6885866100053312 1.0d0) -104)
+ (scale-float (float 4912213142221467 1.0d0) -161)
+ (scale-float (float 5995405784532706 1.0d0) -215)
+ (scale-float (float 7609428393852928 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5338538788884320 1.0d0) -50)
+ (scale-float (float 7124106248024052 1.0d0) -104)
+ (scale-float (float 8533119225005958 1.0d0) -158)
+ (scale-float (float -7645730062438869 1.0d0) -214)
+ (scale-float (float 5138065259790336 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5379392862349007 1.0d0) -50)
+ (scale-float (float 8975559828220188 1.0d0) -105)
+ (scale-float (float -8000242586721298 1.0d0) -161)
+ (scale-float (float 5320081746222626 1.0d0) -215)
+ (scale-float (float -5970429177888768 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5420850208737201 1.0d0) -50)
+ (scale-float (float -7849481048430194 1.0d0) -104)
+ (scale-float (float -6921638314359172 1.0d0) -161)
+ (scale-float (float 5596441475613145 1.0d0) -216)
+ (scale-float (float 8471223942381568 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5462924489295155 1.0d0) -50)
+ (scale-float (float 4714356898291527 1.0d0) -105)
+ (scale-float (float 4603898149283534 1.0d0) -160)
+ (scale-float (float 4597813234259312 1.0d0) -215)
+ (scale-float (float 8365094230687744 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5505629780802853 1.0d0) -50)
+ (scale-float (float -6087459928275142 1.0d0) -104)
+ (scale-float (float 6592072064442311 1.0d0) -160)
+ (scale-float (float -8897432989678575 1.0d0) -214)
+ (scale-float (float 5101552066691072 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5548980591494850 1.0d0) -50)
+ (scale-float (float -5707243334247258 1.0d0) -104)
+ (scale-float (float -6995571206380477 1.0d0) -158)
+ (scale-float (float 5461085508687361 1.0d0) -212)
+ (scale-float (float 7354597165162496 1.0d0) -266))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5592991877718771 1.0d0) -50)
+ (scale-float (float -8781430034791285 1.0d0) -105)
+ (scale-float (float 5983742883036689 1.0d0) -159)
+ (scale-float (float 7644662357765321 1.0d0) -213)
+ (scale-float (float -8799358646222848 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5637679061371630 1.0d0) -50)
+ (scale-float (float 8044421629298322 1.0d0) -107)
+ (scale-float (float -5673000887721991 1.0d0) -161)
+ (scale-float (float -6237881232938835 1.0d0) -215)
+ (scale-float (float -6198817329119232 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5683058048156686 1.0d0) -50)
+ (scale-float (float -7263779146785172 1.0d0) -104)
+ (scale-float (float 4686896085329360 1.0d0) -159)
+ (scale-float (float 5956979900333602 1.0d0) -216)
+ (scale-float (float -8659439195258880 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5729145246706231 1.0d0) -50)
+ (scale-float (float 6067197939783819 1.0d0) -106)
+ (scale-float (float -6113275667853501 1.0d0) -160)
+ (scale-float (float -5475133526099289 1.0d0) -214)
+ (scale-float (float -4581406569594880 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5775957588618625 1.0d0) -50)
+ (scale-float (float -5506212132642368 1.0d0) -104)
+ (scale-float (float 5647829469965162 1.0d0) -158)
+ (scale-float (float -6190962042647805 1.0d0) -212)
+ (scale-float (float -7408511503663104 1.0d0) -266))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5823512549460958 1.0d0) -50)
+ (scale-float (float -5997253237019681 1.0d0) -104)
+ (scale-float (float 7273679319786539 1.0d0) -158)
+ (scale-float (float 5228415801281666 1.0d0) -213)
+ (scale-float (float -8711245226049536 1.0d0) -267))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5871828170792095 1.0d0) -50)
+ (scale-float (float 5957350573535159 1.0d0) -104)
+ (scale-float (float 5272555883617502 1.0d0) -158)
+ (scale-float (float -8363853222647010 1.0d0) -212)
+ (scale-float (float -8565541235777536 1.0d0) -266))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5920923083264398 1.0d0) -50)
+ (scale-float (float -8009226060728125 1.0d0) -104)
+ (scale-float (float -7453956738005395 1.0d0) -166)
+ (scale-float (float -7653415127803146 1.0d0) -226)
+ (scale-float (float 6961805905625088 1.0d0) -283))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5970816530866265 1.0d0) -50)
+ (scale-float (float -8079446856470941 1.0d0) -105)
+ (scale-float (float -6273627393943648 1.0d0) -159)
+ (scale-float (float -7616333708680386 1.0d0) -216)
+ (scale-float (float -6013067124015104 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6021528396371782 1.0d0) -50)
+ (scale-float (float -7080995246730005 1.0d0) -104)
+ (scale-float (float -8945924732893443 1.0d0) -158)
+ (scale-float (float -6211653151853270 1.0d0) -212)
+ (scale-float (float 7811789019471872 1.0d0) -266))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6073079228068167 1.0d0) -50)
+ (scale-float (float -5392427594304996 1.0d0) -104)
+ (scale-float (float 5300757067870857 1.0d0) -159)
+ (scale-float (float 5793395962721063 1.0d0) -214)
+ (scale-float (float 8162820920999936 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6125490267836511 1.0d0) -50)
+ (scale-float (float 4774401947932446 1.0d0) -106)
+ (scale-float (float -7129275439372922 1.0d0) -160)
+ (scale-float (float -7494642291848786 1.0d0) -214)
+ (scale-float (float -8499571061948416 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6178783480666426 1.0d0) -50)
+ (scale-float (float 5356169124908533 1.0d0) -104)
+ (scale-float (float 7028323928064296 1.0d0) -160)
+ (scale-float (float 6693444124674697 1.0d0) -214)
+ (scale-float (float -5709036984860672 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6232981585690760 1.0d0) -50)
+ (scale-float (float 6866781914069713 1.0d0) -104)
+ (scale-float (float -7587503791107757 1.0d0) -160)
+ (scale-float (float -4673145581771572 1.0d0) -214)
+ (scale-float (float 8934278971195392 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6288108088832506 1.0d0) -50)
+ (scale-float (float 7190963457537114 1.0d0) -104)
+ (scale-float (float -4562520295210538 1.0d0) -159)
+ (scale-float (float -8051267711570381 1.0d0) -214)
+ (scale-float (float 7222608746577920 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6344187317162466 1.0d0) -50)
+ (scale-float (float 4646334939076787 1.0d0) -105)
+ (scale-float (float 8517674821997212 1.0d0) -159)
+ (scale-float (float -7718028008612148 1.0d0) -214)
+ (scale-float (float 8095968110837760 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6401244455073178 1.0d0) -50)
+ (scale-float (float -6093139364364458 1.0d0) -104)
+ (scale-float (float 7976235787957864 1.0d0) -159)
+ (scale-float (float -8305904134587898 1.0d0) -214)
+ (scale-float (float 8019880670724096 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6459305582382119 1.0d0) -50)
+ (scale-float (float 5211484139752645 1.0d0) -108)
+ (scale-float (float -8516312389442720 1.0d0) -162)
+ (scale-float (float -5565127845070822 1.0d0) -217)
+ (scale-float (float 5023425659142144 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6518397714485308 1.0d0) -50)
+ (scale-float (float 8223187886465529 1.0d0) -105)
+ (scale-float (float -7795333996363344 1.0d0) -159)
+ (scale-float (float 6662723477951573 1.0d0) -216)
+ (scale-float (float 5201082628177920 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6578548844691189 1.0d0) -50)
+ (scale-float (float 8893169591734547 1.0d0) -105)
+ (scale-float (float -7031360776797826 1.0d0) -160)
+ (scale-float (float 5922695038479521 1.0d0) -215)
+ (scale-float (float -7470986667032576 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6639787988874183 1.0d0) -50)
+ (scale-float (float -5325591017587098 1.0d0) -104)
+ (scale-float (float 8967602844480112 1.0d0) -159)
+ (scale-float (float -8714067795155232 1.0d0) -213)
+ (scale-float (float 5877125710118912 1.0d0) -267))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6702145232597557 1.0d0) -50)
+ (scale-float (float 5264145955760929 1.0d0) -104)
+ (scale-float (float 7640899328253249 1.0d0) -159)
+ (scale-float (float -8199995818174760 1.0d0) -215)
+ (scale-float (float 8372776688418816 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6765651780866415 1.0d0) -50)
+ (scale-float (float -8913235774755133 1.0d0) -105)
+ (scale-float (float -5554680047721704 1.0d0) -160)
+ (scale-float (float -7100192152346767 1.0d0) -214)
+ (scale-float (float 6795542541828096 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6830340010683660 1.0d0) -50)
+ (scale-float (float -7544935405342396 1.0d0) -105)
+ (scale-float (float -6399750548309840 1.0d0) -159)
+ (scale-float (float -6988744419126524 1.0d0) -215)
+ (scale-float (float 8766191769550848 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6896243526594935 1.0d0) -50)
+ (scale-float (float -7148639483444579 1.0d0) -107)
+ (scale-float (float -8149774421085479 1.0d0) -161)
+ (scale-float (float 5130992766398235 1.0d0) -215)
+ (scale-float (float -5116684355698688 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6963397219422738 1.0d0) -50)
+ (scale-float (float 7396017975628843 1.0d0) -105)
+ (scale-float (float 4659666528264719 1.0d0) -159)
+ (scale-float (float 7909377268086313 1.0d0) -213)
+ (scale-float (float 8146787725246464 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7031837328405417 1.0d0) -50)
+ (scale-float (float -8006852264312669 1.0d0) -105)
+ (scale-float (float 6782117170365220 1.0d0) -161)
+ (scale-float (float -4909543439238427 1.0d0) -215)
+ (scale-float (float -5806298951581696 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7101601506973565 1.0d0) -50)
+ (scale-float (float 5826779434692280 1.0d0) -104)
+ (scale-float (float 6406262179461154 1.0d0) -158)
+ (scale-float (float 6007871089946416 1.0d0) -215)
+ (scale-float (float -8691942719356928 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7172728892414684 1.0d0) -50)
+ (scale-float (float -6937304740477504 1.0d0) -107)
+ (scale-float (float -8747270011599983 1.0d0) -161)
+ (scale-float (float 6032524114605738 1.0d0) -215)
+ (scale-float (float -8745824089931776 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7245260179696920 1.0d0) -50)
+ (scale-float (float 5505512966988164 1.0d0) -105)
+ (scale-float (float 4602729397488698 1.0d0) -161)
+ (scale-float (float -6136009817960466 1.0d0) -217)
+ (scale-float (float -5825495560093696 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7319237699744493 1.0d0) -50)
+ (scale-float (float 8938591627744486 1.0d0) -104)
+ (scale-float (float 5137813009951706 1.0d0) -158)
+ (scale-float (float -5222551765081983 1.0d0) -214)
+ (scale-float (float -5500828197879808 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7394705502481166 1.0d0) -50)
+ (scale-float (float 6273553706884387 1.0d0) -104)
+ (scale-float (float 8110555903967408 1.0d0) -159)
+ (scale-float (float 8908218331107434 1.0d0) -213)
+ (scale-float (float -8281934740062208 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7471709444984082 1.0d0) -50)
+ (scale-float (float -5155046318705374 1.0d0) -105)
+ (scale-float (float 6556986573868921 1.0d0) -159)
+ (scale-float (float -4960102419053278 1.0d0) -213)
+ (scale-float (float 8664687655157760 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7550297285118669 1.0d0) -50)
+ (scale-float (float 7617874065699057 1.0d0) -104)
+ (scale-float (float 4961086954657293 1.0d0) -159)
+ (scale-float (float 7432056804278926 1.0d0) -213)
+ (scale-float (float 6917374136549376 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7630518781056371 1.0d0) -50)
+ (scale-float (float 5301031645230804 1.0d0) -104)
+ (scale-float (float -8119220284264542 1.0d0) -160)
+ (scale-float (float -8238087539836651 1.0d0) -218)
+ (scale-float (float 7776125884825600 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7712425797110955 1.0d0) -50)
+ (scale-float (float -6741605625235801 1.0d0) -105)
+ (scale-float (float -8788195794477204 1.0d0) -159)
+ (scale-float (float 7554609254589351 1.0d0) -213)
+ (scale-float (float 6754471120355328 1.0d0) -267))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7796072416366460 1.0d0) -50)
+ (scale-float (float -8912523774339987 1.0d0) -104)
+ (scale-float (float -8231801775931605 1.0d0) -158)
+ (scale-float (float -4509771050087843 1.0d0) -212)
+ (scale-float (float 6212874764648448 1.0d0) -266))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7881515060610741 1.0d0) -50)
+ (scale-float (float -7662752326772993 1.0d0) -104)
+ (scale-float (float 5422413957750496 1.0d0) -158)
+ (scale-float (float -5247214196928082 1.0d0) -212)
+ (scale-float (float 8897340597370880 1.0d0) -267))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7968812618133507 1.0d0) -50)
+ (scale-float (float -8690745111413352 1.0d0) -106)
+ (scale-float (float -5070297855945954 1.0d0) -161)
+ (scale-float (float 5011223573063584 1.0d0) -215)
+ (scale-float (float 5484221615046656 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8058026579997157 1.0d0) -50)
+ (scale-float (float -5799300632893689 1.0d0) -105)
+ (scale-float (float 4911693704369311 1.0d0) -160)
+ (scale-float (float -8241752725090557 1.0d0) -215)
+ (scale-float (float -5811887269871616 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8149221185443089 1.0d0) -50)
+ (scale-float (float 7236168019193906 1.0d0) -105)
+ (scale-float (float 4880150367504926 1.0d0) -163)
+ (scale-float (float 8916822026084376 1.0d0) -218)
+ (scale-float (float 5344730264109056 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8242463577156069 1.0d0) -50)
+ (scale-float (float -7208174039158474 1.0d0) -104)
+ (scale-float (float 7795541116359725 1.0d0) -158)
+ (scale-float (float -4744137578684666 1.0d0) -214)
+ (scale-float (float 5303422404493312 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8337823967175290 1.0d0) -50)
+ (scale-float (float 5331571890223087 1.0d0) -104)
+ (scale-float (float 4881285596339492 1.0d0) -158)
+ (scale-float (float -6541107768153204 1.0d0) -212)
+ (scale-float (float 4850096471277568 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8435375814313727 1.0d0) -50)
+ (scale-float (float -5757153765992658 1.0d0) -104)
+ (scale-float (float 5440650508947094 1.0d0) -164)
+ (scale-float (float -8756947201213414 1.0d0) -218)
+ (scale-float (float 4879855918776320 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8535196014027954 1.0d0) -50)
+ (scale-float (float 8617387516478510 1.0d0) -107)
+ (scale-float (float 8431382276020886 1.0d0) -161)
+ (scale-float (float -4886791056731775 1.0d0) -215)
+ (scale-float (float 5579390982815744 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8637365101769860 1.0d0) -50)
+ (scale-float (float 8112170130397787 1.0d0) -104)
+ (scale-float (float -8956973775390259 1.0d0) -158)
+ (scale-float (float 8970707967871852 1.0d0) -212)
+ (scale-float (float 5647793587208192 1.0d0) -266))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8741967470950452 1.0d0) -50)
+ (scale-float (float -6831554652578395 1.0d0) -107)
+ (scale-float (float 7641134967616575 1.0d0) -162)
+ (scale-float (float 5651180505028809 1.0d0) -218)
+ (scale-float (float -6387803828518912 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8849091606755572 1.0d0) -50)
+ (scale-float (float 4758656213153565 1.0d0) -105)
+ (scale-float (float -5690456565345044 1.0d0) -159)
+ (scale-float (float -7009017492084972 1.0d0) -213)
+ (scale-float (float 8143087915859968 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8958830337175048 1.0d0) -50)
+ (scale-float (float 7309639546811719 1.0d0) -104)
+ (scale-float (float 4800127698185496 1.0d0) -158)
+ (scale-float (float -8041242634087653 1.0d0) -215)
+ (scale-float (float 5310427710160896 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4535640551371043 1.0d0) -49)
+ (scale-float (float -7429371617097656 1.0d0) -103)
+ (scale-float (float 7984568245625428 1.0d0) -158)
+ (scale-float (float 8110604419811823 1.0d0) -212)
+ (scale-float (float 6459589963186176 1.0d0) -267))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4593273123315173 1.0d0) -49)
+ (scale-float (float 7344759777308876 1.0d0) -103)
+ (scale-float (float 7427405341850773 1.0d0) -158)
+ (scale-float (float 4534037897269679 1.0d0) -212)
+ (scale-float (float -6667964232040448 1.0d0) -266))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4652366663462033 1.0d0) -49)
+ (scale-float (float -5625792712831262 1.0d0) -106)
+ (scale-float (float 7759814966345836 1.0d0) -161)
+ (scale-float (float -5588953527356031 1.0d0) -221)
+ (scale-float (float -5010264235704320 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4712977726531951 1.0d0) -49)
+ (scale-float (float -5824862483757728 1.0d0) -104)
+ (scale-float (float -7116304334852026 1.0d0) -159)
+ (scale-float (float 6068586426395698 1.0d0) -214)
+ (scale-float (float 5947502962278400 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4775165824340354 1.0d0) -49)
+ (scale-float (float 8578118347290259 1.0d0) -104)
+ (scale-float (float -8539408092634281 1.0d0) -158)
+ (scale-float (float -8136097540214513 1.0d0) -213)
+ (scale-float (float 7101253718966272 1.0d0) -267))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4838993621631888 1.0d0) -49)
+ (scale-float (float 5431923598923991 1.0d0) -107)
+ (scale-float (float -8863305299629456 1.0d0) -163)
+ (scale-float (float -8578810774201095 1.0d0) -217)
+ (scale-float (float -6675154591547392 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4904527147686410 1.0d0) -49)
+ (scale-float (float 6580824825190128 1.0d0) -105)
+ (scale-float (float -6932785482804364 1.0d0) -165)
+ (scale-float (float -8179587096652383 1.0d0) -220)
+ (scale-float (float -4830927272280064 1.0d0) -279))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4971836025198946 1.0d0) -49)
+ (scale-float (float -8741658251100691 1.0d0) -103)
+ (scale-float (float 4745945483870918 1.0d0) -158)
+ (scale-float (float -8704137713945563 1.0d0) -213)
+ (scale-float (float 7513207542513664 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5040993718101430 1.0d0) -49)
+ (scale-float (float -7447025110024789 1.0d0) -104)
+ (scale-float (float 7782867446190702 1.0d0) -158)
+ (scale-float (float 6249534934213357 1.0d0) -214)
+ (scale-float (float 6260091792392192 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5112077800180682 1.0d0) -49)
+ (scale-float (float 4932763833495494 1.0d0) -103)
+ (scale-float (float 5752215372279352 1.0d0) -157)
+ (scale-float (float -5867910486697977 1.0d0) -212)
+ (scale-float (float -7613663408652288 1.0d0) -266))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5185170246557484 1.0d0) -49)
+ (scale-float (float -8013709889359600 1.0d0) -103)
+ (scale-float (float 6164738275564263 1.0d0) -157)
+ (scale-float (float -5814787066030532 1.0d0) -211)
+ (scale-float (float 6551694612168704 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5260357750329314 1.0d0) -49)
+ (scale-float (float 5340039035203828 1.0d0) -104)
+ (scale-float (float 5675644366822888 1.0d0) -159)
+ (scale-float (float 5921907735738175 1.0d0) -214)
+ (scale-float (float 8373452026740736 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5337732066948223 1.0d0) -49)
+ (scale-float (float 7560216755718676 1.0d0) -103)
+ (scale-float (float 6293406804211504 1.0d0) -158)
+ (scale-float (float 5139555634585340 1.0d0) -213)
+ (scale-float (float 4646421337800704 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5417390389210065 1.0d0) -49)
+ (scale-float (float -8064004791001897 1.0d0) -103)
+ (scale-float (float -4958372325892497 1.0d0) -158)
+ (scale-float (float -4856420191257806 1.0d0) -212)
+ (scale-float (float 7637424278208512 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5499435756077345 1.0d0) -49)
+ (scale-float (float -7619601216494792 1.0d0) -103)
+ (scale-float (float -4636288805119536 1.0d0) -158)
+ (scale-float (float -7201129918372980 1.0d0) -213)
+ (scale-float (float 6408835067379712 1.0d0) -267))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5583977498951496 1.0d0) -49)
+ (scale-float (float -6009462689643882 1.0d0) -103)
+ (scale-float (float 5212172999389073 1.0d0) -159)
+ (scale-float (float -6995922963939180 1.0d0) -214)
+ (scale-float (float -6989763241312256 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5671131729458846 1.0d0) -49)
+ (scale-float (float -4601597388793295 1.0d0) -106)
+ (scale-float (float -4902383440568414 1.0d0) -160)
+ (scale-float (float -5061008161385139 1.0d0) -215)
+ (scale-float (float 8263566205779968 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5761021873326603 1.0d0) -49)
+ (scale-float (float 5607741177329363 1.0d0) -103)
+ (scale-float (float -8698470873366949 1.0d0) -160)
+ (scale-float (float -6998957893500646 1.0d0) -216)
+ (scale-float (float -6722393366855680 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5853779255510933 1.0d0) -49)
+ (scale-float (float 8282331001243868 1.0d0) -104)
+ (scale-float (float 5242070954730137 1.0d0) -158)
+ (scale-float (float 5803434507425864 1.0d0) -218)
+ (scale-float (float 5426335165972480 1.0d0) -278))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5949543742410703 1.0d0) -49)
+ (scale-float (float 6809174567780208 1.0d0) -108)
+ (scale-float (float 5506994979834123 1.0d0) -165)
+ (scale-float (float 6092185093726717 1.0d0) -219)
+ (scale-float (float 6176724748337152 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6048464447771845 1.0d0) -49)
+ (scale-float (float -4690628249307261 1.0d0) -104)
+ (scale-float (float -5266641480663154 1.0d0) -158)
+ (scale-float (float -6233247721977268 1.0d0) -212)
+ (scale-float (float 7694432521617408 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6150700509775352 1.0d0) -49)
+ (scale-float (float 8905870234345599 1.0d0) -104)
+ (scale-float (float 7599204760076672 1.0d0) -161)
+ (scale-float (float -4951682159557854 1.0d0) -217)
+ (scale-float (float 6843822815313920 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6256421947826609 1.0d0) -49)
+ (scale-float (float -7137635031088417 1.0d0) -106)
+ (scale-float (float 4692404756746364 1.0d0) -166)
+ (scale-float (float -7820257308522652 1.0d0) -222)
+ (scale-float (float 4838650294566912 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6365810608748822 1.0d0) -49)
+ (scale-float (float 8893555986748634 1.0d0) -106)
+ (scale-float (float -8638702591546039 1.0d0) -161)
+ (scale-float (float -4909692035297430 1.0d0) -215)
+ (scale-float (float 4832972271386624 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6479061213457173 1.0d0) -49)
+ (scale-float (float 4650614986108905 1.0d0) -103)
+ (scale-float (float 7189048200099628 1.0d0) -157)
+ (scale-float (float -5740875399128687 1.0d0) -211)
+ (scale-float (float -7695065078824960 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6596382516786932 1.0d0) -49)
+ (scale-float (float 5450191544518152 1.0d0) -103)
+ (scale-float (float -7276472824213892 1.0d0) -159)
+ (scale-float (float -5204127492056480 1.0d0) -213)
+ (scale-float (float -7264401678073856 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6717998595009069 1.0d0) -49)
+ (scale-float (float 4668221514008748 1.0d0) -104)
+ (scale-float (float 8463657703702709 1.0d0) -160)
+ (scale-float (float 7881847332951529 1.0d0) -214)
+ (scale-float (float 4633021862641664 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6844150277740140 1.0d0) -49)
+ (scale-float (float 6634602763101683 1.0d0) -106)
+ (scale-float (float -7572853401689364 1.0d0) -161)
+ (scale-float (float 7462439329155744 1.0d0) -217)
+ (scale-float (float -7116079123922944 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6975096743499018 1.0d0) -49)
+ (scale-float (float -5293851757232159 1.0d0) -105)
+ (scale-float (float -5871446810029191 1.0d0) -161)
+ (scale-float (float 5183374652213660 1.0d0) -217)
+ (scale-float (float 5362285923008512 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7111117301153727 1.0d0) -49)
+ (scale-float (float -8876023440380335 1.0d0) -104)
+ (scale-float (float 6596250189197176 1.0d0) -158)
+ (scale-float (float -8842856779357653 1.0d0) -212)
+ (scale-float (float 8758419540295680 1.0d0) -266))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7252513383025326 1.0d0) -49)
+ (scale-float (float -6134037917218726 1.0d0) -103)
+ (scale-float (float -7953561958577241 1.0d0) -157)
+ (scale-float (float -5357219888535272 1.0d0) -212)
+ (scale-float (float 5713855154864128 1.0d0) -266))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7399610779580142 1.0d0) -49)
+ (scale-float (float 7173895407040796 1.0d0) -103)
+ (scale-float (float 5338336230187401 1.0d0) -157)
+ (scale-float (float -8528867054423257 1.0d0) -212)
+ (scale-float (float 7004639112118272 1.0d0) -266))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7552762150578778 1.0d0) -49)
+ (scale-float (float -6599161507593301 1.0d0) -104)
+ (scale-float (float -8549970097258107 1.0d0) -158)
+ (scale-float (float 7811379268375386 1.0d0) -212)
+ (scale-float (float -5440011347525632 1.0d0) -267))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7712349853422879 1.0d0) -49)
+ (scale-float (float 5611659341876338 1.0d0) -104)
+ (scale-float (float -8418935969681971 1.0d0) -160)
+ (scale-float (float -8146747847561822 1.0d0) -216)
+ (scale-float (float -7755025196777472 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7878789136449884 1.0d0) -49)
+ (scale-float (float -8824804813635961 1.0d0) -106)
+ (scale-float (float -6202878016631969 1.0d0) -161)
+ (scale-float (float 8742759483835053 1.0d0) -216)
+ (scale-float (float -7323424793296896 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8052531753321576 1.0d0) -49)
+ (scale-float (float 5858237722607157 1.0d0) -105)
+ (scale-float (float -6446763533076203 1.0d0) -162)
+ (scale-float (float -8920794287073338 1.0d0) -217)
+ (scale-float (float 7454437921521664 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8234070064745930 1.0d0) -49)
+ (scale-float (float 5343437991518512 1.0d0) -103)
+ (scale-float (float -8794240947028369 1.0d0) -157)
+ (scale-float (float 8763213811742520 1.0d0) -211)
+ (scale-float (float 7766596205969408 1.0d0) -265))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8423941705953693 1.0d0) -49)
+ (scale-float (float 8855663237191574 1.0d0) -103)
+ (scale-float (float 5728599496217159 1.0d0) -159)
+ (scale-float (float -5768915592583075 1.0d0) -214)
+ (scale-float (float -8299701230305280 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8622734913112836 1.0d0) -49)
+ (scale-float (float 5464249674693566 1.0d0) -103)
+ (scale-float (float -8063849517394647 1.0d0) -157)
+ (scale-float (float 8418093263375557 1.0d0) -211)
+ (scale-float (float -6659359019614208 1.0d0) -266))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8831094619827022 1.0d0) -49)
+ (scale-float (float -8148546371003981 1.0d0) -103)
+ (scale-float (float 7254550863460982 1.0d0) -157)
+ (scale-float (float 5104397688052921 1.0d0) -211)
+ (scale-float (float -5466395922882560 1.0d0) -265))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4524864728409515 1.0d0) -48)
+ (scale-float (float 6972235927586903 1.0d0) -102)
+ (scale-float (float 4678816673430668 1.0d0) -156)
+ (scale-float (float 4666758015876900 1.0d0) -212)
+ (scale-float (float -8800093593829376 1.0d0) -266))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4639709907428621 1.0d0) -48)
+ (scale-float (float 6925384230355776 1.0d0) -102)
+ (scale-float (float 6943091238830489 1.0d0) -157)
+ (scale-float (float 7656213022664895 1.0d0) -211)
+ (scale-float (float 8392919872962560 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4760513582121041 1.0d0) -48)
+ (scale-float (float 4889534420568852 1.0d0) -102)
+ (scale-float (float 8289770516254934 1.0d0) -158)
+ (scale-float (float -8322554561221716 1.0d0) -212)
+ (scale-float (float -7893230454702080 1.0d0) -267))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4887752432705151 1.0d0) -48)
+ (scale-float (float -5693766895143614 1.0d0) -106)
+ (scale-float (float -5295234909326301 1.0d0) -160)
+ (scale-float (float -6557969739186175 1.0d0) -215)
+ (scale-float (float 4511235452436480 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5021955378312448 1.0d0) -48)
+ (scale-float (float -5949372964446050 1.0d0) -102)
+ (scale-float (float 7939834392766672 1.0d0) -157)
+ (scale-float (float -8889853157944003 1.0d0) -212)
+ (scale-float (float 5470788102914048 1.0d0) -266))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5163710934580951 1.0d0) -48)
+ (scale-float (float -7775707197242452 1.0d0) -108)
+ (scale-float (float -6964288742756296 1.0d0) -162)
+ (scale-float (float 5678070141242516 1.0d0) -216)
+ (scale-float (float -6646540516982784 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5313675850830065 1.0d0) -48)
+ (scale-float (float 6305287430543433 1.0d0) -102)
+ (scale-float (float -7772032333809724 1.0d0) -157)
+ (scale-float (float -8029379288687840 1.0d0) -212)
+ (scale-float (float -5092660000718848 1.0d0) -266))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5472585294192134 1.0d0) -48)
+ (scale-float (float -8165975952255356 1.0d0) -103)
+ (scale-float (float -4998446691715009 1.0d0) -161)
+ (scale-float (float -6273568365757200 1.0d0) -217)
+ (scale-float (float -7813706681417728 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5641264913891356 1.0d0) -48)
+ (scale-float (float -8996120455550341 1.0d0) -102)
+ (scale-float (float 6427636381411116 1.0d0) -156)
+ (scale-float (float -5449912900214116 1.0d0) -214)
+ (scale-float (float 7789779334201344 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5820645203480592 1.0d0) -48)
+ (scale-float (float 8781856228066861 1.0d0) -102)
+ (scale-float (float 8201369414544246 1.0d0) -158)
+ (scale-float (float -6210705520005334 1.0d0) -213)
+ (scale-float (float -6239267901407232 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6011778688436236 1.0d0) -48)
+ (scale-float (float 7194334622794365 1.0d0) -104)
+ (scale-float (float 6477100824374954 1.0d0) -166)
+ (scale-float (float -4568571437588617 1.0d0) -223)
+ (scale-float (float 5928766949818368 1.0d0) -280))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6215860609535080 1.0d0) -48)
+ (scale-float (float 8394916441611171 1.0d0) -102)
+ (scale-float (float -5423569241846509 1.0d0) -156)
+ (scale-float (float 4785333766536567 1.0d0) -210)
+ (scale-float (float -5015554907439104 1.0d0) -267))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6434253960626327 1.0d0) -48)
+ (scale-float (float -4862766324251183 1.0d0) -104)
+ (scale-float (float 5789086475748961 1.0d0) -159)
+ (scale-float (float 5910480269657087 1.0d0) -216)
+ (scale-float (float 7260906967793664 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6668519989190208 1.0d0) -48)
+ (scale-float (float -8279307004090198 1.0d0) -102)
+ (scale-float (float 7429441724422332 1.0d0) -157)
+ (scale-float (float 6295270201075446 1.0d0) -212)
+ (scale-float (float 8379185551179776 1.0d0) -266))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6920455602683467 1.0d0) -48)
+ (scale-float (float -8845616597886231 1.0d0) -102)
+ (scale-float (float -7952203617092389 1.0d0) -156)
+ (scale-float (float -6139826277100462 1.0d0) -217)
+ (scale-float (float 5386457489342464 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7192139576377896 1.0d0) -48)
+ (scale-float (float 6130968677069525 1.0d0) -105)
+ (scale-float (float 5964937143219749 1.0d0) -160)
+ (scale-float (float -6282256614864929 1.0d0) -215)
+ (scale-float (float 7154798553989120 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7485990077404228 1.0d0) -48)
+ (scale-float (float -5482203802085866 1.0d0) -102)
+ (scale-float (float 8647618036673473 1.0d0) -158)
+ (scale-float (float -4555017105801660 1.0d0) -212)
+ (scale-float (float 8559087960719360 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7804836875785953 1.0d0) -48)
+ (scale-float (float 5275001876094406 1.0d0) -102)
+ (scale-float (float 5783656034237738 1.0d0) -156)
+ (scale-float (float -5647019254008860 1.0d0) -210)
+ (scale-float (float 5168835195092992 1.0d0) -264))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8152012811748831 1.0d0) -48)
+ (scale-float (float 4755270175277766 1.0d0) -102)
+ (scale-float (float 6561325893612995 1.0d0) -156)
+ (scale-float (float -6293819739494205 1.0d0) -214)
+ (scale-float (float -4611512610062336 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8531470788791185 1.0d0) -48)
+ (scale-float (float 4971209640929394 1.0d0) -102)
+ (scale-float (float -4849298551206024 1.0d0) -156)
+ (scale-float (float -8315187020880318 1.0d0) -210)
+ (scale-float (float -8323584824279040 1.0d0) -264))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8947935008628436 1.0d0) -48)
+ (scale-float (float 7766658945255354 1.0d0) -102)
+ (scale-float (float 6296909150872328 1.0d0) -157)
+ (scale-float (float 8685140401214535 1.0d0) -212)
+ (scale-float (float 7969202102599680 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4703549369983361 1.0d0) -47)
+ (scale-float (float 7852350636790280 1.0d0) -104)
+ (scale-float (float 8135489978399987 1.0d0) -158)
+ (scale-float (float -7174034823224577 1.0d0) -212)
+ (scale-float (float 8298739190988800 1.0d0) -267))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4957943114250195 1.0d0) -47)
+ (scale-float (float 8927710627508108 1.0d0) -101)
+ (scale-float (float 7771780549149595 1.0d0) -157)
+ (scale-float (float -7066653115289274 1.0d0) -211)
+ (scale-float (float -5251925558591488 1.0d0) -265))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5241402202311462 1.0d0) -47)
+ (scale-float (float 6699700002495111 1.0d0) -101)
+ (scale-float (float 7350747415377690 1.0d0) -156)
+ (scale-float (float 5956295317296818 1.0d0) -210)
+ (scale-float (float -6370921775546368 1.0d0) -264))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5559211242425461 1.0d0) -47)
+ (scale-float (float -6630256884878495 1.0d0) -104)
+ (scale-float (float 5514374206385815 1.0d0) -162)
+ (scale-float (float 4691257561774826 1.0d0) -218)
+ (scale-float (float 8800956699377664 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5918018612706102 1.0d0) -47)
+ (scale-float (float 6327539369914933 1.0d0) -102)
+ (scale-float (float 8467815428623486 1.0d0) -160)
+ (scale-float (float 5106528031699086 1.0d0) -217)
+ (scale-float (float 4966384115122176 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6326306726590363 1.0d0) -47)
+ (scale-float (float 4932593287996622 1.0d0) -103)
+ (scale-float (float -6321952359158935 1.0d0) -159)
+ (scale-float (float -7780234803709193 1.0d0) -219)
+ (scale-float (float 6415528025391104 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6795071305180165 1.0d0) -47)
+ (scale-float (float 4587132140060125 1.0d0) -101)
+ (scale-float (float 7691750823425688 1.0d0) -158)
+ (scale-float (float -8270613876366648 1.0d0) -212)
+ (scale-float (float -6076525478084608 1.0d0) -266))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7338826700308355 1.0d0) -47)
+ (scale-float (float -8652803979367238 1.0d0) -105)
+ (scale-float (float 6630781865019290 1.0d0) -159)
+ (scale-float (float 5339382437378590 1.0d0) -213)
+ (scale-float (float 6242568037990400 1.0d0) -267))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7977135733986933 1.0d0) -47)
+ (scale-float (float 6761142254708228 1.0d0) -101)
+ (scale-float (float -8651077221672238 1.0d0) -155)
+ (scale-float (float 8286513363443156 1.0d0) -210)
+ (scale-float (float -5672208511336448 1.0d0) -266))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8737013731825704 1.0d0) -47)
+ (scale-float (float 8654142931785579 1.0d0) -106)
+ (scale-float (float -8568301855446921 1.0d0) -161)
+ (scale-float (float 6596291337030302 1.0d0) -217)
+ (scale-float (float 4872662811672576 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4828425446673454 1.0d0) -46)
+ (scale-float (float -6916860673263500 1.0d0) -104)
+ (scale-float (float 6047527717683516 1.0d0) -158)
+ (scale-float (float 8454679980636421 1.0d0) -213)
+ (scale-float (float -7197223298793472 1.0d0) -267))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5396551697143330 1.0d0) -46)
+ (scale-float (float -5733671657124272 1.0d0) -104)
+ (scale-float (float -7168980379255407 1.0d0) -158)
+ (scale-float (float -5385528853569594 1.0d0) -213)
+ (scale-float (float 8970110362451968 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6116168685368767 1.0d0) -46)
+ (scale-float (float -5154012932173636 1.0d0) -100)
+ (scale-float (float -8517276107424681 1.0d0) -155)
+ (scale-float (float -8267621084955084 1.0d0) -209)
+ (scale-float (float 7180988953329664 1.0d0) -264))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7057195213557535 1.0d0) -46)
+ (scale-float (float -8898597694697277 1.0d0) -101)
+ (scale-float (float -8681831307511366 1.0d0) -159)
+ (scale-float (float 8147107942114543 1.0d0) -213)
+ (scale-float (float 8684777780019200 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8340400121862057 1.0d0) -46)
+ (scale-float (float 6443522098103518 1.0d0) -103)
+ (scale-float (float -5063380033451047 1.0d0) -157)
+ (scale-float (float 7096754030320520 1.0d0) -211)
+ (scale-float (float -5649303769055232 1.0d0) -265))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5096951165270068 1.0d0) -45)
+ (scale-float (float -7367277215028988 1.0d0) -99)
+ (scale-float (float 5204165418458199 1.0d0) -155)
+ (scale-float (float -7328140217508302 1.0d0) -209)
+ (scale-float (float 4644105911926784 1.0d0) -265))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6553264048624175 1.0d0) -45)
+ (scale-float (float -8728494544390632 1.0d0) -99)
+ (scale-float (float 6818471906941218 1.0d0) -155)
+ (scale-float (float -4839948684372485 1.0d0) -209)
+ (scale-float (float -6526652324249600 1.0d0) -266))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4587306422959904 1.0d0) -44)
+ (scale-float (float -8132024147820829 1.0d0) -99)
+ (scale-float (float 8001039806955030 1.0d0) -154)
+ (scale-float (float 8285712093786516 1.0d0) -210)
+ (scale-float (float -5775142137495552 1.0d0) -264))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7645534692587744 1.0d0) -44)
+ (scale-float (float 7904996613277796 1.0d0) -98)
+ (scale-float (float -4949844840316895 1.0d0) -157)
+ (scale-float (float -5649413412498743 1.0d0) -213)
+ (scale-float (float -5510548699480064 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5734160014802806 1.0d0) -42)
+ (scale-float (float -5854173816779464 1.0d0) -97)
+ (scale-float (float -7171395319441940 1.0d0) -152)
+ (scale-float (float 6767673389735587 1.0d0) -207)
+ (scale-float (float -6695998270734336 1.0d0) -264))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float -5734160014802806 1.0d0) -42)
+ (scale-float (float 5854173816779464 1.0d0) -97)
+ (scale-float (float 7171395319441940 1.0d0) -152)
+ (scale-float (float -6767673389735587 1.0d0) -207)
+ (scale-float (float 6695997717610496 1.0d0) -264))
+ (%make-qd-d q0 q1 q2 q3)))))
+
+;; This is the set of evaluation nodes for the atan table. The table contains
+;;
+;; tan((2*k + 2)*pi/(4*s))
+;;
+;; for k = 0, 1, ..., s, where s is the table size,
+;; +qd-atan-partition-size+.
+(defconstant +qd-atan-nodes+
+ (make-array +qd-atan-partition-size+ :initial-contents
+ (list
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7074243300823009 1.0d0) -62)
+ (scale-float (float 6767281937885683 1.0d0) -116)
+ (scale-float (float 6495058557496386 1.0d0) -172)
+ (scale-float (float 5247049684764422 1.0d0) -226)
+ (scale-float (float -5541122207547392 1.0d0) -280))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7074259947269390 1.0d0) -61)
+ (scale-float (float -7016692485563189 1.0d0) -116)
+ (scale-float (float 7360987505494805 1.0d0) -170)
+ (scale-float (float 7711403976890054 1.0d0) -224)
+ (scale-float (float 7755379282149376 1.0d0) -278))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5305715768666702 1.0d0) -60)
+ (scale-float (float 8471749856458935 1.0d0) -117)
+ (scale-float (float -8118241448508008 1.0d0) -173)
+ (scale-float (float 5553785129213244 1.0d0) -228)
+ (scale-float (float 7351462873006080 1.0d0) -282))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7074326533995023 1.0d0) -60)
+ (scale-float (float -7254034420744410 1.0d0) -115)
+ (scale-float (float 6401434372892788 1.0d0) -170)
+ (scale-float (float -7987115629600412 1.0d0) -231)
+ (scale-float (float 7048491884871680 1.0d0) -285))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8842970593782984 1.0d0) -60)
+ (scale-float (float -5691728595114215 1.0d0) -114)
+ (scale-float (float 8352032547859414 1.0d0) -177)
+ (scale-float (float 8515194392491862 1.0d0) -232)
+ (scale-float (float -8285511068155904 1.0d0) -288))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5305828136410355 1.0d0) -59)
+ (scale-float (float 5670480622612706 1.0d0) -113)
+ (scale-float (float 8424458586146156 1.0d0) -167)
+ (scale-float (float 7325110716144970 1.0d0) -221)
+ (scale-float (float 7901715692986368 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6190195948340938 1.0d0) -59)
+ (scale-float (float -8802172611714431 1.0d0) -115)
+ (scale-float (float 5293066366625524 1.0d0) -169)
+ (scale-float (float -4725513813851070 1.0d0) -226)
+ (scale-float (float -6881914124238848 1.0d0) -282))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7074592895940238 1.0d0) -59)
+ (scale-float (float -7386148682932407 1.0d0) -114)
+ (scale-float (float 8663989822896143 1.0d0) -168)
+ (scale-float (float 5638497460170841 1.0d0) -222)
+ (scale-float (float -7881181893361664 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7959023143013823 1.0d0) -59)
+ (scale-float (float 8019805402879802 1.0d0) -113)
+ (scale-float (float -6336817275823725 1.0d0) -167)
+ (scale-float (float -7504315909577047 1.0d0) -222)
+ (scale-float (float -7001531428110336 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8843490853994263 1.0d0) -59)
+ (scale-float (float 6627398283965989 1.0d0) -114)
+ (scale-float (float 6401954222096561 1.0d0) -172)
+ (scale-float (float -8277716072595469 1.0d0) -228)
+ (scale-float (float -6893131865784320 1.0d0) -282))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4864000097009790 1.0d0) -58)
+ (scale-float (float 5300827232027539 1.0d0) -113)
+ (scale-float (float -8233515723229764 1.0d0) -167)
+ (scale-float (float -5661310994722713 1.0d0) -223)
+ (scale-float (float 6190628432248832 1.0d0) -279))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5306277664505868 1.0d0) -58)
+ (scale-float (float 6080680969503448 1.0d0) -114)
+ (scale-float (float 8673453011664433 1.0d0) -168)
+ (scale-float (float 6958169807750707 1.0d0) -225)
+ (scale-float (float -6223760163340288 1.0d0) -279))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5748580212877572 1.0d0) -58)
+ (scale-float (float 7808786237303012 1.0d0) -112)
+ (scale-float (float 4562732201975772 1.0d0) -166)
+ (scale-float (float 7911073594757806 1.0d0) -220)
+ (scale-float (float 7571566118043648 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6190909825987611 1.0d0) -58)
+ (scale-float (float 6947339417361781 1.0d0) -114)
+ (scale-float (float -6195385482223894 1.0d0) -168)
+ (scale-float (float 8660328297735924 1.0d0) -222)
+ (scale-float (float 6834525100834816 1.0d0) -278))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6633268588208486 1.0d0) -58)
+ (scale-float (float 7956908201130860 1.0d0) -113)
+ (scale-float (float 8639872984662784 1.0d0) -168)
+ (scale-float (float 4555947475504659 1.0d0) -222)
+ (scale-float (float 6747999155978240 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7075658584461808 1.0d0) -58)
+ (scale-float (float -4850328405598998 1.0d0) -116)
+ (scale-float (float -8337902916519844 1.0d0) -173)
+ (scale-float (float 7753457006800198 1.0d0) -227)
+ (scale-float (float 8205843736559616 1.0d0) -285))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7518081900257630 1.0d0) -58)
+ (scale-float (float 6453105589292401 1.0d0) -112)
+ (scale-float (float -8397542814379849 1.0d0) -166)
+ (scale-float (float -8199698099635664 1.0d0) -222)
+ (scale-float (float 7114045743267840 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7960540621733810 1.0d0) -58)
+ (scale-float (float 8175303293584134 1.0d0) -112)
+ (scale-float (float -5301580419193644 1.0d0) -167)
+ (scale-float (float 6699977611910940 1.0d0) -222)
+ (scale-float (float 7547565291601920 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8403036835695393 1.0d0) -58)
+ (scale-float (float -5697268423089438 1.0d0) -117)
+ (scale-float (float -6473687143763747 1.0d0) -171)
+ (scale-float (float -8274683920528728 1.0d0) -226)
+ (scale-float (float -5560296672329728 1.0d0) -280))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8845572629654022 1.0d0) -58)
+ (scale-float (float -8912156205912812 1.0d0) -112)
+ (scale-float (float 5882165538473509 1.0d0) -169)
+ (scale-float (float 5764844608194588 1.0d0) -223)
+ (scale-float (float -7830218316185600 1.0d0) -281))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4644075045933689 1.0d0) -57)
+ (scale-float (float -4644840313601368 1.0d0) -113)
+ (scale-float (float 5890558395426862 1.0d0) -169)
+ (scale-float (float 5704484041220075 1.0d0) -223)
+ (scale-float (float 6758937831800832 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4865385655689326 1.0d0) -57)
+ (scale-float (float -5335765408447300 1.0d0) -112)
+ (scale-float (float -7739937159330576 1.0d0) -166)
+ (scale-float (float 5524190817389561 1.0d0) -220)
+ (scale-float (float 8038054959251456 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5086719189028021 1.0d0) -57)
+ (scale-float (float -6684440902714514 1.0d0) -111)
+ (scale-float (float -6219586612898500 1.0d0) -165)
+ (scale-float (float 7622402756168006 1.0d0) -219)
+ (scale-float (float 8609496160927744 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5308076691316144 1.0d0) -57)
+ (scale-float (float -5476938618039988 1.0d0) -111)
+ (scale-float (float -8651596065846501 1.0d0) -165)
+ (scale-float (float -7238720175984380 1.0d0) -219)
+ (scale-float (float 8112961094213632 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5529459208372121 1.0d0) -57)
+ (scale-float (float 7178586049594761 1.0d0) -113)
+ (scale-float (float -6270880689972360 1.0d0) -167)
+ (scale-float (float 7224178711345510 1.0d0) -225)
+ (scale-float (float -8249539170926592 1.0d0) -279))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5750867786486237 1.0d0) -57)
+ (scale-float (float -7441067489181542 1.0d0) -114)
+ (scale-float (float 8230325703168640 1.0d0) -168)
+ (scale-float (float 8318179187665325 1.0d0) -222)
+ (scale-float (float -6836870166085632 1.0d0) -281))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5972303472440455 1.0d0) -57)
+ (scale-float (float -7755066370248110 1.0d0) -112)
+ (scale-float (float 6073039335117040 1.0d0) -166)
+ (scale-float (float 6598469129749717 1.0d0) -220)
+ (scale-float (float 8182194626101248 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6193767313528259 1.0d0) -57)
+ (scale-float (float -5672692450672928 1.0d0) -111)
+ (scale-float (float 7035368426510867 1.0d0) -166)
+ (scale-float (float -5483850293455672 1.0d0) -221)
+ (scale-float (float 6750672895082496 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6415260357574515 1.0d0) -57)
+ (scale-float (float -8093349648279617 1.0d0) -113)
+ (scale-float (float -5567043568932739 1.0d0) -167)
+ (scale-float (float 8262593683581652 1.0d0) -222)
+ (scale-float (float 5987877854511104 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6636783652955355 1.0d0) -57)
+ (scale-float (float -8939754503571771 1.0d0) -112)
+ (scale-float (float 6763825055570294 1.0d0) -173)
+ (scale-float (float 7370014801905638 1.0d0) -228)
+ (scale-float (float -6571133415456768 1.0d0) -282))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6858338248618080 1.0d0) -57)
+ (scale-float (float -5323165169093825 1.0d0) -112)
+ (scale-float (float -6625710419580159 1.0d0) -167)
+ (scale-float (float 7321993919642445 1.0d0) -221)
+ (scale-float (float 6593750164275200 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7079925194101090 1.0d0) -57)
+ (scale-float (float 7558128005262237 1.0d0) -116)
+ (scale-float (float -7104258077067318 1.0d0) -170)
+ (scale-float (float 7325476905488468 1.0d0) -224)
+ (scale-float (float 8620106703699968 1.0d0) -284))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7301545539553835 1.0d0) -57)
+ (scale-float (float 6515484429926459 1.0d0) -113)
+ (scale-float (float -5077845315897347 1.0d0) -170)
+ (scale-float (float -8059832583379898 1.0d0) -224)
+ (scale-float (float -4518954019586048 1.0d0) -279))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7523200335756791 1.0d0) -57)
+ (scale-float (float 5584296786164265 1.0d0) -111)
+ (scale-float (float -6409831813512552 1.0d0) -166)
+ (scale-float (float 8194437483307359 1.0d0) -220)
+ (scale-float (float 7147137294073856 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7744890634141463 1.0d0) -57)
+ (scale-float (float -8013636483429749 1.0d0) -115)
+ (scale-float (float -7102086122091697 1.0d0) -169)
+ (scale-float (float 5858371330382497 1.0d0) -229)
+ (scale-float (float 7437432983126016 1.0d0) -283))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7966617486810410 1.0d0) -57)
+ (scale-float (float 6042537330451191 1.0d0) -111)
+ (scale-float (float 7861008112428726 1.0d0) -165)
+ (scale-float (float -7227916145034998 1.0d0) -224)
+ (scale-float (float 4815727049572352 1.0d0) -281))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8188381946557304 1.0d0) -57)
+ (scale-float (float 8866977047648128 1.0d0) -111)
+ (scale-float (float 7123246995488489 1.0d0) -165)
+ (scale-float (float 7773570145364191 1.0d0) -219)
+ (scale-float (float -6140525153304576 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8410185066887010 1.0d0) -57)
+ (scale-float (float 7763884187722252 1.0d0) -114)
+ (scale-float (float 5307508571918846 1.0d0) -169)
+ (scale-float (float -8886326560828790 1.0d0) -223)
+ (scale-float (float -6979660302254080 1.0d0) -279))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8632027902035696 1.0d0) -57)
+ (scale-float (float 8311501563013986 1.0d0) -111)
+ (scale-float (float -7695719767127804 1.0d0) -167)
+ (scale-float (float 6238683558805043 1.0d0) -221)
+ (scale-float (float -6011991889608704 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8853911506990979 1.0d0) -57)
+ (scale-float (float -4642863164583854 1.0d0) -111)
+ (scale-float (float -5547633297239252 1.0d0) -167)
+ (scale-float (float 7567050221678446 1.0d0) -221)
+ (scale-float (float 8157986184626176 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4537918468756044 1.0d0) -56)
+ (scale-float (float 4820993643217819 1.0d0) -110)
+ (scale-float (float 8930629000360507 1.0d0) -165)
+ (scale-float (float 7087222971126707 1.0d0) -219)
+ (scale-float (float -6627888560996352 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4648902625075038 1.0d0) -56)
+ (scale-float (float 7436320100222489 1.0d0) -112)
+ (scale-float (float -8245691058659380 1.0d0) -168)
+ (scale-float (float 5253602438545476 1.0d0) -222)
+ (scale-float (float 8638593337655296 1.0d0) -280))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4759908751134022 1.0d0) -56)
+ (scale-float (float 7954738707622512 1.0d0) -110)
+ (scale-float (float -6845900842570269 1.0d0) -164)
+ (scale-float (float -5048866407860981 1.0d0) -218)
+ (scale-float (float 5960081798856704 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4870937376030709 1.0d0) -56)
+ (scale-float (float -6900203436031769 1.0d0) -110)
+ (scale-float (float -6557111036885254 1.0d0) -164)
+ (scale-float (float -5242430116227422 1.0d0) -218)
+ (scale-float (float -5246739418636288 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4981989029289118 1.0d0) -56)
+ (scale-float (float -6331714672912233 1.0d0) -112)
+ (scale-float (float 7157065018318002 1.0d0) -166)
+ (scale-float (float 7757486424918243 1.0d0) -222)
+ (scale-float (float -8944385858994176 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5093064240869749 1.0d0) -56)
+ (scale-float (float -8492951271419131 1.0d0) -113)
+ (scale-float (float 8515595824100765 1.0d0) -167)
+ (scale-float (float -5716193829650164 1.0d0) -221)
+ (scale-float (float -5426545241620480 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5204163541179763 1.0d0) -56)
+ (scale-float (float -6235957113790399 1.0d0) -110)
+ (scale-float (float -5174166007511410 1.0d0) -165)
+ (scale-float (float 8611185154120911 1.0d0) -225)
+ (scale-float (float 7736045533659136 1.0d0) -282))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5315287461083185 1.0d0) -56)
+ (scale-float (float 6889731800400172 1.0d0) -110)
+ (scale-float (float -7080341772942908 1.0d0) -164)
+ (scale-float (float 8905936866277614 1.0d0) -218)
+ (scale-float (float -4711175575453696 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5426436531911130 1.0d0) -56)
+ (scale-float (float 6268331220853191 1.0d0) -110)
+ (scale-float (float 7600785323609305 1.0d0) -164)
+ (scale-float (float -8739038359052265 1.0d0) -220)
+ (scale-float (float 6761298908676096 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5537611285472038 1.0d0) -56)
+ (scale-float (float 7192871273277846 1.0d0) -113)
+ (scale-float (float 4786541271204674 1.0d0) -170)
+ (scale-float (float 7028609926727509 1.0d0) -224)
+ (scale-float (float 5989165818707968 1.0d0) -278))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5648812254061936 1.0d0) -56)
+ (scale-float (float -5604264951909811 1.0d0) -113)
+ (scale-float (float 5746680039939614 1.0d0) -168)
+ (scale-float (float 6497560367307525 1.0d0) -225)
+ (scale-float (float 6467556663623680 1.0d0) -279))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5760039970474718 1.0d0) -56)
+ (scale-float (float -6980143845353219 1.0d0) -113)
+ (scale-float (float 4785639533129965 1.0d0) -167)
+ (scale-float (float -8159304138220741 1.0d0) -222)
+ (scale-float (float -6774418327470080 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5871294968012444 1.0d0) -56)
+ (scale-float (float -4791551064553444 1.0d0) -111)
+ (scale-float (float -4887007668252453 1.0d0) -165)
+ (scale-float (float 6787668372624906 1.0d0) -225)
+ (scale-float (float -7813467658518528 1.0d0) -281))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5982577780495660 1.0d0) -56)
+ (scale-float (float -5604253744660759 1.0d0) -110)
+ (scale-float (float -6394322686782746 1.0d0) -165)
+ (scale-float (float 7131851835334653 1.0d0) -219)
+ (scale-float (float 6165912427102208 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6093888942273739 1.0d0) -56)
+ (scale-float (float -5330715064199763 1.0d0) -110)
+ (scale-float (float -8751640118165682 1.0d0) -164)
+ (scale-float (float -7285821764229900 1.0d0) -218)
+ (scale-float (float 8002313246965760 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6205228988235244 1.0d0) -56)
+ (scale-float (float 8200951954534406 1.0d0) -112)
+ (scale-float (float 6111509378875418 1.0d0) -166)
+ (scale-float (float 4613726211466020 1.0d0) -223)
+ (scale-float (float 8203483406925824 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6316598453818314 1.0d0) -56)
+ (scale-float (float -8766569805266857 1.0d0) -110)
+ (scale-float (float -7041718158970532 1.0d0) -166)
+ (scale-float (float 7435291341653501 1.0d0) -220)
+ (scale-float (float 7481516131811328 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6427997875021066 1.0d0) -56)
+ (scale-float (float -5855089389107843 1.0d0) -110)
+ (scale-float (float -6422347945156548 1.0d0) -167)
+ (scale-float (float -4564270512127009 1.0d0) -221)
+ (scale-float (float 6580087321788416 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6539427788412030 1.0d0) -56)
+ (scale-float (float 4932162808711017 1.0d0) -112)
+ (scale-float (float 4775961348624409 1.0d0) -172)
+ (scale-float (float 6253308938258537 1.0d0) -226)
+ (scale-float (float -8452628413415424 1.0d0) -284))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6650888731140600 1.0d0) -56)
+ (scale-float (float -8014160490158482 1.0d0) -110)
+ (scale-float (float 8630627017345737 1.0d0) -165)
+ (scale-float (float -8575776752397544 1.0d0) -223)
+ (scale-float (float 5666371027337216 1.0d0) -279))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6762381240947507 1.0d0) -56)
+ (scale-float (float -5530390079113711 1.0d0) -110)
+ (scale-float (float -8346006416574906 1.0d0) -164)
+ (scale-float (float -5547641109711780 1.0d0) -220)
+ (scale-float (float 4733774473003008 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6873905856175324 1.0d0) -56)
+ (scale-float (float 6624288088975897 1.0d0) -112)
+ (scale-float (float 6140096482270206 1.0d0) -168)
+ (scale-float (float -5870790501959892 1.0d0) -222)
+ (scale-float (float -5442761984311296 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6985463115778989 1.0d0) -56)
+ (scale-float (float 4681164955421420 1.0d0) -110)
+ (scale-float (float -8766768521526820 1.0d0) -164)
+ (scale-float (float 5459492635791986 1.0d0) -218)
+ (scale-float (float -7454206129184768 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7097053559336354 1.0d0) -56)
+ (scale-float (float 6892861201620346 1.0d0) -110)
+ (scale-float (float 4621862762597655 1.0d0) -166)
+ (scale-float (float 8030392135320131 1.0d0) -223)
+ (scale-float (float 5523752298217472 1.0d0) -279))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7208677727058761 1.0d0) -56)
+ (scale-float (float 8677658365757109 1.0d0) -110)
+ (scale-float (float -5701248841593772 1.0d0) -164)
+ (scale-float (float -7758076858108619 1.0d0) -218)
+ (scale-float (float -4664176372514816 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7320336159801643 1.0d0) -56)
+ (scale-float (float 7130725875007135 1.0d0) -110)
+ (scale-float (float -6323732027339787 1.0d0) -165)
+ (scale-float (float -5880754033304199 1.0d0) -222)
+ (scale-float (float -6158226902745088 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7432029399075151 1.0d0) -56)
+ (scale-float (float 4993552063906422 1.0d0) -113)
+ (scale-float (float -7293000710681886 1.0d0) -169)
+ (scale-float (float 4645994626094532 1.0d0) -223)
+ (scale-float (float 5050788669554688 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7543757987054807 1.0d0) -56)
+ (scale-float (float 6375768949364446 1.0d0) -110)
+ (scale-float (float 7990356077590539 1.0d0) -164)
+ (scale-float (float 7889537146385756 1.0d0) -219)
+ (scale-float (float -4787856673505280 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7655522466592189 1.0d0) -56)
+ (scale-float (float -8932639885604140 1.0d0) -110)
+ (scale-float (float 7154800552967290 1.0d0) -164)
+ (scale-float (float 8504487847058852 1.0d0) -218)
+ (scale-float (float 5517932734169088 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7767323381225633 1.0d0) -56)
+ (scale-float (float -7099732203932096 1.0d0) -110)
+ (scale-float (float 7787318832776911 1.0d0) -165)
+ (scale-float (float -4816798849144489 1.0d0) -219)
+ (scale-float (float -7581388403900416 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7879161275190977 1.0d0) -56)
+ (scale-float (float -7067364847376586 1.0d0) -110)
+ (scale-float (float -5996918893238168 1.0d0) -165)
+ (scale-float (float -4831575886096997 1.0d0) -220)
+ (scale-float (float 8984551876231168 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7991036693432322 1.0d0) -56)
+ (scale-float (float -5699502590634390 1.0d0) -110)
+ (scale-float (float 7614224173666209 1.0d0) -168)
+ (scale-float (float -7433568750335281 1.0d0) -224)
+ (scale-float (float 6300988752265216 1.0d0) -279))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8102950181612828 1.0d0) -56)
+ (scale-float (float -6659060468323962 1.0d0) -110)
+ (scale-float (float 8935414324151244 1.0d0) -166)
+ (scale-float (float 5382978084931225 1.0d0) -220)
+ (scale-float (float -5860588151439360 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8214902286125537 1.0d0) -56)
+ (scale-float (float -4952835986202615 1.0d0) -110)
+ (scale-float (float -8867467142013577 1.0d0) -164)
+ (scale-float (float 8477381256242030 1.0d0) -218)
+ (scale-float (float 4546036908785664 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8326893554104228 1.0d0) -56)
+ (scale-float (float -8864362191955611 1.0d0) -110)
+ (scale-float (float -7414201007742116 1.0d0) -164)
+ (scale-float (float 7390248804924237 1.0d0) -218)
+ (scale-float (float 5203427552927744 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8438924533434299 1.0d0) -56)
+ (scale-float (float -6498852296858640 1.0d0) -113)
+ (scale-float (float 8724480238237586 1.0d0) -168)
+ (scale-float (float 6505237845415267 1.0d0) -224)
+ (scale-float (float 6160645556797440 1.0d0) -278))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8550995772763686 1.0d0) -56)
+ (scale-float (float -8849620054117273 1.0d0) -110)
+ (scale-float (float -6126624500449066 1.0d0) -167)
+ (scale-float (float -7441234044338374 1.0d0) -221)
+ (scale-float (float -7193057718960128 1.0d0) -278))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8663107821513803 1.0d0) -56)
+ (scale-float (float 7896549251964366 1.0d0) -110)
+ (scale-float (float 6413572225108209 1.0d0) -165)
+ (scale-float (float 6785815414216356 1.0d0) -220)
+ (scale-float (float -8698059142004736 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8775261229890529 1.0d0) -56)
+ (scale-float (float -5966718174417912 1.0d0) -118)
+ (scale-float (float 5908054939109838 1.0d0) -172)
+ (scale-float (float 5566629553984590 1.0d0) -226)
+ (scale-float (float 8254038780936192 1.0d0) -282))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8887456548895209 1.0d0) -56)
+ (scale-float (float -4822487303729171 1.0d0) -111)
+ (scale-float (float -6184305249388923 1.0d0) -167)
+ (scale-float (float 8897480272152756 1.0d0) -221)
+ (scale-float (float -6855015747026944 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8999694330335703 1.0d0) -56)
+ (scale-float (float 5866019688579494 1.0d0) -110)
+ (scale-float (float 6746113864754295 1.0d0) -165)
+ (scale-float (float 5959036981891692 1.0d0) -219)
+ (scale-float (float -8150990309261312 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4555987563418731 1.0d0) -55)
+ (scale-float (float 6209213722885724 1.0d0) -109)
+ (scale-float (float -5214445726143485 1.0d0) -166)
+ (scale-float (float 8905707340331887 1.0d0) -222)
+ (scale-float (float 5365261823639552 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4612149745927319 1.0d0) -55)
+ (scale-float (float -5149064220987970 1.0d0) -109)
+ (scale-float (float 5135621514213651 1.0d0) -165)
+ (scale-float (float -7670135873233643 1.0d0) -221)
+ (scale-float (float 7366713464324096 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4668333989840611 1.0d0) -55)
+ (scale-float (float 4510225260708012 1.0d0) -109)
+ (scale-float (float 8636055489646536 1.0d0) -164)
+ (scale-float (float -8793811301860095 1.0d0) -218)
+ (scale-float (float 6385623296147456 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4724540572731118 1.0d0) -55)
+ (scale-float (float 6549959657432699 1.0d0) -110)
+ (scale-float (float 7449375933247135 1.0d0) -166)
+ (scale-float (float -6347708187996322 1.0d0) -223)
+ (scale-float (float -5310022893436928 1.0d0) -278))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4780769772602468 1.0d0) -55)
+ (scale-float (float -7595498697333782 1.0d0) -109)
+ (scale-float (float -7656035220403600 1.0d0) -163)
+ (scale-float (float -5381888146336062 1.0d0) -217)
+ (scale-float (float 5490984867725312 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4837021867895031 1.0d0) -55)
+ (scale-float (float 4955973083008952 1.0d0) -109)
+ (scale-float (float 6495859847082499 1.0d0) -165)
+ (scale-float (float 6811580417239946 1.0d0) -221)
+ (scale-float (float 7307243231903744 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4893297137491568 1.0d0) -55)
+ (scale-float (float -4512119916936150 1.0d0) -110)
+ (scale-float (float 6124013201381881 1.0d0) -165)
+ (scale-float (float 7901731001127329 1.0d0) -219)
+ (scale-float (float -5108238592475136 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4949595860722884 1.0d0) -55)
+ (scale-float (float 5573513357823599 1.0d0) -111)
+ (scale-float (float 6921778578926697 1.0d0) -165)
+ (scale-float (float -6871954836299068 1.0d0) -219)
+ (scale-float (float -8124723360301056 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5005918317373515 1.0d0) -55)
+ (scale-float (float -7449301635455933 1.0d0) -109)
+ (scale-float (float 4667696694299058 1.0d0) -163)
+ (scale-float (float -8482132186453729 1.0d0) -218)
+ (scale-float (float 5190014904221696 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5062264787687421 1.0d0) -55)
+ (scale-float (float -5647669325384224 1.0d0) -110)
+ (scale-float (float 8368118104806602 1.0d0) -165)
+ (scale-float (float 6554426093832685 1.0d0) -219)
+ (scale-float (float 6744300675661824 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5118635552373709 1.0d0) -55)
+ (scale-float (float -5766246573771723 1.0d0) -110)
+ (scale-float (float 7246687990865645 1.0d0) -165)
+ (scale-float (float -7797207573510533 1.0d0) -220)
+ (scale-float (float -8907989811003392 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5175030892612366 1.0d0) -55)
+ (scale-float (float 4817698955833881 1.0d0) -109)
+ (scale-float (float 6621452284252597 1.0d0) -166)
+ (scale-float (float -6219041473034286 1.0d0) -224)
+ (scale-float (float -5352603740274688 1.0d0) -278))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5231451090060019 1.0d0) -55)
+ (scale-float (float 4519905144375329 1.0d0) -109)
+ (scale-float (float 5480017346586174 1.0d0) -163)
+ (scale-float (float 5555549697755828 1.0d0) -221)
+ (scale-float (float 4977506345549824 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5287896426855709 1.0d0) -55)
+ (scale-float (float -4981394459481342 1.0d0) -111)
+ (scale-float (float -4989473981568217 1.0d0) -168)
+ (scale-float (float -6355081785181572 1.0d0) -222)
+ (scale-float (float 6314023576666112 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5344367185626688 1.0d0) -55)
+ (scale-float (float 5294928683267628 1.0d0) -110)
+ (scale-float (float 8192558187298156 1.0d0) -164)
+ (scale-float (float -4975922872246745 1.0d0) -221)
+ (scale-float (float -7805112733401088 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5400863649494238 1.0d0) -55)
+ (scale-float (float 8720062026682742 1.0d0) -109)
+ (scale-float (float 5300479770928683 1.0d0) -165)
+ (scale-float (float 4740531629385530 1.0d0) -219)
+ (scale-float (float -5533681895243776 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5457386102079508 1.0d0) -55)
+ (scale-float (float -8435548971470740 1.0d0) -112)
+ (scale-float (float 4997946243138790 1.0d0) -167)
+ (scale-float (float -6608797304466236 1.0d0) -221)
+ (scale-float (float -6868559905947648 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5513934827509369 1.0d0) -55)
+ (scale-float (float 8782392023262299 1.0d0) -109)
+ (scale-float (float -7738673509830927 1.0d0) -167)
+ (scale-float (float -5448701703915946 1.0d0) -221)
+ (scale-float (float -6273127356039168 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5570510110422301 1.0d0) -55)
+ (scale-float (float -8523863027865608 1.0d0) -110)
+ (scale-float (float -8518255248434760 1.0d0) -165)
+ (scale-float (float 6774399983746988 1.0d0) -219)
+ (scale-float (float 4749473861337088 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5627112235974285 1.0d0) -55)
+ (scale-float (float 7263358254634327 1.0d0) -110)
+ (scale-float (float -7268249985750759 1.0d0) -165)
+ (scale-float (float -4693370910543353 1.0d0) -220)
+ (scale-float (float -5415880066203648 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5683741489844735 1.0d0) -55)
+ (scale-float (float -6280764325749201 1.0d0) -110)
+ (scale-float (float 6965480209639580 1.0d0) -164)
+ (scale-float (float 8931847868637448 1.0d0) -218)
+ (scale-float (float 6284428953845760 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5740398158242435 1.0d0) -55)
+ (scale-float (float 5229471594941651 1.0d0) -119)
+ (scale-float (float 5226239879079869 1.0d0) -174)
+ (scale-float (float 6984672670564467 1.0d0) -229)
+ (scale-float (float -4747601484185600 1.0d0) -283))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5797082527911511 1.0d0) -55)
+ (scale-float (float 7225087649872241 1.0d0) -109)
+ (scale-float (float -6204726364434873 1.0d0) -163)
+ (scale-float (float 8665640845854712 1.0d0) -217)
+ (scale-float (float -6869387504541696 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5853794886137419 1.0d0) -55)
+ (scale-float (float 8582721415685180 1.0d0) -109)
+ (scale-float (float 7069542100455701 1.0d0) -163)
+ (scale-float (float 5319805524648991 1.0d0) -217)
+ (scale-float (float 4908003853656064 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5910535520752957 1.0d0) -55)
+ (scale-float (float -5865441005066127 1.0d0) -109)
+ (scale-float (float 7076063963421070 1.0d0) -163)
+ (scale-float (float -5309399976527585 1.0d0) -217)
+ (scale-float (float 7432748259147776 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5967304720144298 1.0d0) -55)
+ (scale-float (float -5230215325814731 1.0d0) -109)
+ (scale-float (float 5977313757878375 1.0d0) -165)
+ (scale-float (float -7081718739490926 1.0d0) -220)
+ (scale-float (float 6587185890459648 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6024102773257053 1.0d0) -55)
+ (scale-float (float 5313042845820622 1.0d0) -110)
+ (scale-float (float 8023417567167796 1.0d0) -166)
+ (scale-float (float -8604260761430137 1.0d0) -221)
+ (scale-float (float 8631242419339264 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6080929969602352 1.0d0) -55)
+ (scale-float (float -7516683944509205 1.0d0) -109)
+ (scale-float (float -7853673306859953 1.0d0) -163)
+ (scale-float (float 7414966153696994 1.0d0) -223)
+ (scale-float (float -5825247748554752 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6137786599262946 1.0d0) -55)
+ (scale-float (float -5500886081507582 1.0d0) -109)
+ (scale-float (float 7192415028319660 1.0d0) -163)
+ (scale-float (float 8703121046288914 1.0d0) -221)
+ (scale-float (float -7720201466019840 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6194672952899342 1.0d0) -55)
+ (scale-float (float 8257022685980356 1.0d0) -109)
+ (scale-float (float -5525974167343856 1.0d0) -168)
+ (scale-float (float 4733928606935526 1.0d0) -223)
+ (scale-float (float 7298229848244224 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6251589321755958 1.0d0) -55)
+ (scale-float (float -7281767909722987 1.0d0) -110)
+ (scale-float (float 7509948571332277 1.0d0) -164)
+ (scale-float (float -5682276894072656 1.0d0) -218)
+ (scale-float (float -7359121898569728 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6308535997667296 1.0d0) -55)
+ (scale-float (float -5011612829008087 1.0d0) -112)
+ (scale-float (float 8035305895939923 1.0d0) -166)
+ (scale-float (float -7349032198139134 1.0d0) -220)
+ (scale-float (float -5368791976902656 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6365513273064154 1.0d0) -55)
+ (scale-float (float -4812363620961737 1.0d0) -111)
+ (scale-float (float -7413962473603094 1.0d0) -165)
+ (scale-float (float -8767876790007713 1.0d0) -222)
+ (scale-float (float 6507835088175104 1.0d0) -278))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6422521440979851 1.0d0) -55)
+ (scale-float (float 6578882977922512 1.0d0) -111)
+ (scale-float (float 8321576113250904 1.0d0) -165)
+ (scale-float (float -6664725033188740 1.0d0) -221)
+ (scale-float (float 7160493126975488 1.0d0) -279))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6479560795056485 1.0d0) -55)
+ (scale-float (float -8375672623049098 1.0d0) -109)
+ (scale-float (float 7524120084222466 1.0d0) -164)
+ (scale-float (float -6815555174250173 1.0d0) -220)
+ (scale-float (float 5172221827088384 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6536631629551210 1.0d0) -55)
+ (scale-float (float 8736141977573990 1.0d0) -110)
+ (scale-float (float -7322710182822515 1.0d0) -164)
+ (scale-float (float -4790469966222651 1.0d0) -218)
+ (scale-float (float 8864931365781504 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6593734239342550 1.0d0) -55)
+ (scale-float (float 7778440410468410 1.0d0) -109)
+ (scale-float (float -5254236274260814 1.0d0) -163)
+ (scale-float (float 6555239903189666 1.0d0) -218)
+ (scale-float (float -7852641536049152 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6650868919936727 1.0d0) -55)
+ (scale-float (float 7162191600837053 1.0d0) -109)
+ (scale-float (float -5655798014740140 1.0d0) -163)
+ (scale-float (float -8421566080588568 1.0d0) -217)
+ (scale-float (float 5731190979051520 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6708035967474024 1.0d0) -55)
+ (scale-float (float 8929290949301876 1.0d0) -111)
+ (scale-float (float 4736664410119567 1.0d0) -165)
+ (scale-float (float -5300162952592309 1.0d0) -219)
+ (scale-float (float -7285565930602496 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6765235678735172 1.0d0) -55)
+ (scale-float (float -7145520010159020 1.0d0) -113)
+ (scale-float (float -5949255065233075 1.0d0) -168)
+ (scale-float (float 4756154730286905 1.0d0) -222)
+ (scale-float (float 5274431212224512 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6822468351147766 1.0d0) -55)
+ (scale-float (float -8376580639018366 1.0d0) -110)
+ (scale-float (float -4813587535252781 1.0d0) -165)
+ (scale-float (float -8879977609109973 1.0d0) -219)
+ (scale-float (float -5697320867594240 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6879734282792707 1.0d0) -55)
+ (scale-float (float -8556468912319486 1.0d0) -109)
+ (scale-float (float -7506974660546488 1.0d0) -165)
+ (scale-float (float -4635918891365437 1.0d0) -224)
+ (scale-float (float 8122854904168448 1.0d0) -279))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6937033772410672 1.0d0) -55)
+ (scale-float (float 8240683988726849 1.0d0) -110)
+ (scale-float (float -8616281779497146 1.0d0) -165)
+ (scale-float (float 5493686639335658 1.0d0) -219)
+ (scale-float (float 7922505090433024 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6994367119408617 1.0d0) -55)
+ (scale-float (float -4832167682003882 1.0d0) -110)
+ (scale-float (float 4728849073912540 1.0d0) -171)
+ (scale-float (float 7229445077727664 1.0d0) -227)
+ (scale-float (float 6143325060988928 1.0d0) -281))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7051734623866298 1.0d0) -55)
+ (scale-float (float 6602734696643516 1.0d0) -111)
+ (scale-float (float 7572256171155605 1.0d0) -165)
+ (scale-float (float -5832521577411901 1.0d0) -220)
+ (scale-float (float 5065668173234176 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7109136586542834 1.0d0) -55)
+ (scale-float (float -6636647347540607 1.0d0) -110)
+ (scale-float (float 8117813830610382 1.0d0) -164)
+ (scale-float (float 5654996117808915 1.0d0) -218)
+ (scale-float (float 7781068388909056 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7166573308883288 1.0d0) -55)
+ (scale-float (float 8714537620740422 1.0d0) -113)
+ (scale-float (float 4782399557875443 1.0d0) -167)
+ (scale-float (float -4906181603167593 1.0d0) -222)
+ (scale-float (float 6985796128079872 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7224045093025286 1.0d0) -55)
+ (scale-float (float 7002193656429775 1.0d0) -110)
+ (scale-float (float 6964543791154448 1.0d0) -164)
+ (scale-float (float -7940289474261827 1.0d0) -218)
+ (scale-float (float 4826411323326464 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7281552241805660 1.0d0) -55)
+ (scale-float (float 8980245436623427 1.0d0) -109)
+ (scale-float (float 6183095561836775 1.0d0) -163)
+ (scale-float (float -8016598767501366 1.0d0) -224)
+ (scale-float (float 8808835028353024 1.0d0) -279))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7339095058767125 1.0d0) -55)
+ (scale-float (float 5897632820997376 1.0d0) -109)
+ (scale-float (float 8629091534706665 1.0d0) -163)
+ (scale-float (float 5607425133319746 1.0d0) -217)
+ (scale-float (float 4822937505021952 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7396673848164983 1.0d0) -55)
+ (scale-float (float 8922134058383169 1.0d0) -110)
+ (scale-float (float 5860943883768514 1.0d0) -167)
+ (scale-float (float 6739148691760732 1.0d0) -221)
+ (scale-float (float 7246473065398272 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7454288914973862 1.0d0) -55)
+ (scale-float (float -5534265883516272 1.0d0) -110)
+ (scale-float (float -7599675863546075 1.0d0) -164)
+ (scale-float (float -5880007463065778 1.0d0) -218)
+ (scale-float (float -6842450592268288 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7511940564894482 1.0d0) -55)
+ (scale-float (float -4510530079673467 1.0d0) -109)
+ (scale-float (float -5828955460602770 1.0d0) -164)
+ (scale-float (float 8455097717915642 1.0d0) -219)
+ (scale-float (float -7360031460229120 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7569629104360456 1.0d0) -55)
+ (scale-float (float 5463531378599228 1.0d0) -110)
+ (scale-float (float 7442931652908749 1.0d0) -165)
+ (scale-float (float 8489615287044643 1.0d0) -219)
+ (scale-float (float -7132058411794432 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7627354840545122 1.0d0) -55)
+ (scale-float (float 6830776078420744 1.0d0) -110)
+ (scale-float (float -6599513078449499 1.0d0) -166)
+ (scale-float (float -7088737710654194 1.0d0) -221)
+ (scale-float (float 6251897204244480 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7685118081368404 1.0d0) -55)
+ (scale-float (float 8985004028767087 1.0d0) -109)
+ (scale-float (float -4808541751657683 1.0d0) -163)
+ (scale-float (float -5519928814936255 1.0d0) -218)
+ (scale-float (float -8319844358717440 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7742919135503711 1.0d0) -55)
+ (scale-float (float 5182401773456419 1.0d0) -109)
+ (scale-float (float -6036935714297580 1.0d0) -163)
+ (scale-float (float 6598306630202497 1.0d0) -218)
+ (scale-float (float 7689169814470656 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7800758312384863 1.0d0) -55)
+ (scale-float (float 4930813786379107 1.0d0) -109)
+ (scale-float (float 7750504761624279 1.0d0) -164)
+ (scale-float (float -5247586008127933 1.0d0) -219)
+ (scale-float (float 7577988707778560 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7858635922213056 1.0d0) -55)
+ (scale-float (float -6376094486028435 1.0d0) -110)
+ (scale-float (float 7666507855896739 1.0d0) -164)
+ (scale-float (float 5717893804250778 1.0d0) -220)
+ (scale-float (float 6492539317911552 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7916552275963855 1.0d0) -55)
+ (scale-float (float -6470851910821482 1.0d0) -109)
+ (scale-float (float -8121047700460262 1.0d0) -163)
+ (scale-float (float 4777450552030372 1.0d0) -219)
+ (scale-float (float -6416869306138624 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7974507685394225 1.0d0) -55)
+ (scale-float (float 6493895228358546 1.0d0) -109)
+ (scale-float (float -7438974047349112 1.0d0) -164)
+ (scale-float (float -8200925466363753 1.0d0) -218)
+ (scale-float (float 6506186355703808 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8032502463049597 1.0d0) -55)
+ (scale-float (float 6907154930094209 1.0d0) -109)
+ (scale-float (float -5342807368173606 1.0d0) -165)
+ (scale-float (float 5089095618658254 1.0d0) -224)
+ (scale-float (float -5918269059891200 1.0d0) -278))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8090536922270962 1.0d0) -55)
+ (scale-float (float 5811735848428788 1.0d0) -109)
+ (scale-float (float -8491959107345443 1.0d0) -163)
+ (scale-float (float 8581984814799862 1.0d0) -217)
+ (scale-float (float 7808598289006592 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8148611377202007 1.0d0) -55)
+ (scale-float (float 7337690669143183 1.0d0) -109)
+ (scale-float (float -7988618593069985 1.0d0) -163)
+ (scale-float (float -6341858574449737 1.0d0) -222)
+ (scale-float (float -5614155528142848 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8206726142796284 1.0d0) -55)
+ (scale-float (float 7484712771178970 1.0d0) -110)
+ (scale-float (float 4758186941620262 1.0d0) -166)
+ (scale-float (float -5279832774698596 1.0d0) -224)
+ (scale-float (float 5740846662025216 1.0d0) -281))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8264881534824413 1.0d0) -55)
+ (scale-float (float 6014350472706808 1.0d0) -112)
+ (scale-float (float 6384986308908024 1.0d0) -166)
+ (scale-float (float 5441212634871738 1.0d0) -221)
+ (scale-float (float 7042630377406464 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8323077869881323 1.0d0) -55)
+ (scale-float (float 7716876308190961 1.0d0) -109)
+ (scale-float (float -8848505200423454 1.0d0) -163)
+ (scale-float (float -6612535561287589 1.0d0) -217)
+ (scale-float (float -7158332374417408 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8381315465393531 1.0d0) -55)
+ (scale-float (float -6358807453286942 1.0d0) -112)
+ (scale-float (float 5782188539544783 1.0d0) -172)
+ (scale-float (float 5455174163373367 1.0d0) -229)
+ (scale-float (float -5587693496958976 1.0d0) -283))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8439594639626451 1.0d0) -55)
+ (scale-float (float -4737446417511680 1.0d0) -111)
+ (scale-float (float -8394721963901726 1.0d0) -165)
+ (scale-float (float 6105834803743561 1.0d0) -220)
+ (scale-float (float -4605459617021952 1.0d0) -281))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8497915711691749 1.0d0) -55)
+ (scale-float (float 7419391130086974 1.0d0) -110)
+ (scale-float (float -6486478369933276 1.0d0) -164)
+ (scale-float (float -4556550088056046 1.0d0) -221)
+ (scale-float (float -7709509161320448 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8556279001554730 1.0d0) -55)
+ (scale-float (float 8834989484988432 1.0d0) -109)
+ (scale-float (float -6904453082549534 1.0d0) -163)
+ (scale-float (float -8929923407877519 1.0d0) -220)
+ (scale-float (float 6037335879712768 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8614684830041765 1.0d0) -55)
+ (scale-float (float -6444318670433754 1.0d0) -109)
+ (scale-float (float -5794766695399649 1.0d0) -163)
+ (scale-float (float -7996152427272018 1.0d0) -220)
+ (scale-float (float -6974106972848128 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8673133518847751 1.0d0) -55)
+ (scale-float (float 7342192056255074 1.0d0) -110)
+ (scale-float (float -8710376291718960 1.0d0) -164)
+ (scale-float (float -7330547468867136 1.0d0) -218)
+ (scale-float (float -7410057208791040 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8731625390543623 1.0d0) -55)
+ (scale-float (float -6515227151142448 1.0d0) -109)
+ (scale-float (float -8228645499151671 1.0d0) -168)
+ (scale-float (float -8354259906275142 1.0d0) -224)
+ (scale-float (float 4507582171447296 1.0d0) -279))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8790160768583887 1.0d0) -55)
+ (scale-float (float -6639737539678400 1.0d0) -109)
+ (scale-float (float 5807702150068111 1.0d0) -163)
+ (scale-float (float -6971441697391849 1.0d0) -218)
+ (scale-float (float -6399430273630208 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8848739977314208 1.0d0) -55)
+ (scale-float (float -5361335681334369 1.0d0) -110)
+ (scale-float (float 4662389135718374 1.0d0) -164)
+ (scale-float (float -6628223388109715 1.0d0) -220)
+ (scale-float (float -5660384324943872 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8907363341979030 1.0d0) -55)
+ (scale-float (float -7885202077638681 1.0d0) -109)
+ (scale-float (float -4920087825332628 1.0d0) -163)
+ (scale-float (float 6730415028849300 1.0d0) -217)
+ (scale-float (float -7025253338562560 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8966031188729235 1.0d0) -55)
+ (scale-float (float 8834739940364126 1.0d0) -109)
+ (scale-float (float 6589986099054557 1.0d0) -163)
+ (scale-float (float 7454927126581803 1.0d0) -218)
+ (scale-float (float -8652212748763136 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4512371922314926 1.0d0) -54)
+ (scale-float (float 6094415848847015 1.0d0) -109)
+ (scale-float (float 5241322971970717 1.0d0) -164)
+ (scale-float (float -5121031000799317 1.0d0) -219)
+ (scale-float (float -6445919928451072 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4541750818833897 1.0d0) -54)
+ (scale-float (float -5797423195745767 1.0d0) -108)
+ (scale-float (float 7446301587479589 1.0d0) -163)
+ (scale-float (float -5920054400259469 1.0d0) -221)
+ (scale-float (float -6269948519251968 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4571152448379822 1.0d0) -54)
+ (scale-float (float -5625570255588913 1.0d0) -108)
+ (scale-float (float 7219257663238561 1.0d0) -162)
+ (scale-float (float 5223543510538164 1.0d0) -217)
+ (scale-float (float 7698724515217408 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4600576975879743 1.0d0) -54)
+ (scale-float (float -5194091547317777 1.0d0) -109)
+ (scale-float (float 8249610839084712 1.0d0) -165)
+ (scale-float (float 7072510250153134 1.0d0) -220)
+ (scale-float (float -5191509610594304 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4630024566733386 1.0d0) -54)
+ (scale-float (float -5791983535953253 1.0d0) -108)
+ (scale-float (float 5414210622429235 1.0d0) -162)
+ (scale-float (float 6848444124821025 1.0d0) -216)
+ (scale-float (float 8680263789420544 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4659495386817115 1.0d0) -54)
+ (scale-float (float 7855398709617036 1.0d0) -108)
+ (scale-float (float 5235129028043004 1.0d0) -163)
+ (scale-float (float 5095606684970886 1.0d0) -218)
+ (scale-float (float 8216669919084544 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4688989602487915 1.0d0) -54)
+ (scale-float (float -5377641559708678 1.0d0) -108)
+ (scale-float (float 7394066903993584 1.0d0) -168)
+ (scale-float (float -8480567685467516 1.0d0) -222)
+ (scale-float (float 6931801827704832 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4718507380587383 1.0d0) -54)
+ (scale-float (float -6818224481140156 1.0d0) -108)
+ (scale-float (float 6139074941087105 1.0d0) -163)
+ (scale-float (float -6287394042137960 1.0d0) -218)
+ (scale-float (float 4825403320991744 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4748048888445756 1.0d0) -54)
+ (scale-float (float 6671135438521520 1.0d0) -109)
+ (scale-float (float -8432447782992624 1.0d0) -164)
+ (scale-float (float 7534672896201344 1.0d0) -218)
+ (scale-float (float 7438896541466624 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4777614293885954 1.0d0) -54)
+ (scale-float (float -5505918640551912 1.0d0) -108)
+ (scale-float (float 7233084325496090 1.0d0) -162)
+ (scale-float (float -4669191484899807 1.0d0) -219)
+ (scale-float (float 7707921153523712 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4807203765227641 1.0d0) -54)
+ (scale-float (float -6229730022744001 1.0d0) -108)
+ (scale-float (float 5547093377552047 1.0d0) -163)
+ (scale-float (float -6133593763606207 1.0d0) -217)
+ (scale-float (float -7928192135364608 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4836817471291318 1.0d0) -54)
+ (scale-float (float 5431529900780902 1.0d0) -108)
+ (scale-float (float 6298041380981058 1.0d0) -162)
+ (scale-float (float 7689531001793826 1.0d0) -216)
+ (scale-float (float -6386590265720832 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4866455581402435 1.0d0) -54)
+ (scale-float (float -8087327352517896 1.0d0) -114)
+ (scale-float (float -7368169183518002 1.0d0) -169)
+ (scale-float (float 8452265808518809 1.0d0) -223)
+ (scale-float (float -5167074080980992 1.0d0) -278))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4896118265395521 1.0d0) -54)
+ (scale-float (float -5858372132977222 1.0d0) -108)
+ (scale-float (float 4733665516272146 1.0d0) -163)
+ (scale-float (float 6362851693766871 1.0d0) -217)
+ (scale-float (float 5305077032026112 1.0d0) -280))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4925805693618345 1.0d0) -54)
+ (scale-float (float -6145492754901482 1.0d0) -108)
+ (scale-float (float -7952803796369268 1.0d0) -162)
+ (scale-float (float -7703681047106349 1.0d0) -217)
+ (scale-float (float 8902810366115840 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4955518036936097 1.0d0) -54)
+ (scale-float (float -4919569790715614 1.0d0) -110)
+ (scale-float (float 6027960577342663 1.0d0) -164)
+ (scale-float (float -8847907680015868 1.0d0) -218)
+ (scale-float (float -5787839612682240 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4985255466735593 1.0d0) -54)
+ (scale-float (float 8089815550941344 1.0d0) -109)
+ (scale-float (float 7890943098200302 1.0d0) -163)
+ (scale-float (float 7870595316283973 1.0d0) -217)
+ (scale-float (float 4922290895634432 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5015018154929504 1.0d0) -54)
+ (scale-float (float 5343521222344705 1.0d0) -110)
+ (scale-float (float 5867787354045478 1.0d0) -165)
+ (scale-float (float 4514916001696819 1.0d0) -219)
+ (scale-float (float -8573133113131008 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5044806273960608 1.0d0) -54)
+ (scale-float (float 7764102156759821 1.0d0) -110)
+ (scale-float (float -7786064467293972 1.0d0) -165)
+ (scale-float (float -7886026003467305 1.0d0) -219)
+ (scale-float (float -4967375467315200 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5074619996806070 1.0d0) -54)
+ (scale-float (float -7751186127428779 1.0d0) -109)
+ (scale-float (float -7146010290927952 1.0d0) -163)
+ (scale-float (float 6675897418535962 1.0d0) -217)
+ (scale-float (float -8420051655786496 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5104459496981742 1.0d0) -54)
+ (scale-float (float -6010706914106587 1.0d0) -109)
+ (scale-float (float -7628409076726424 1.0d0) -163)
+ (scale-float (float -6357395433631287 1.0d0) -218)
+ (scale-float (float 8299826839945216 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5134324948546493 1.0d0) -54)
+ (scale-float (float -6916953015471680 1.0d0) -108)
+ (scale-float (float 7167355886226005 1.0d0) -166)
+ (scale-float (float -8859515625169292 1.0d0) -223)
+ (scale-float (float -4529739804966912 1.0d0) -278))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5164216526106559 1.0d0) -54)
+ (scale-float (float -5907726073191727 1.0d0) -108)
+ (scale-float (float -7161790682323884 1.0d0) -165)
+ (scale-float (float -5380442781818173 1.0d0) -221)
+ (scale-float (float -7899266890072064 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5194134404819923 1.0d0) -54)
+ (scale-float (float -5964216022171304 1.0d0) -108)
+ (scale-float (float -7665535065418988 1.0d0) -163)
+ (scale-float (float 7605865686912239 1.0d0) -217)
+ (scale-float (float 7316831097421824 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5224078760400717 1.0d0) -54)
+ (scale-float (float 4560087958102505 1.0d0) -112)
+ (scale-float (float 5886848888205149 1.0d0) -166)
+ (scale-float (float 8309156517618128 1.0d0) -220)
+ (scale-float (float -5324992313819136 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5254049769123653 1.0d0) -54)
+ (scale-float (float 6863384480765018 1.0d0) -108)
+ (scale-float (float 4679312891588944 1.0d0) -162)
+ (scale-float (float 7532120129297727 1.0d0) -216)
+ (scale-float (float 7565695657197568 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5284047607828478 1.0d0) -54)
+ (scale-float (float 6537710083588337 1.0d0) -108)
+ (scale-float (float -5265208786779314 1.0d0) -162)
+ (scale-float (float 7965661672930252 1.0d0) -218)
+ (scale-float (float 7750394843496448 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5314072453924456 1.0d0) -54)
+ (scale-float (float -7819090497685694 1.0d0) -108)
+ (scale-float (float 8331672122895500 1.0d0) -165)
+ (scale-float (float 7057899603031006 1.0d0) -219)
+ (scale-float (float 5712657984323584 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5344124485394874 1.0d0) -54)
+ (scale-float (float 6006304204154579 1.0d0) -108)
+ (scale-float (float -7367237253163575 1.0d0) -162)
+ (scale-float (float 8583406004471291 1.0d0) -220)
+ (scale-float (float -5138008364810240 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5374203880801585 1.0d0) -54)
+ (scale-float (float 7082807698146316 1.0d0) -108)
+ (scale-float (float 5431708439327186 1.0d0) -164)
+ (scale-float (float -5638738396141387 1.0d0) -219)
+ (scale-float (float -4570103151656960 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5404310819289564 1.0d0) -54)
+ (scale-float (float -5886387432625778 1.0d0) -108)
+ (scale-float (float 7599531358932904 1.0d0) -164)
+ (scale-float (float -8884544676028892 1.0d0) -220)
+ (scale-float (float 8802287441412096 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5434445480591499 1.0d0) -54)
+ (scale-float (float -8160630678973751 1.0d0) -108)
+ (scale-float (float -8952666462980655 1.0d0) -164)
+ (scale-float (float 8107005340255611 1.0d0) -218)
+ (scale-float (float -7691253319925760 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5464608045032412 1.0d0) -54)
+ (scale-float (float -8286250809013992 1.0d0) -109)
+ (scale-float (float 6759604652366405 1.0d0) -163)
+ (scale-float (float 6722257583934538 1.0d0) -220)
+ (scale-float (float -5086630926876672 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5494798693534303 1.0d0) -54)
+ (scale-float (float 6714812821611110 1.0d0) -108)
+ (scale-float (float 7693551393041517 1.0d0) -165)
+ (scale-float (float 4640121243443789 1.0d0) -219)
+ (scale-float (float 4944327467859968 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5525017607620826 1.0d0) -54)
+ (scale-float (float -8080142529166553 1.0d0) -109)
+ (scale-float (float 8579210614091512 1.0d0) -163)
+ (scale-float (float 5260133494884443 1.0d0) -217)
+ (scale-float (float 5582301427924992 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5555264969421986 1.0d0) -54)
+ (scale-float (float 7137673117952044 1.0d0) -108)
+ (scale-float (float 5075308634056774 1.0d0) -162)
+ (scale-float (float -6076460270908767 1.0d0) -216)
+ (scale-float (float 8913840331456512 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5585540961678879 1.0d0) -54)
+ (scale-float (float 5110387220890711 1.0d0) -112)
+ (scale-float (float 7472526926945199 1.0d0) -166)
+ (scale-float (float 6718546070924804 1.0d0) -220)
+ (scale-float (float -5978423460626432 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5615845767748444 1.0d0) -54)
+ (scale-float (float 7069981615263570 1.0d0) -109)
+ (scale-float (float -5041175894572219 1.0d0) -164)
+ (scale-float (float -6067200350673256 1.0d0) -218)
+ (scale-float (float -5337373683875840 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5646179571608259 1.0d0) -54)
+ (scale-float (float -5969882006205395 1.0d0) -112)
+ (scale-float (float -5310936463543469 1.0d0) -166)
+ (scale-float (float 5250808131003894 1.0d0) -220)
+ (scale-float (float 7733801445752832 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5676542557861356 1.0d0) -54)
+ (scale-float (float 7813679352548076 1.0d0) -109)
+ (scale-float (float -6999346431632929 1.0d0) -164)
+ (scale-float (float -8591741368161837 1.0d0) -220)
+ (scale-float (float -4838897577099264 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5706934911741074 1.0d0) -54)
+ (scale-float (float -4591456369063391 1.0d0) -108)
+ (scale-float (float 6615031414158987 1.0d0) -163)
+ (scale-float (float -5394682262959669 1.0d0) -218)
+ (scale-float (float -7966786237235200 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5737356819115934 1.0d0) -54)
+ (scale-float (float -4921304159190106 1.0d0) -108)
+ (scale-float (float -5289724371041531 1.0d0) -162)
+ (scale-float (float 8540065299573764 1.0d0) -216)
+ (scale-float (float -6246118036234240 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5767808466494552 1.0d0) -54)
+ (scale-float (float 7834867164461612 1.0d0) -108)
+ (scale-float (float -6057688269140587 1.0d0) -162)
+ (scale-float (float 8931755104912459 1.0d0) -219)
+ (scale-float (float -8619033248137216 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5798290041030581 1.0d0) -54)
+ (scale-float (float -8349877875856717 1.0d0) -109)
+ (scale-float (float 8163150127609112 1.0d0) -164)
+ (scale-float (float 8918413500492032 1.0d0) -219)
+ (scale-float (float -7528032969424896 1.0d0) -278))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5828801730527676 1.0d0) -54)
+ (scale-float (float -7543810688919708 1.0d0) -109)
+ (scale-float (float 7722482010838801 1.0d0) -164)
+ (scale-float (float -6834012364286068 1.0d0) -221)
+ (scale-float (float -5998741041446912 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5859343723444504 1.0d0) -54)
+ (scale-float (float -7421385686727085 1.0d0) -108)
+ (scale-float (float -8429945996744161 1.0d0) -163)
+ (scale-float (float 7207515045379233 1.0d0) -217)
+ (scale-float (float -8228139563352064 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5889916208899774 1.0d0) -54)
+ (scale-float (float -4674283487672738 1.0d0) -108)
+ (scale-float (float 5672587542123089 1.0d0) -163)
+ (scale-float (float 8422751571816060 1.0d0) -220)
+ (scale-float (float 7911739524907008 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5920519376677306 1.0d0) -54)
+ (scale-float (float -5250407275313443 1.0d0) -108)
+ (scale-float (float -4605976276072331 1.0d0) -162)
+ (scale-float (float -6209485626912573 1.0d0) -216)
+ (scale-float (float -6200553119064064 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5951153417231127 1.0d0) -54)
+ (scale-float (float 7856518334009793 1.0d0) -108)
+ (scale-float (float 6981911111573824 1.0d0) -163)
+ (scale-float (float -5128172752384731 1.0d0) -220)
+ (scale-float (float 8652419861315584 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5981818521690606 1.0d0) -54)
+ (scale-float (float 8577060613312499 1.0d0) -108)
+ (scale-float (float -6340321397997779 1.0d0) -162)
+ (scale-float (float 5448939827810261 1.0d0) -216)
+ (scale-float (float -8901481678733312 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6012514881865614 1.0d0) -54)
+ (scale-float (float -7860480778018144 1.0d0) -111)
+ (scale-float (float -8342641792577533 1.0d0) -169)
+ (scale-float (float -8693027931367903 1.0d0) -223)
+ (scale-float (float 7826147505078272 1.0d0) -280))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6043242690251722 1.0d0) -54)
+ (scale-float (float -6823498238092008 1.0d0) -108)
+ (scale-float (float 5156075600076135 1.0d0) -163)
+ (scale-float (float 5509330990390834 1.0d0) -217)
+ (scale-float (float -7625247047401472 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6074002140035432 1.0d0) -54)
+ (scale-float (float 8851806976168487 1.0d0) -108)
+ (scale-float (float 7760436775367546 1.0d0) -163)
+ (scale-float (float 8701028159537337 1.0d0) -217)
+ (scale-float (float 6429747497533440 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6104793425099445 1.0d0) -54)
+ (scale-float (float 5524941199192544 1.0d0) -110)
+ (scale-float (float 5681686620232979 1.0d0) -164)
+ (scale-float (float 7872486800685106 1.0d0) -220)
+ (scale-float (float 8442387486474240 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6135616740027952 1.0d0) -54)
+ (scale-float (float -5642491117656146 1.0d0) -109)
+ (scale-float (float -6325102746319316 1.0d0) -163)
+ (scale-float (float 6843328443259586 1.0d0) -218)
+ (scale-float (float 8220318131290112 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6166472280111972 1.0d0) -54)
+ (scale-float (float 8472944951004593 1.0d0) -112)
+ (scale-float (float -6347226898935615 1.0d0) -167)
+ (scale-float (float 7351557195299797 1.0d0) -221)
+ (scale-float (float 7019053524713472 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6197360241354719 1.0d0) -54)
+ (scale-float (float 7537680294401546 1.0d0) -109)
+ (scale-float (float -7101841700322343 1.0d0) -163)
+ (scale-float (float -8915761922702705 1.0d0) -217)
+ (scale-float (float -7990456879382528 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6228280820477004 1.0d0) -54)
+ (scale-float (float -5288687005014418 1.0d0) -110)
+ (scale-float (float -5218694617980360 1.0d0) -165)
+ (scale-float (float 8090026348149549 1.0d0) -222)
+ (scale-float (float -8214983313719296 1.0d0) -279))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6259234214922672 1.0d0) -54)
+ (scale-float (float -4927270964553817 1.0d0) -108)
+ (scale-float (float 8470215160096662 1.0d0) -162)
+ (scale-float (float 5678894538463109 1.0d0) -216)
+ (scale-float (float 7437533125492736 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6290220622864077 1.0d0) -54)
+ (scale-float (float -5699189270528091 1.0d0) -110)
+ (scale-float (float -5530242526137833 1.0d0) -165)
+ (scale-float (float -7285944726698883 1.0d0) -219)
+ (scale-float (float -7840080984604672 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6321240243207592 1.0d0) -54)
+ (scale-float (float 7696310263633004 1.0d0) -108)
+ (scale-float (float 7652206004191095 1.0d0) -162)
+ (scale-float (float 8455646026028582 1.0d0) -217)
+ (scale-float (float -4640241842241536 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6352293275599156 1.0d0) -54)
+ (scale-float (float 5622380131022882 1.0d0) -112)
+ (scale-float (float -7701356562694401 1.0d0) -166)
+ (scale-float (float 5774374304450041 1.0d0) -221)
+ (scale-float (float -5027086140440576 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6383379920429853 1.0d0) -54)
+ (scale-float (float 6082395000110047 1.0d0) -108)
+ (scale-float (float -8260835158694014 1.0d0) -162)
+ (scale-float (float 6462056623447527 1.0d0) -217)
+ (scale-float (float 8210404139991040 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6414500378841538 1.0d0) -54)
+ (scale-float (float 8932943429439749 1.0d0) -116)
+ (scale-float (float -8724350632606608 1.0d0) -170)
+ (scale-float (float 7394655254021948 1.0d0) -226)
+ (scale-float (float -6418771346456576 1.0d0) -282))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6445654852732489 1.0d0) -54)
+ (scale-float (float 6630692343746876 1.0d0) -109)
+ (scale-float (float 5596906211564236 1.0d0) -163)
+ (scale-float (float 7000775141288093 1.0d0) -217)
+ (scale-float (float 6712199320223744 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6476843544763107 1.0d0) -54)
+ (scale-float (float -6567463300180201 1.0d0) -113)
+ (scale-float (float 6081636173794535 1.0d0) -167)
+ (scale-float (float 5752987244692832 1.0d0) -221)
+ (scale-float (float 5566285230637056 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6508066658361646 1.0d0) -54)
+ (scale-float (float 7976136740103962 1.0d0) -115)
+ (scale-float (float -4792327024289416 1.0d0) -169)
+ (scale-float (float 7472671226932633 1.0d0) -223)
+ (scale-float (float -7703599982313472 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6539324397729987 1.0d0) -54)
+ (scale-float (float 6832979917352444 1.0d0) -108)
+ (scale-float (float 6972702137833669 1.0d0) -162)
+ (scale-float (float -8943357378665776 1.0d0) -216)
+ (scale-float (float -6456432423354368 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6570616967849450 1.0d0) -54)
+ (scale-float (float -7071935743463450 1.0d0) -109)
+ (scale-float (float -7085858170847411 1.0d0) -163)
+ (scale-float (float 8167119248956248 1.0d0) -217)
+ (scale-float (float 5159071191269376 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6601944574486640 1.0d0) -54)
+ (scale-float (float -4730863724076487 1.0d0) -108)
+ (scale-float (float 5593924526336144 1.0d0) -162)
+ (scale-float (float 8821645198570676 1.0d0) -216)
+ (scale-float (float -5909003596537856 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6633307424199341 1.0d0) -54)
+ (scale-float (float 5123807745717619 1.0d0) -108)
+ (scale-float (float 7828852147362391 1.0d0) -162)
+ (scale-float (float -6607069960518047 1.0d0) -216)
+ (scale-float (float 7502492267184128 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6664705724342446 1.0d0) -54)
+ (scale-float (float 5179129996467248 1.0d0) -110)
+ (scale-float (float 6591497583888178 1.0d0) -165)
+ (scale-float (float 8412536519395334 1.0d0) -219)
+ (scale-float (float 5472424847605760 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6696139683073924 1.0d0) -54)
+ (scale-float (float -8695911602891660 1.0d0) -108)
+ (scale-float (float 8796934384215369 1.0d0) -164)
+ (scale-float (float 8287182831733458 1.0d0) -219)
+ (scale-float (float -7570246986629120 1.0d0) -279))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6727609509360832 1.0d0) -54)
+ (scale-float (float -4792140185736031 1.0d0) -109)
+ (scale-float (float 5029912584640126 1.0d0) -163)
+ (scale-float (float 8375655587728771 1.0d0) -218)
+ (scale-float (float -6010696214642688 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6759115412985370 1.0d0) -54)
+ (scale-float (float 7049383263602121 1.0d0) -108)
+ (scale-float (float 7966500032978979 1.0d0) -164)
+ (scale-float (float -4946373334089235 1.0d0) -218)
+ (scale-float (float -5303541100707840 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6790657604550973 1.0d0) -54)
+ (scale-float (float 4562351160898659 1.0d0) -109)
+ (scale-float (float 7117762674089876 1.0d0) -163)
+ (scale-float (float -6050459464943318 1.0d0) -217)
+ (scale-float (float -6194175991496704 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6822236295488445 1.0d0) -54)
+ (scale-float (float -7959086277234874 1.0d0) -108)
+ (scale-float (float 7116815396353598 1.0d0) -163)
+ (scale-float (float 6417940948877921 1.0d0) -221)
+ (scale-float (float 4917787165720576 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6853851698062138 1.0d0) -54)
+ (scale-float (float -6460794880831946 1.0d0) -108)
+ (scale-float (float 8627544627817744 1.0d0) -162)
+ (scale-float (float 7782632443999495 1.0d0) -217)
+ (scale-float (float 7698335235620864 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6885504025376175 1.0d0) -54)
+ (scale-float (float -7875200407081130 1.0d0) -108)
+ (scale-float (float -8817586453762137 1.0d0) -162)
+ (scale-float (float 6791034107818861 1.0d0) -217)
+ (scale-float (float 5785633163706368 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6917193491380711 1.0d0) -54)
+ (scale-float (float -6354209598707159 1.0d0) -108)
+ (scale-float (float -5547257667359391 1.0d0) -164)
+ (scale-float (float 7480953384043884 1.0d0) -219)
+ (scale-float (float -8601638328205312 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6948920310878242 1.0d0) -54)
+ (scale-float (float -6529425724220061 1.0d0) -109)
+ (scale-float (float -6770777863446063 1.0d0) -165)
+ (scale-float (float -4601927600113987 1.0d0) -219)
+ (scale-float (float 8743288922570752 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6980684699529956 1.0d0) -54)
+ (scale-float (float 8911111487182626 1.0d0) -112)
+ (scale-float (float 7866043195791426 1.0d0) -166)
+ (scale-float (float 8793868358744477 1.0d0) -221)
+ (scale-float (float -7412261453824000 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7012486873862129 1.0d0) -54)
+ (scale-float (float 5958377739269213 1.0d0) -110)
+ (scale-float (float -7126019962434707 1.0d0) -164)
+ (scale-float (float 4824810954656316 1.0d0) -219)
+ (scale-float (float -8754419670319104 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7044327051272565 1.0d0) -54)
+ (scale-float (float 8724280902124377 1.0d0) -109)
+ (scale-float (float 4631327155432459 1.0d0) -167)
+ (scale-float (float -4535605803026965 1.0d0) -222)
+ (scale-float (float -7769500766175232 1.0d0) -279))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7076205450037083 1.0d0) -54)
+ (scale-float (float 7469881275853812 1.0d0) -110)
+ (scale-float (float 8708125460348437 1.0d0) -164)
+ (scale-float (float -7998827950423527 1.0d0) -218)
+ (scale-float (float -8476933266341888 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7108122289316047 1.0d0) -54)
+ (scale-float (float 7844065984858103 1.0d0) -110)
+ (scale-float (float -6265580730468145 1.0d0) -164)
+ (scale-float (float 5578640096157721 1.0d0) -219)
+ (scale-float (float -6708594653265920 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7140077789160945 1.0d0) -54)
+ (scale-float (float 5965174660247916 1.0d0) -109)
+ (scale-float (float -8979964131353364 1.0d0) -163)
+ (scale-float (float -5163836372762478 1.0d0) -217)
+ (scale-float (float 8878184495742976 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7172072170521013 1.0d0) -54)
+ (scale-float (float -7076061197762374 1.0d0) -109)
+ (scale-float (float 5765333970830459 1.0d0) -164)
+ (scale-float (float -6406058352004189 1.0d0) -218)
+ (scale-float (float -7318116292624384 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7204105655249904 1.0d0) -54)
+ (scale-float (float 5590020707555993 1.0d0) -108)
+ (scale-float (float -6275769150676932 1.0d0) -162)
+ (scale-float (float 4524690169176737 1.0d0) -216)
+ (scale-float (float 5981746075271168 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7236178466112411 1.0d0) -54)
+ (scale-float (float 5287135525880444 1.0d0) -108)
+ (scale-float (float 6884703324941259 1.0d0) -162)
+ (scale-float (float -7030092162738900 1.0d0) -216)
+ (scale-float (float 5449045606326272 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7268290826791229 1.0d0) -54)
+ (scale-float (float 8908878693758047 1.0d0) -110)
+ (scale-float (float 6583205550288448 1.0d0) -165)
+ (scale-float (float -7063133806406844 1.0d0) -219)
+ (scale-float (float -8497968332931072 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7300442961893772 1.0d0) -54)
+ (scale-float (float -5189387157646678 1.0d0) -108)
+ (scale-float (float 6394955726653622 1.0d0) -164)
+ (scale-float (float -5970634234690477 1.0d0) -218)
+ (scale-float (float -7827681844756480 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7332635096959035 1.0d0) -54)
+ (scale-float (float 6145511953117053 1.0d0) -110)
+ (scale-float (float 4849814450306723 1.0d0) -164)
+ (scale-float (float 7224717405471284 1.0d0) -218)
+ (scale-float (float 6818068026753024 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7364867458464510 1.0d0) -54)
+ (scale-float (float 8068821842627122 1.0d0) -109)
+ (scale-float (float 7885942447230440 1.0d0) -163)
+ (scale-float (float 8809025038724724 1.0d0) -220)
+ (scale-float (float 4604826755792896 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7397140273833146 1.0d0) -54)
+ (scale-float (float -6624004835597461 1.0d0) -108)
+ (scale-float (float 5198896387382290 1.0d0) -162)
+ (scale-float (float -5012278774128324 1.0d0) -218)
+ (scale-float (float -6712284233859072 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7429453771440360 1.0d0) -54)
+ (scale-float (float 8489043669316735 1.0d0) -110)
+ (scale-float (float -8272354051739522 1.0d0) -164)
+ (scale-float (float -7527576378627699 1.0d0) -218)
+ (scale-float (float 6127773839654912 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7461808180621106 1.0d0) -54)
+ (scale-float (float 4656636580228777 1.0d0) -108)
+ (scale-float (float 6180324450698708 1.0d0) -162)
+ (scale-float (float 5197737643093849 1.0d0) -216)
+ (scale-float (float 6206530073722880 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7494203731676985 1.0d0) -54)
+ (scale-float (float 6244875916705196 1.0d0) -111)
+ (scale-float (float 8987612493169679 1.0d0) -169)
+ (scale-float (float -8944438406190422 1.0d0) -223)
+ (scale-float (float 7609318509641728 1.0d0) -279))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7526640655883412 1.0d0) -54)
+ (scale-float (float 6331346795363729 1.0d0) -109)
+ (scale-float (float -6617581128370878 1.0d0) -165)
+ (scale-float (float 7868923505990833 1.0d0) -219)
+ (scale-float (float -5540407925800960 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7559119185496837 1.0d0) -54)
+ (scale-float (float -8382315125784704 1.0d0) -108)
+ (scale-float (float -4847750917965505 1.0d0) -163)
+ (scale-float (float 6892943650010337 1.0d0) -218)
+ (scale-float (float -8819192773771264 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7591639553762011 1.0d0) -54)
+ (scale-float (float 5287089863916958 1.0d0) -108)
+ (scale-float (float 5269373324311889 1.0d0) -162)
+ (scale-float (float -6075335453453672 1.0d0) -217)
+ (scale-float (float 4750037185069056 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7624201994919318 1.0d0) -54)
+ (scale-float (float 7236926661985700 1.0d0) -109)
+ (scale-float (float -8860397313852292 1.0d0) -163)
+ (scale-float (float 6876867734450069 1.0d0) -218)
+ (scale-float (float -7957423847571456 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7656806744212146 1.0d0) -54)
+ (scale-float (float -8383026502611194 1.0d0) -108)
+ (scale-float (float -8658391280494411 1.0d0) -162)
+ (scale-float (float -6672759996370751 1.0d0) -217)
+ (scale-float (float -6648095027888128 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7689454037894320 1.0d0) -54)
+ (scale-float (float 8767228658734370 1.0d0) -109)
+ (scale-float (float 7454538244443051 1.0d0) -163)
+ (scale-float (float -5789239105644557 1.0d0) -219)
+ (scale-float (float -7784663327834112 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7722144113237595 1.0d0) -54)
+ (scale-float (float -7347395286237679 1.0d0) -109)
+ (scale-float (float -6807613003826818 1.0d0) -163)
+ (scale-float (float -7183269477031958 1.0d0) -218)
+ (scale-float (float 7486604118687744 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7754877208539189 1.0d0) -54)
+ (scale-float (float 4809543627913825 1.0d0) -108)
+ (scale-float (float 7770423194575532 1.0d0) -162)
+ (scale-float (float 6555719213481071 1.0d0) -216)
+ (scale-float (float 5707868316991488 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7787653563129389 1.0d0) -54)
+ (scale-float (float 6679707993927243 1.0d0) -109)
+ (scale-float (float -5557463966156467 1.0d0) -163)
+ (scale-float (float 7831816151390989 1.0d0) -217)
+ (scale-float (float -5901536695484416 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7820473417379200 1.0d0) -54)
+ (scale-float (float -5610002486131308 1.0d0) -108)
+ (scale-float (float 8875542468436136 1.0d0) -165)
+ (scale-float (float 4575301741714284 1.0d0) -219)
+ (scale-float (float 6957289345777664 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7853337012708057 1.0d0) -54)
+ (scale-float (float -8654849815135912 1.0d0) -108)
+ (scale-float (float 7625770177442808 1.0d0) -162)
+ (scale-float (float -5031752653758568 1.0d0) -218)
+ (scale-float (float 6180074740023296 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7886244591591594 1.0d0) -54)
+ (scale-float (float 7529633780378438 1.0d0) -108)
+ (scale-float (float 5970704415981979 1.0d0) -163)
+ (scale-float (float -8821473076797850 1.0d0) -218)
+ (scale-float (float 4870462016585728 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7919196397569473 1.0d0) -54)
+ (scale-float (float 8245678006873045 1.0d0) -108)
+ (scale-float (float 8669879557377221 1.0d0) -162)
+ (scale-float (float 8187375233298366 1.0d0) -216)
+ (scale-float (float -7732782811553792 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7952192675253264 1.0d0) -54)
+ (scale-float (float -7871632387737584 1.0d0) -110)
+ (scale-float (float -4721494877770882 1.0d0) -164)
+ (scale-float (float -5760355777703592 1.0d0) -220)
+ (scale-float (float -8430539578015744 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7985233670334390 1.0d0) -54)
+ (scale-float (float 8995652793986095 1.0d0) -111)
+ (scale-float (float 7174036095151749 1.0d0) -166)
+ (scale-float (float 6888926189976943 1.0d0) -220)
+ (scale-float (float -4585856335085568 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8018319629592134 1.0d0) -54)
+ (scale-float (float -8809657438135170 1.0d0) -112)
+ (scale-float (float -7480916566417747 1.0d0) -167)
+ (scale-float (float 4981701802431024 1.0d0) -222)
+ (scale-float (float -6969389765099520 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8051450800901699 1.0d0) -54)
+ (scale-float (float 5434691875846169 1.0d0) -111)
+ (scale-float (float 8472824791907198 1.0d0) -165)
+ (scale-float (float -4993174229589980 1.0d0) -219)
+ (scale-float (float -8153916873375744 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8084627433242335 1.0d0) -54)
+ (scale-float (float -5348243161213007 1.0d0) -108)
+ (scale-float (float -5207677165003738 1.0d0) -163)
+ (scale-float (float 5128329117851419 1.0d0) -219)
+ (scale-float (float -5280568687984640 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8117849776705522 1.0d0) -54)
+ (scale-float (float 6927007138186838 1.0d0) -108)
+ (scale-float (float -5385777587490323 1.0d0) -162)
+ (scale-float (float 7882637401110373 1.0d0) -216)
+ (scale-float (float 6123034978058240 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8151118082503223 1.0d0) -54)
+ (scale-float (float 8010217738834082 1.0d0) -108)
+ (scale-float (float 6233869504436171 1.0d0) -163)
+ (scale-float (float 6579181500662535 1.0d0) -217)
+ (scale-float (float 8541736362459136 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8184432602976190 1.0d0) -54)
+ (scale-float (float -4678009856973107 1.0d0) -108)
+ (scale-float (float -6212101755560147 1.0d0) -163)
+ (scale-float (float 5386673916374896 1.0d0) -217)
+ (scale-float (float -6497159264468992 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8217793591602337 1.0d0) -54)
+ (scale-float (float 6670368160536144 1.0d0) -108)
+ (scale-float (float -5213186646564335 1.0d0) -162)
+ (scale-float (float 8005924993100813 1.0d0) -218)
+ (scale-float (float 4589742073348096 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8251201303005184 1.0d0) -54)
+ (scale-float (float 8472289190784020 1.0d0) -109)
+ (scale-float (float -6804170038942413 1.0d0) -163)
+ (scale-float (float -8481091176831416 1.0d0) -217)
+ (scale-float (float -8274927296708608 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8284655992962352 1.0d0) -54)
+ (scale-float (float 8737697740526153 1.0d0) -112)
+ (scale-float (float 4989327011412342 1.0d0) -166)
+ (scale-float (float -8654144241045042 1.0d0) -220)
+ (scale-float (float -7940971920490496 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8318157918414133 1.0d0) -54)
+ (scale-float (float 5393702223165852 1.0d0) -108)
+ (scale-float (float -6738619460628835 1.0d0) -166)
+ (scale-float (float 8111910404216900 1.0d0) -220)
+ (scale-float (float -7565201631084544 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8351707337472124 1.0d0) -54)
+ (scale-float (float 6580886723114489 1.0d0) -109)
+ (scale-float (float 7770629039908958 1.0d0) -163)
+ (scale-float (float 4539051284252494 1.0d0) -221)
+ (scale-float (float -7660419082616832 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8385304509427924 1.0d0) -54)
+ (scale-float (float -8991308292048439 1.0d0) -108)
+ (scale-float (float 7468341065508424 1.0d0) -165)
+ (scale-float (float 5818796494072124 1.0d0) -219)
+ (scale-float (float -5028710098403328 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8418949694761899 1.0d0) -54)
+ (scale-float (float -6374091378859262 1.0d0) -109)
+ (scale-float (float -5374943449723078 1.0d0) -165)
+ (scale-float (float 4555101501983793 1.0d0) -219)
+ (scale-float (float -7702943139364864 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8452643155152020 1.0d0) -54)
+ (scale-float (float 6202274721011577 1.0d0) -109)
+ (scale-float (float -6491377662184166 1.0d0) -165)
+ (scale-float (float -7017573449004785 1.0d0) -219)
+ (scale-float (float 5590855932182528 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8486385153482762 1.0d0) -54)
+ (scale-float (float 8766047713785899 1.0d0) -112)
+ (scale-float (float -8232917648720740 1.0d0) -166)
+ (scale-float (float 8248969779935131 1.0d0) -222)
+ (scale-float (float -7864480035241984 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8520175953854074 1.0d0) -54)
+ (scale-float (float 5652739356775365 1.0d0) -108)
+ (scale-float (float 7725888744126575 1.0d0) -163)
+ (scale-float (float 6266873194749620 1.0d0) -217)
+ (scale-float (float -4692701312122880 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8554015821590423 1.0d0) -54)
+ (scale-float (float -5572600197130009 1.0d0) -113)
+ (scale-float (float -6831622091652219 1.0d0) -167)
+ (scale-float (float -8563553322584176 1.0d0) -221)
+ (scale-float (float 6205059659202560 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8587905023249901 1.0d0) -54)
+ (scale-float (float 7612881592390848 1.0d0) -112)
+ (scale-float (float 5922087062680907 1.0d0) -167)
+ (scale-float (float -7007212083047902 1.0d0) -221)
+ (scale-float (float 8116629915828224 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8621843826633410 1.0d0) -54)
+ (scale-float (float 6322337749047105 1.0d0) -108)
+ (scale-float (float 7560634196812342 1.0d0) -164)
+ (scale-float (float 7870288845622429 1.0d0) -221)
+ (scale-float (float -5998834309136384 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8655832500793916 1.0d0) -54)
+ (scale-float (float -8363952213368707 1.0d0) -108)
+ (scale-float (float -5396004779500850 1.0d0) -162)
+ (scale-float (float 5885940877540764 1.0d0) -216)
+ (scale-float (float -5256022017605632 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8689871316045770 1.0d0) -54)
+ (scale-float (float -7432889515702178 1.0d0) -110)
+ (scale-float (float 8866649053132337 1.0d0) -166)
+ (scale-float (float 4767266423799998 1.0d0) -220)
+ (scale-float (float -8296562063704064 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8723960543974115 1.0d0) -54)
+ (scale-float (float -4842581324068868 1.0d0) -108)
+ (scale-float (float -7076387154038018 1.0d0) -162)
+ (scale-float (float 8373442959647582 1.0d0) -217)
+ (scale-float (float -5502449543413760 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8758100457444352 1.0d0) -54)
+ (scale-float (float 7341009967788563 1.0d0) -108)
+ (scale-float (float -7592821898804018 1.0d0) -162)
+ (scale-float (float -5116645296225785 1.0d0) -217)
+ (scale-float (float 6627560141357056 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8792291330611694 1.0d0) -54)
+ (scale-float (float 6027011009825708 1.0d0) -111)
+ (scale-float (float 7328159808672179 1.0d0) -166)
+ (scale-float (float -5158623149089477 1.0d0) -227)
+ (scale-float (float -7541098192830464 1.0d0) -281))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8826533438930782 1.0d0) -54)
+ (scale-float (float 8877873613918524 1.0d0) -108)
+ (scale-float (float -5947216410343675 1.0d0) -162)
+ (scale-float (float 6224794289481471 1.0d0) -218)
+ (scale-float (float -7516413266264064 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8860827059165391 1.0d0) -54)
+ (scale-float (float 7605474188324829 1.0d0) -108)
+ (scale-float (float -6361355458841842 1.0d0) -164)
+ (scale-float (float -8265341481836926 1.0d0) -218)
+ (scale-float (float -7951326072799232 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8895172469398201 1.0d0) -54)
+ (scale-float (float 6205080002828305 1.0d0) -109)
+ (scale-float (float 5411233389563850 1.0d0) -164)
+ (scale-float (float 8722910855031143 1.0d0) -220)
+ (scale-float (float -8225830325321728 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8929569949040652 1.0d0) -54)
+ (scale-float (float 7985823067656771 1.0d0) -109)
+ (scale-float (float -7312356250659901 1.0d0) -165)
+ (scale-float (float 8966079680896307 1.0d0) -220)
+ (scale-float (float -6226556696133632 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8964019778842877 1.0d0) -54)
+ (scale-float (float -6541485911088680 1.0d0) -113)
+ (scale-float (float -5666681644673596 1.0d0) -172)
+ (scale-float (float -5551580701507223 1.0d0) -226)
+ (scale-float (float 6001647847211008 1.0d0) -280))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8998522240903711 1.0d0) -54)
+ (scale-float (float -8693690530636151 1.0d0) -109)
+ (scale-float (float -6017760811640363 1.0d0) -163)
+ (scale-float (float -8364834800251897 1.0d0) -217)
+ (scale-float (float -4597957294981120 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4516538809340391 1.0d0) -53)
+ (scale-float (float 4712323320191029 1.0d0) -107)
+ (scale-float (float 8117587223700539 1.0d0) -161)
+ (scale-float (float 8624475480540327 1.0d0) -216)
+ (scale-float (float 8192504200003584 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4533843098500343 1.0d0) -53)
+ (scale-float (float 4714495066670999 1.0d0) -107)
+ (scale-float (float 5844489966106497 1.0d0) -161)
+ (scale-float (float 5721123954595768 1.0d0) -216)
+ (scale-float (float -5969894765461504 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4551174131034618 1.0d0) -53)
+ (scale-float (float -6272022655175315 1.0d0) -107)
+ (scale-float (float 7666413529628192 1.0d0) -164)
+ (scale-float (float 7367618744276558 1.0d0) -219)
+ (scale-float (float -7733125290917888 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4568532050740898 1.0d0) -53)
+ (scale-float (float -8241010225918141 1.0d0) -107)
+ (scale-float (float 5569596895828755 1.0d0) -163)
+ (scale-float (float 4990389010213445 1.0d0) -217)
+ (scale-float (float -5293832305573888 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4585917002116852 1.0d0) -53)
+ (scale-float (float 5078639334726385 1.0d0) -108)
+ (scale-float (float 7422036535454205 1.0d0) -163)
+ (scale-float (float 8431631450077783 1.0d0) -218)
+ (scale-float (float -6462825830678528 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4603329130365388 1.0d0) -53)
+ (scale-float (float -5452657142606152 1.0d0) -113)
+ (scale-float (float -5572966958953144 1.0d0) -167)
+ (scale-float (float 4896067438188759 1.0d0) -221)
+ (scale-float (float 6056677421350912 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4620768581399943 1.0d0) -53)
+ (scale-float (float -6394889512408980 1.0d0) -107)
+ (scale-float (float -5248674441708195 1.0d0) -161)
+ (scale-float (float 8031626806578780 1.0d0) -215)
+ (scale-float (float -6772328549416960 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4638235501849821 1.0d0) -53)
+ (scale-float (float 7342849852426935 1.0d0) -109)
+ (scale-float (float 4940420208140210 1.0d0) -166)
+ (scale-float (float -4950318263085061 1.0d0) -220)
+ (scale-float (float -4625648551985152 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4655730039065576 1.0d0) -53)
+ (scale-float (float -7385125698097314 1.0d0) -107)
+ (scale-float (float -6384809890151543 1.0d0) -163)
+ (scale-float (float -5800383841029970 1.0d0) -220)
+ (scale-float (float -6188260689969152 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4673252341124429 1.0d0) -53)
+ (scale-float (float -5924877989770359 1.0d0) -111)
+ (scale-float (float 7048520143305684 1.0d0) -167)
+ (scale-float (float 6111597169126294 1.0d0) -221)
+ (scale-float (float 5050432387809280 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4690802556835742 1.0d0) -53)
+ (scale-float (float 6332623197245562 1.0d0) -107)
+ (scale-float (float -7492074553469258 1.0d0) -162)
+ (scale-float (float -6754431030774425 1.0d0) -219)
+ (scale-float (float -5812764733865984 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4708380835746527 1.0d0) -53)
+ (scale-float (float 5051916109759041 1.0d0) -108)
+ (scale-float (float -5679535756966327 1.0d0) -162)
+ (scale-float (float -6625043549544358 1.0d0) -217)
+ (scale-float (float -5153473959624704 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4725987328147002 1.0d0) -53)
+ (scale-float (float 5351540980857506 1.0d0) -107)
+ (scale-float (float 5017698638689441 1.0d0) -161)
+ (scale-float (float -7113428247683296 1.0d0) -215)
+ (scale-float (float -6001342382342144 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4743622185076197 1.0d0) -53)
+ (scale-float (float -4748758349123609 1.0d0) -109)
+ (scale-float (float -5492849729385543 1.0d0) -165)
+ (scale-float (float 5442895358036660 1.0d0) -219)
+ (scale-float (float -5758552221941760 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4761285558327599 1.0d0) -53)
+ (scale-float (float -7001910292957345 1.0d0) -109)
+ (scale-float (float 7369944209338672 1.0d0) -164)
+ (scale-float (float 4733316477155528 1.0d0) -220)
+ (scale-float (float -7265936393895936 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4778977600454850 1.0d0) -53)
+ (scale-float (float -8163617702390692 1.0d0) -108)
+ (scale-float (float 8888228832011218 1.0d0) -163)
+ (scale-float (float -8419129775633155 1.0d0) -217)
+ (scale-float (float -5492767800557568 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4796698464777487 1.0d0) -53)
+ (scale-float (float -5714826189455742 1.0d0) -107)
+ (scale-float (float 8099898202192098 1.0d0) -162)
+ (scale-float (float 7041527205063924 1.0d0) -217)
+ (scale-float (float 8188407241244672 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4814448305386732 1.0d0) -53)
+ (scale-float (float -8539132865176413 1.0d0) -107)
+ (scale-float (float 5822439319087047 1.0d0) -162)
+ (scale-float (float 5825333419334273 1.0d0) -217)
+ (scale-float (float -5781450953359360 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4832227277151328 1.0d0) -53)
+ (scale-float (float -8438381943499715 1.0d0) -111)
+ (scale-float (float -8372592215131924 1.0d0) -165)
+ (scale-float (float 8679567552715980 1.0d0) -219)
+ (scale-float (float 6272998587891712 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4850035535723427 1.0d0) -53)
+ (scale-float (float -7945180857706407 1.0d0) -108)
+ (scale-float (float 7714728014554843 1.0d0) -164)
+ (scale-float (float 5808308686522136 1.0d0) -219)
+ (scale-float (float 8751604008878080 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4867873237544520 1.0d0) -53)
+ (scale-float (float -5019721500009499 1.0d0) -109)
+ (scale-float (float 8026920363984100 1.0d0) -164)
+ (scale-float (float -6714864918368138 1.0d0) -219)
+ (scale-float (float -6406155998855168 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4885740539851424 1.0d0) -53)
+ (scale-float (float 4655630896099995 1.0d0) -110)
+ (scale-float (float -5361624528102949 1.0d0) -166)
+ (scale-float (float -8600022955113898 1.0d0) -220)
+ (scale-float (float -8315235169468416 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4903637600682314 1.0d0) -53)
+ (scale-float (float -8343593797004275 1.0d0) -107)
+ (scale-float (float -6880464660655384 1.0d0) -163)
+ (scale-float (float -5161724039003758 1.0d0) -218)
+ (scale-float (float -8758778528661504 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4921564578882804 1.0d0) -53)
+ (scale-float (float 4558698905876837 1.0d0) -107)
+ (scale-float (float -6675770933383906 1.0d0) -163)
+ (scale-float (float -6175485009200689 1.0d0) -218)
+ (scale-float (float 5416315432468480 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4939521634112088 1.0d0) -53)
+ (scale-float (float -5768107888022972 1.0d0) -107)
+ (scale-float (float -6517650997167120 1.0d0) -162)
+ (scale-float (float 7307944886714264 1.0d0) -218)
+ (scale-float (float 7980825110249472 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4957508926849117 1.0d0) -53)
+ (scale-float (float -5880729525638918 1.0d0) -107)
+ (scale-float (float -5880387024013551 1.0d0) -161)
+ (scale-float (float 8057969928250970 1.0d0) -215)
+ (scale-float (float 6944751229255680 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4975526618398843 1.0d0) -53)
+ (scale-float (float -6577772829195700 1.0d0) -111)
+ (scale-float (float -7049929814140454 1.0d0) -165)
+ (scale-float (float -5584941222299087 1.0d0) -219)
+ (scale-float (float -6585434108854272 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4993574870898507 1.0d0) -53)
+ (scale-float (float 5062895028490683 1.0d0) -108)
+ (scale-float (float 8217973798328345 1.0d0) -162)
+ (scale-float (float 5371979073867810 1.0d0) -217)
+ (scale-float (float -8517496665931776 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5011653847323981 1.0d0) -53)
+ (scale-float (float 6662133346642981 1.0d0) -107)
+ (scale-float (float -7386942265315174 1.0d0) -162)
+ (scale-float (float -6222074877515867 1.0d0) -216)
+ (scale-float (float -4907384985075712 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5029763711496166 1.0d0) -53)
+ (scale-float (float -5433443448605480 1.0d0) -108)
+ (scale-float (float 7332416874678522 1.0d0) -162)
+ (scale-float (float -6100455288116160 1.0d0) -216)
+ (scale-float (float -4762855684489216 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5047904628087439 1.0d0) -53)
+ (scale-float (float 6026828497807981 1.0d0) -109)
+ (scale-float (float -6878535050593153 1.0d0) -163)
+ (scale-float (float -8177381643089568 1.0d0) -217)
+ (scale-float (float 5873772891799552 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5066076762628163 1.0d0) -53)
+ (scale-float (float -6507542383268338 1.0d0) -108)
+ (scale-float (float -5513687939405299 1.0d0) -163)
+ (scale-float (float -5818442986183336 1.0d0) -218)
+ (scale-float (float 5663989782020096 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5084280281513242 1.0d0) -53)
+ (scale-float (float 7467568404310058 1.0d0) -109)
+ (scale-float (float 7834463879395691 1.0d0) -164)
+ (scale-float (float -6214698115088728 1.0d0) -218)
+ (scale-float (float 7834731090018304 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5102515352008741 1.0d0) -53)
+ (scale-float (float 7579413498622770 1.0d0) -110)
+ (scale-float (float 8133827303462379 1.0d0) -165)
+ (scale-float (float -6468784855578576 1.0d0) -221)
+ (scale-float (float -6064180980875264 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5120782142258555 1.0d0) -53)
+ (scale-float (float -7003545277399288 1.0d0) -109)
+ (scale-float (float 9004947866668099 1.0d0) -165)
+ (scale-float (float -4888525092852748 1.0d0) -221)
+ (scale-float (float 8141576595308544 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5139080821291139 1.0d0) -53)
+ (scale-float (float -5195165037288157 1.0d0) -109)
+ (scale-float (float -5919373685808232 1.0d0) -165)
+ (scale-float (float -8464948068835386 1.0d0) -219)
+ (scale-float (float 4984409489932288 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5157411559026295 1.0d0) -53)
+ (scale-float (float -6869926425063928 1.0d0) -108)
+ (scale-float (float -5065083946326269 1.0d0) -162)
+ (scale-float (float 5740385651574615 1.0d0) -219)
+ (scale-float (float -6017247978717184 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5175774526282015 1.0d0) -53)
+ (scale-float (float 8151256617197900 1.0d0) -110)
+ (scale-float (float -5090237931201716 1.0d0) -166)
+ (scale-float (float 4822061880865465 1.0d0) -221)
+ (scale-float (float -7849799357825024 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5194169894781386 1.0d0) -53)
+ (scale-float (float 5720248741678870 1.0d0) -109)
+ (scale-float (float 8476785785156408 1.0d0) -163)
+ (scale-float (float 6427013979864677 1.0d0) -218)
+ (scale-float (float 5803423157452800 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5212597837159551 1.0d0) -53)
+ (scale-float (float -8620836191453318 1.0d0) -107)
+ (scale-float (float 5502489131210675 1.0d0) -162)
+ (scale-float (float -7155086140526867 1.0d0) -216)
+ (scale-float (float -5458023103414272 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5231058526970729 1.0d0) -53)
+ (scale-float (float 8501416089415538 1.0d0) -107)
+ (scale-float (float -7323763124249820 1.0d0) -161)
+ (scale-float (float -7091310731773024 1.0d0) -215)
+ (scale-float (float -8850570112040960 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5249552138695305 1.0d0) -53)
+ (scale-float (float 6446250485425073 1.0d0) -108)
+ (scale-float (float 7083381607740477 1.0d0) -164)
+ (scale-float (float -5327682890406449 1.0d0) -221)
+ (scale-float (float 6771644567650304 1.0d0) -279))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5268078847746965 1.0d0) -53)
+ (scale-float (float -7510185916055648 1.0d0) -109)
+ (scale-float (float 6448163352840430 1.0d0) -167)
+ (scale-float (float 6325767741577631 1.0d0) -223)
+ (scale-float (float 4857990289031168 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5286638830479906 1.0d0) -53)
+ (scale-float (float 8984572682883449 1.0d0) -107)
+ (scale-float (float 8908915364579007 1.0d0) -162)
+ (scale-float (float -8223388342784113 1.0d0) -216)
+ (scale-float (float 5798531723657216 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5305232264196107 1.0d0) -53)
+ (scale-float (float -8609900257612480 1.0d0) -107)
+ (scale-float (float -5052626816997173 1.0d0) -161)
+ (scale-float (float -7143976190293253 1.0d0) -216)
+ (scale-float (float 6384342274637824 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5323859327152651 1.0d0) -53)
+ (scale-float (float 4755051264805225 1.0d0) -107)
+ (scale-float (float -5319438623619327 1.0d0) -161)
+ (scale-float (float 7827806197208571 1.0d0) -215)
+ (scale-float (float 8992059237531648 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5342520198569132 1.0d0) -53)
+ (scale-float (float -6754203398931628 1.0d0) -107)
+ (scale-float (float 5271617458007905 1.0d0) -161)
+ (scale-float (float -6616588986438304 1.0d0) -215)
+ (scale-float (float -7840693537767424 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5361215058635102 1.0d0) -53)
+ (scale-float (float 6270609391735678 1.0d0) -107)
+ (scale-float (float -5698788142442072 1.0d0) -161)
+ (scale-float (float 8842738579911480 1.0d0) -217)
+ (scale-float (float 5166792707047424 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5379944088517606 1.0d0) -53)
+ (scale-float (float 6052877702039045 1.0d0) -107)
+ (scale-float (float 7111566148157146 1.0d0) -161)
+ (scale-float (float -8776373810154238 1.0d0) -219)
+ (scale-float (float -8095346564005888 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5398707470368765 1.0d0) -53)
+ (scale-float (float -4797461858526456 1.0d0) -107)
+ (scale-float (float 6732965623139239 1.0d0) -162)
+ (scale-float (float 7749442918798755 1.0d0) -217)
+ (scale-float (float -6473382152568832 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5417505387333433 1.0d0) -53)
+ (scale-float (float 8398376083975219 1.0d0) -107)
+ (scale-float (float 8156124031565761 1.0d0) -165)
+ (scale-float (float -7691301946366969 1.0d0) -219)
+ (scale-float (float 5984958108270592 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5436338023556927 1.0d0) -53)
+ (scale-float (float -4676226270750820 1.0d0) -109)
+ (scale-float (float -7332101047345434 1.0d0) -163)
+ (scale-float (float 7501454629761823 1.0d0) -219)
+ (scale-float (float 5036410457423872 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5455205564192810 1.0d0) -53)
+ (scale-float (float -7520232765810273 1.0d0) -107)
+ (scale-float (float 5106219158126203 1.0d0) -161)
+ (scale-float (float -6069406356390033 1.0d0) -215)
+ (scale-float (float -6621799189684224 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5474108195410756 1.0d0) -53)
+ (scale-float (float 5963009621159524 1.0d0) -110)
+ (scale-float (float 8753520270311418 1.0d0) -168)
+ (scale-float (float 8476234578374146 1.0d0) -222)
+ (scale-float (float 6616462837940224 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5493046104404481 1.0d0) -53)
+ (scale-float (float -7240953236880992 1.0d0) -107)
+ (scale-float (float 6687816297030731 1.0d0) -163)
+ (scale-float (float 6177251312029357 1.0d0) -219)
+ (scale-float (float 5062687302352896 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5512019479399737 1.0d0) -53)
+ (scale-float (float -5337476887189881 1.0d0) -107)
+ (scale-float (float 8132746143439031 1.0d0) -162)
+ (scale-float (float 6203706505607338 1.0d0) -219)
+ (scale-float (float 8549331347439616 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5531028509662387 1.0d0) -53)
+ (scale-float (float 5006253830174276 1.0d0) -107)
+ (scale-float (float -6064611521532516 1.0d0) -163)
+ (scale-float (float 5075026078773125 1.0d0) -220)
+ (scale-float (float -8088168960098304 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5550073385506547 1.0d0) -53)
+ (scale-float (float -7963748165533310 1.0d0) -107)
+ (scale-float (float 5408021657844878 1.0d0) -164)
+ (scale-float (float -6897421132571305 1.0d0) -218)
+ (scale-float (float 5961352389984256 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5569154298302794 1.0d0) -53)
+ (scale-float (float 4615503510353601 1.0d0) -107)
+ (scale-float (float -7540979643400192 1.0d0) -172)
+ (scale-float (float 7836118583884861 1.0d0) -228)
+ (scale-float (float -6583101056614400 1.0d0) -282))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5588271440486463 1.0d0) -53)
+ (scale-float (float -7308982168651133 1.0d0) -108)
+ (scale-float (float 6922685267173202 1.0d0) -162)
+ (scale-float (float -7857914317401664 1.0d0) -217)
+ (scale-float (float 5791752692269056 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5607425005565998 1.0d0) -53)
+ (scale-float (float 7456123125286854 1.0d0) -107)
+ (scale-float (float -6354016403351228 1.0d0) -163)
+ (scale-float (float -4731131524276583 1.0d0) -221)
+ (scale-float (float -8326281708961792 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5626615188131397 1.0d0) -53)
+ (scale-float (float -7513025945375216 1.0d0) -109)
+ (scale-float (float -6658975433691672 1.0d0) -163)
+ (scale-float (float 6802116939384472 1.0d0) -217)
+ (scale-float (float -8678364394618880 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5645842183862715 1.0d0) -53)
+ (scale-float (float -7743478944270931 1.0d0) -108)
+ (scale-float (float -6353264113068006 1.0d0) -166)
+ (scale-float (float -8340573167581726 1.0d0) -220)
+ (scale-float (float 5344765958422528 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5665106189538657 1.0d0) -53)
+ (scale-float (float -5978929548864813 1.0d0) -108)
+ (scale-float (float -5463588819488222 1.0d0) -163)
+ (scale-float (float 6003114251484877 1.0d0) -218)
+ (scale-float (float 7222947287400448 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5684407403045241 1.0d0) -53)
+ (scale-float (float -8294272085087370 1.0d0) -107)
+ (scale-float (float -8381390268267532 1.0d0) -161)
+ (scale-float (float 5416108916544789 1.0d0) -217)
+ (scale-float (float 6054767888465920 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5703746023384539 1.0d0) -53)
+ (scale-float (float -7456086796685430 1.0d0) -107)
+ (scale-float (float 7120442194564315 1.0d0) -163)
+ (scale-float (float -8693281305931273 1.0d0) -219)
+ (scale-float (float -6974898897551360 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5723122250683500 1.0d0) -53)
+ (scale-float (float 5093982224413668 1.0d0) -110)
+ (scale-float (float -8917924974158974 1.0d0) -164)
+ (scale-float (float -8201133831457905 1.0d0) -218)
+ (scale-float (float 4813372552380416 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5742536286202851 1.0d0) -53)
+ (scale-float (float 8097550956249641 1.0d0) -109)
+ (scale-float (float -6700769854112535 1.0d0) -163)
+ (scale-float (float -8486352386985402 1.0d0) -220)
+ (scale-float (float -6325315755835392 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5761988332346076 1.0d0) -53)
+ (scale-float (float 8070044467396410 1.0d0) -107)
+ (scale-float (float 7521571299958967 1.0d0) -162)
+ (scale-float (float -7360931258275250 1.0d0) -216)
+ (scale-float (float -8041194637131776 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5781478592668482 1.0d0) -53)
+ (scale-float (float -6348649609093203 1.0d0) -107)
+ (scale-float (float -7865776481343855 1.0d0) -163)
+ (scale-float (float -7414322417664008 1.0d0) -217)
+ (scale-float (float -7923972996399104 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5801007271886338 1.0d0) -53)
+ (scale-float (float 4883452379124426 1.0d0) -109)
+ (scale-float (float 5517722868438546 1.0d0) -166)
+ (scale-float (float 7452721618571625 1.0d0) -223)
+ (scale-float (float -7797708580454400 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5820574575886111 1.0d0) -53)
+ (scale-float (float -5544453050321818 1.0d0) -107)
+ (scale-float (float -6019990252576236 1.0d0) -161)
+ (scale-float (float -5241780552283328 1.0d0) -215)
+ (scale-float (float -4599632823230464 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5840180711733770 1.0d0) -53)
+ (scale-float (float 5617607438242589 1.0d0) -112)
+ (scale-float (float 6400824792886757 1.0d0) -166)
+ (scale-float (float -6353522462595121 1.0d0) -221)
+ (scale-float (float 6875531474632704 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5859825887684189 1.0d0) -53)
+ (scale-float (float -6902423295780859 1.0d0) -108)
+ (scale-float (float 8888330413005266 1.0d0) -162)
+ (scale-float (float 7535209701492570 1.0d0) -216)
+ (scale-float (float -8860849506877440 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5879510313190625 1.0d0) -53)
+ (scale-float (float -6814694338286297 1.0d0) -108)
+ (scale-float (float -8801549044228897 1.0d0) -162)
+ (scale-float (float 4999351469611069 1.0d0) -216)
+ (scale-float (float 8673660416131072 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5899234198914290 1.0d0) -53)
+ (scale-float (float 6283006921937045 1.0d0) -109)
+ (scale-float (float 6200229083739520 1.0d0) -164)
+ (scale-float (float 4977927589994460 1.0d0) -218)
+ (scale-float (float -7605320988360704 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5918997756734008 1.0d0) -53)
+ (scale-float (float 6988684443349567 1.0d0) -108)
+ (scale-float (float -6152520313082565 1.0d0) -162)
+ (scale-float (float -7782308246609974 1.0d0) -219)
+ (scale-float (float 8754796978765824 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5938801199755960 1.0d0) -53)
+ (scale-float (float -5926394093514177 1.0d0) -115)
+ (scale-float (float 7620890547647189 1.0d0) -169)
+ (scale-float (float 8680018638312400 1.0d0) -223)
+ (scale-float (float -4624686801485824 1.0d0) -278))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5958644742323519 1.0d0) -53)
+ (scale-float (float 5837499729476640 1.0d0) -108)
+ (scale-float (float 5805594171748389 1.0d0) -169)
+ (scale-float (float 6841182626183782 1.0d0) -224)
+ (scale-float (float 5399122601312256 1.0d0) -278))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5978528600027178 1.0d0) -53)
+ (scale-float (float 4703174464159792 1.0d0) -107)
+ (scale-float (float -5390198599519672 1.0d0) -162)
+ (scale-float (float -6489710829442164 1.0d0) -221)
+ (scale-float (float -4908450896150528 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5998452989714567 1.0d0) -53)
+ (scale-float (float -8096041220161000 1.0d0) -107)
+ (scale-float (float -7835598253830714 1.0d0) -161)
+ (scale-float (float -7012132770705025 1.0d0) -216)
+ (scale-float (float -7817595773452288 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6018418129500560 1.0d0) -53)
+ (scale-float (float 6659489087534709 1.0d0) -107)
+ (scale-float (float 8345502268995181 1.0d0) -162)
+ (scale-float (float -8150710203863600 1.0d0) -218)
+ (scale-float (float 7666645967306752 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6038424238777487 1.0d0) -53)
+ (scale-float (float 7781913615198190 1.0d0) -108)
+ (scale-float (float 7611681214395614 1.0d0) -162)
+ (scale-float (float 7024337346699218 1.0d0) -217)
+ (scale-float (float -7959062663266304 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6058471538225425 1.0d0) -53)
+ (scale-float (float -8636030985155905 1.0d0) -107)
+ (scale-float (float 6386033233360409 1.0d0) -161)
+ (scale-float (float -8264358932081060 1.0d0) -216)
+ (scale-float (float -8851278994014208 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6078560249822594 1.0d0) -53)
+ (scale-float (float 6154024088984338 1.0d0) -108)
+ (scale-float (float 5145445860402320 1.0d0) -162)
+ (scale-float (float 6519894297640498 1.0d0) -218)
+ (scale-float (float 7430925104119808 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6098690596855854 1.0d0) -53)
+ (scale-float (float -5742416278425873 1.0d0) -108)
+ (scale-float (float -8701688771941415 1.0d0) -163)
+ (scale-float (float 6856703381738876 1.0d0) -218)
+ (scale-float (float 8330054362464256 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6118862803931286 1.0d0) -53)
+ (scale-float (float 7287168916884525 1.0d0) -108)
+ (scale-float (float 6700569177866219 1.0d0) -162)
+ (scale-float (float -7056829416081209 1.0d0) -217)
+ (scale-float (float 7133017988202496 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6139077096984887 1.0d0) -53)
+ (scale-float (float 7601354138854478 1.0d0) -109)
+ (scale-float (float 7827836787722962 1.0d0) -163)
+ (scale-float (float -8707805869477676 1.0d0) -217)
+ (scale-float (float -7011207342981120 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6159333703293354 1.0d0) -53)
+ (scale-float (float -6300013242813811 1.0d0) -108)
+ (scale-float (float -7055273727637067 1.0d0) -163)
+ (scale-float (float 6354926587916120 1.0d0) -218)
+ (scale-float (float 7172218111066112 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6179632851484974 1.0d0) -53)
+ (scale-float (float 8851058764858042 1.0d0) -107)
+ (scale-float (float -5393991416546434 1.0d0) -161)
+ (scale-float (float -7087928934921133 1.0d0) -218)
+ (scale-float (float -7137013930983424 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6199974771550620 1.0d0) -53)
+ (scale-float (float -6095652345689366 1.0d0) -108)
+ (scale-float (float 7608163058261834 1.0d0) -164)
+ (scale-float (float 7860502758117739 1.0d0) -220)
+ (scale-float (float -8199903066980352 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6220359694854838 1.0d0) -53)
+ (scale-float (float 6523866044383337 1.0d0) -107)
+ (scale-float (float -6173852507803036 1.0d0) -164)
+ (scale-float (float 7082191144354423 1.0d0) -218)
+ (scale-float (float 6277452351078400 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6240787854147056 1.0d0) -53)
+ (scale-float (float 7281230495326443 1.0d0) -108)
+ (scale-float (float 4638527086501368 1.0d0) -162)
+ (scale-float (float -8570506498232121 1.0d0) -216)
+ (scale-float (float -6718319458402304 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6261259483572883 1.0d0) -53)
+ (scale-float (float -6213603737296974 1.0d0) -107)
+ (scale-float (float 8828115745955665 1.0d0) -163)
+ (scale-float (float -5444066038342533 1.0d0) -221)
+ (scale-float (float -6460963274883072 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6281774818685523 1.0d0) -53)
+ (scale-float (float -8190142974415872 1.0d0) -108)
+ (scale-float (float 8922183346235503 1.0d0) -163)
+ (scale-float (float 7614728183057357 1.0d0) -219)
+ (scale-float (float -7801636618895360 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6302334096457298 1.0d0) -53)
+ (scale-float (float 6139409532121475 1.0d0) -109)
+ (scale-float (float -8459381361295595 1.0d0) -163)
+ (scale-float (float 4819516272065152 1.0d0) -218)
+ (scale-float (float -6501872342401024 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6322937555291277 1.0d0) -53)
+ (scale-float (float -4996575910228414 1.0d0) -107)
+ (scale-float (float -8723418418458635 1.0d0) -165)
+ (scale-float (float -8209894426869078 1.0d0) -220)
+ (scale-float (float -5793670850150400 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6343585435033014 1.0d0) -53)
+ (scale-float (float 5692979910274044 1.0d0) -108)
+ (scale-float (float 5238809827312188 1.0d0) -164)
+ (scale-float (float 7473693542399043 1.0d0) -218)
+ (scale-float (float 8524454948110336 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6364277976982406 1.0d0) -53)
+ (scale-float (float -6416140146841029 1.0d0) -108)
+ (scale-float (float 6012843359468366 1.0d0) -162)
+ (scale-float (float 5190870914433327 1.0d0) -216)
+ (scale-float (float -6720177234771968 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6385015423905653 1.0d0) -53)
+ (scale-float (float -5299888057943309 1.0d0) -108)
+ (scale-float (float 7218658897639641 1.0d0) -163)
+ (scale-float (float -7564399872162399 1.0d0) -218)
+ (scale-float (float -6012036790878208 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6405798020047342 1.0d0) -53)
+ (scale-float (float 4771437957468797 1.0d0) -107)
+ (scale-float (float 7922057994526591 1.0d0) -164)
+ (scale-float (float 6305434990390014 1.0d0) -221)
+ (scale-float (float -5603070020943872 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6426626011142643 1.0d0) -53)
+ (scale-float (float -6161275590724442 1.0d0) -108)
+ (scale-float (float 7252093914251728 1.0d0) -165)
+ (scale-float (float 5781418451220263 1.0d0) -220)
+ (scale-float (float -5961254394920960 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6447499644429618 1.0d0) -53)
+ (scale-float (float -4504718518993321 1.0d0) -111)
+ (scale-float (float -8429352747261720 1.0d0) -165)
+ (scale-float (float 5543335249515187 1.0d0) -220)
+ (scale-float (float 8089805902577664 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6468419168661657 1.0d0) -53)
+ (scale-float (float 7838903660495786 1.0d0) -109)
+ (scale-float (float -5571298332786114 1.0d0) -163)
+ (scale-float (float -6383341328115460 1.0d0) -217)
+ (scale-float (float -6749775945596928 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6489384834120026 1.0d0) -53)
+ (scale-float (float 8970208082772124 1.0d0) -107)
+ (scale-float (float -7422249931715393 1.0d0) -161)
+ (scale-float (float -5719080457162672 1.0d0) -215)
+ (scale-float (float 8945949534576640 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6510396892626541 1.0d0) -53)
+ (scale-float (float 7552727392259982 1.0d0) -107)
+ (scale-float (float -6859084330124199 1.0d0) -161)
+ (scale-float (float 8323952238069947 1.0d0) -215)
+ (scale-float (float -5007933334437888 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6531455597556361 1.0d0) -53)
+ (scale-float (float -6776786845362370 1.0d0) -107)
+ (scale-float (float 5537658314917462 1.0d0) -161)
+ (scale-float (float 6558024436949175 1.0d0) -215)
+ (scale-float (float -7010751320473600 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6552561203850905 1.0d0) -53)
+ (scale-float (float -5075608684518640 1.0d0) -107)
+ (scale-float (float 6077079132341169 1.0d0) -161)
+ (scale-float (float -6051523991378174 1.0d0) -218)
+ (scale-float (float 6256815439020032 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6573713968030900 1.0d0) -53)
+ (scale-float (float -6610258687383610 1.0d0) -108)
+ (scale-float (float -5026765429437363 1.0d0) -165)
+ (scale-float (float 4817855703864593 1.0d0) -221)
+ (scale-float (float -5767616137789440 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6594914148209548 1.0d0) -53)
+ (scale-float (float -6479939408032255 1.0d0) -109)
+ (scale-float (float 8747802440996474 1.0d0) -163)
+ (scale-float (float -8305150090361413 1.0d0) -218)
+ (scale-float (float -8449931072503808 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6616162004105825 1.0d0) -53)
+ (scale-float (float 7449763630728054 1.0d0) -107)
+ (scale-float (float 6861855559321431 1.0d0) -162)
+ (scale-float (float 5079944506709764 1.0d0) -216)
+ (scale-float (float -4923941043568640 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6637457797057911 1.0d0) -53)
+ (scale-float (float 6533869147616686 1.0d0) -107)
+ (scale-float (float -7774676911384651 1.0d0) -162)
+ (scale-float (float 6559091031019990 1.0d0) -231)
+ (scale-float (float -5937883017904128 1.0d0) -285))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6658801790036747 1.0d0) -53)
+ (scale-float (float -8645917834399834 1.0d0) -108)
+ (scale-float (float -6459175220449992 1.0d0) -164)
+ (scale-float (float 5425107217767832 1.0d0) -218)
+ (scale-float (float 5490230981033984 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6680194247659727 1.0d0) -53)
+ (scale-float (float -7502326705482134 1.0d0) -107)
+ (scale-float (float 5122373436187108 1.0d0) -162)
+ (scale-float (float 4659855717958087 1.0d0) -216)
+ (scale-float (float -6282496273154048 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6701635436204526 1.0d0) -53)
+ (scale-float (float -6792633099855874 1.0d0) -113)
+ (scale-float (float -6718785746107185 1.0d0) -168)
+ (scale-float (float -8090407294887994 1.0d0) -225)
+ (scale-float (float 6302818184986624 1.0d0) -280))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6723125623623062 1.0d0) -53)
+ (scale-float (float 5348210264711913 1.0d0) -107)
+ (scale-float (float 4565069343244453 1.0d0) -162)
+ (scale-float (float -7777670701490282 1.0d0) -216)
+ (scale-float (float 8128569594937344 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6744665079555594 1.0d0) -53)
+ (scale-float (float 8390468820650359 1.0d0) -108)
+ (scale-float (float -7523599844690822 1.0d0) -162)
+ (scale-float (float -8138474779450287 1.0d0) -217)
+ (scale-float (float 7537177927876608 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6766254075344960 1.0d0) -53)
+ (scale-float (float 7124161662288890 1.0d0) -108)
+ (scale-float (float -5315676331877133 1.0d0) -162)
+ (scale-float (float 4586058689724245 1.0d0) -216)
+ (scale-float (float 6389392412737536 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6787892884050957 1.0d0) -53)
+ (scale-float (float 6589788053269867 1.0d0) -113)
+ (scale-float (float 8191606233670341 1.0d0) -167)
+ (scale-float (float -6831189017752290 1.0d0) -223)
+ (scale-float (float 6177450232905728 1.0d0) -278))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6809581780464861 1.0d0) -53)
+ (scale-float (float -5815316960378802 1.0d0) -108)
+ (scale-float (float -4802061841594552 1.0d0) -163)
+ (scale-float (float 6961324585030021 1.0d0) -217)
+ (scale-float (float 8617582846738432 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6831321041124092 1.0d0) -53)
+ (scale-float (float 5868374287455696 1.0d0) -110)
+ (scale-float (float -8513605422168076 1.0d0) -164)
+ (scale-float (float 8336743130121122 1.0d0) -219)
+ (scale-float (float 5844242957991936 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6853110944327025 1.0d0) -53)
+ (scale-float (float 7995813491300551 1.0d0) -107)
+ (scale-float (float 5669745357521053 1.0d0) -162)
+ (scale-float (float -5983191241064722 1.0d0) -216)
+ (scale-float (float -7244438658875392 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6874951770147948 1.0d0) -53)
+ (scale-float (float -5211889442734905 1.0d0) -109)
+ (scale-float (float -7994391083689276 1.0d0) -163)
+ (scale-float (float 5294798515156797 1.0d0) -221)
+ (scale-float (float -5041489973346304 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6896843800452165 1.0d0) -53)
+ (scale-float (float -7972678450271797 1.0d0) -110)
+ (scale-float (float -8343345213530639 1.0d0) -164)
+ (scale-float (float 8514274148005680 1.0d0) -223)
+ (scale-float (float -5308832372752384 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6918787318911258 1.0d0) -53)
+ (scale-float (float -8592506738174507 1.0d0) -108)
+ (scale-float (float 5852661501860042 1.0d0) -162)
+ (scale-float (float 4857986091060286 1.0d0) -216)
+ (scale-float (float 5239371004280832 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6940782611018493 1.0d0) -53)
+ (scale-float (float 6912589129476135 1.0d0) -108)
+ (scale-float (float 6744530868863774 1.0d0) -163)
+ (scale-float (float -4989319458478924 1.0d0) -219)
+ (scale-float (float 6940701453320192 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6962829964104388 1.0d0) -53)
+ (scale-float (float -6838882142879123 1.0d0) -107)
+ (scale-float (float 8833998898921057 1.0d0) -161)
+ (scale-float (float 8054222522316531 1.0d0) -216)
+ (scale-float (float -4519279887253504 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6984929667352427 1.0d0) -53)
+ (scale-float (float 5071590174998387 1.0d0) -108)
+ (scale-float (float -7947223231970943 1.0d0) -165)
+ (scale-float (float -6151955209191225 1.0d0) -221)
+ (scale-float (float -7526765473824768 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7007082011814946 1.0d0) -53)
+ (scale-float (float -6189386596240567 1.0d0) -107)
+ (scale-float (float -6199821917316083 1.0d0) -161)
+ (scale-float (float 7404596430114969 1.0d0) -215)
+ (scale-float (float -8302313716678656 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7029287290429163 1.0d0) -53)
+ (scale-float (float -6627817883510584 1.0d0) -108)
+ (scale-float (float 8857892683323228 1.0d0) -163)
+ (scale-float (float 8693268109448113 1.0d0) -218)
+ (scale-float (float 4689364096122880 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7051545798033384 1.0d0) -53)
+ (scale-float (float -5711999757009983 1.0d0) -107)
+ (scale-float (float -5825962407702506 1.0d0) -162)
+ (scale-float (float -6196166392955384 1.0d0) -216)
+ (scale-float (float 8664340208123904 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7073857831383362 1.0d0) -53)
+ (scale-float (float 8881086912650455 1.0d0) -110)
+ (scale-float (float 8835372864906445 1.0d0) -164)
+ (scale-float (float 4562394845940881 1.0d0) -222)
+ (scale-float (float 5715850790174720 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7096223689168829 1.0d0) -53)
+ (scale-float (float 7786181296922526 1.0d0) -107)
+ (scale-float (float 7593542376663890 1.0d0) -163)
+ (scale-float (float -6824515861621019 1.0d0) -218)
+ (scale-float (float -8097078091055104 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7118643672030191 1.0d0) -53)
+ (scale-float (float 8441419455363968 1.0d0) -107)
+ (scale-float (float 8816723865288410 1.0d0) -161)
+ (scale-float (float 7080773938790631 1.0d0) -220)
+ (scale-float (float 6527379443810304 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7141118082575394 1.0d0) -53)
+ (scale-float (float 5201259377433963 1.0d0) -108)
+ (scale-float (float 8502483145406469 1.0d0) -163)
+ (scale-float (float -7797854467647834 1.0d0) -221)
+ (scale-float (float 8393617992318976 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7163647225396961 1.0d0) -53)
+ (scale-float (float 8235912743688556 1.0d0) -107)
+ (scale-float (float -7957914224696733 1.0d0) -161)
+ (scale-float (float 8092188431032028 1.0d0) -217)
+ (scale-float (float -5763890071207936 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7186231407089207 1.0d0) -53)
+ (scale-float (float -6125628591049317 1.0d0) -108)
+ (scale-float (float 6463709282529567 1.0d0) -163)
+ (scale-float (float -7089380904209025 1.0d0) -219)
+ (scale-float (float 6480532824391680 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7208870936265620 1.0d0) -53)
+ (scale-float (float 4969155040377850 1.0d0) -107)
+ (scale-float (float -5478158021003299 1.0d0) -162)
+ (scale-float (float 5009767247068612 1.0d0) -216)
+ (scale-float (float 4631444762656768 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7231566123576433 1.0d0) -53)
+ (scale-float (float 7961163014055434 1.0d0) -107)
+ (scale-float (float -4995638983741310 1.0d0) -161)
+ (scale-float (float 5008798611336229 1.0d0) -216)
+ (scale-float (float -6391980102516736 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7254317281726365 1.0d0) -53)
+ (scale-float (float -5823663294586708 1.0d0) -107)
+ (scale-float (float 5458711312191116 1.0d0) -163)
+ (scale-float (float 7373648181985147 1.0d0) -219)
+ (scale-float (float 4579959604641792 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7277124725492546 1.0d0) -53)
+ (scale-float (float 5305137385450636 1.0d0) -107)
+ (scale-float (float 7924942194421221 1.0d0) -161)
+ (scale-float (float -7950148257115253 1.0d0) -215)
+ (scale-float (float -6052484860723200 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7299988771742636 1.0d0) -53)
+ (scale-float (float 8680125840686565 1.0d0) -108)
+ (scale-float (float 7429093071873346 1.0d0) -164)
+ (scale-float (float -5599801530175494 1.0d0) -219)
+ (scale-float (float 5535685011832832 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7322909739453116 1.0d0) -53)
+ (scale-float (float 7097062106770298 1.0d0) -107)
+ (scale-float (float -5349092443827285 1.0d0) -162)
+ (scale-float (float -5099742010785249 1.0d0) -216)
+ (scale-float (float 8817229833256960 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7345887949727780 1.0d0) -53)
+ (scale-float (float -8457027092863592 1.0d0) -108)
+ (scale-float (float -6913069935946125 1.0d0) -162)
+ (scale-float (float -8426555266695745 1.0d0) -216)
+ (scale-float (float -5208210342281216 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7368923725816409 1.0d0) -53)
+ (scale-float (float -7308765651908383 1.0d0) -109)
+ (scale-float (float 6336995842098196 1.0d0) -164)
+ (scale-float (float 5029974525320782 1.0d0) -220)
+ (scale-float (float -4826452771995648 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7392017393133648 1.0d0) -53)
+ (scale-float (float -7438986702722814 1.0d0) -108)
+ (scale-float (float 6096655805351087 1.0d0) -162)
+ (scale-float (float 8498067619242502 1.0d0) -217)
+ (scale-float (float -6177366889168896 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7415169279278070 1.0d0) -53)
+ (scale-float (float -5120641521992079 1.0d0) -107)
+ (scale-float (float -6173743406581481 1.0d0) -163)
+ (scale-float (float -6186085494466364 1.0d0) -218)
+ (scale-float (float -6687969806778368 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7438379714051443 1.0d0) -53)
+ (scale-float (float 5163882227945242 1.0d0) -107)
+ (scale-float (float -7134474603423716 1.0d0) -161)
+ (scale-float (float 8099527437853578 1.0d0) -215)
+ (scale-float (float -8737594719870976 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7461649029478199 1.0d0) -53)
+ (scale-float (float 5047985052177667 1.0d0) -107)
+ (scale-float (float 5661761690518348 1.0d0) -162)
+ (scale-float (float 6314662186913944 1.0d0) -216)
+ (scale-float (float -8476179641925632 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7484977559825101 1.0d0) -53)
+ (scale-float (float -7429904801612951 1.0d0) -107)
+ (scale-float (float 7507318260125625 1.0d0) -162)
+ (scale-float (float -6428450809666175 1.0d0) -219)
+ (scale-float (float -7626245206441984 1.0d0) -278))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7508365641621118 1.0d0) -53)
+ (scale-float (float -5593749010769806 1.0d0) -108)
+ (scale-float (float 5636164097347867 1.0d0) -162)
+ (scale-float (float 6999663356388954 1.0d0) -216)
+ (scale-float (float 5357161379004416 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7531813613677513 1.0d0) -53)
+ (scale-float (float 4581063167772971 1.0d0) -107)
+ (scale-float (float 7353040010455473 1.0d0) -161)
+ (scale-float (float -8985035177341617 1.0d0) -217)
+ (scale-float (float -9005891600416768 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7555321817108135 1.0d0) -53)
+ (scale-float (float 5991978685937365 1.0d0) -108)
+ (scale-float (float 7515701065304341 1.0d0) -165)
+ (scale-float (float -7848040318995656 1.0d0) -221)
+ (scale-float (float -7387075273293824 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7578890595349926 1.0d0) -53)
+ (scale-float (float 6111058056718947 1.0d0) -111)
+ (scale-float (float -7625238287344318 1.0d0) -171)
+ (scale-float (float -5322126950690926 1.0d0) -227)
+ (scale-float (float -7997044689993728 1.0d0) -284))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7602520294183646 1.0d0) -53)
+ (scale-float (float 5278126483421458 1.0d0) -107)
+ (scale-float (float -8809723265824375 1.0d0) -162)
+ (scale-float (float 5266825943354873 1.0d0) -216)
+ (scale-float (float 7680279964270592 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7626211261754817 1.0d0) -53)
+ (scale-float (float 7856880994289273 1.0d0) -109)
+ (scale-float (float 5073518343103663 1.0d0) -163)
+ (scale-float (float 7320880980552741 1.0d0) -218)
+ (scale-float (float 6164601738625024 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7649963848594884 1.0d0) -53)
+ (scale-float (float 4685784402871430 1.0d0) -107)
+ (scale-float (float 7577836369986652 1.0d0) -163)
+ (scale-float (float -4980090075722126 1.0d0) -220)
+ (scale-float (float -8789059230498816 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7673778407642606 1.0d0) -53)
+ (scale-float (float 6364884756656920 1.0d0) -107)
+ (scale-float (float 6153979703457739 1.0d0) -162)
+ (scale-float (float -6224103722924539 1.0d0) -216)
+ (scale-float (float 7295477818654720 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7697655294265670 1.0d0) -53)
+ (scale-float (float -7267862823064778 1.0d0) -109)
+ (scale-float (float -7737903927999409 1.0d0) -164)
+ (scale-float (float -4944665808781718 1.0d0) -220)
+ (scale-float (float -6573422581121024 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7721594866282534 1.0d0) -53)
+ (scale-float (float 5903557453565999 1.0d0) -108)
+ (scale-float (float -6416831380576808 1.0d0) -162)
+ (scale-float (float 8806572503583245 1.0d0) -217)
+ (scale-float (float 7765577412116480 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7745597483984509 1.0d0) -53)
+ (scale-float (float -6144509063709385 1.0d0) -107)
+ (scale-float (float 5185255202111359 1.0d0) -161)
+ (scale-float (float -7402097004959452 1.0d0) -215)
+ (scale-float (float 5213973706899456 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7769663510158066 1.0d0) -53)
+ (scale-float (float 6470069052594091 1.0d0) -108)
+ (scale-float (float -4837094629917467 1.0d0) -162)
+ (scale-float (float 5023985097428639 1.0d0) -218)
+ (scale-float (float 7660496705683456 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7793793310107394 1.0d0) -53)
+ (scale-float (float 6255438774607890 1.0d0) -107)
+ (scale-float (float 4890020526794485 1.0d0) -162)
+ (scale-float (float -7178979415977333 1.0d0) -217)
+ (scale-float (float -6774932051886080 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7817987251677189 1.0d0) -53)
+ (scale-float (float -6274412550417931 1.0d0) -107)
+ (scale-float (float -5213877654328768 1.0d0) -165)
+ (scale-float (float 7623710121795882 1.0d0) -219)
+ (scale-float (float -7668292987650048 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7842245705275690 1.0d0) -53)
+ (scale-float (float 4755439535197461 1.0d0) -110)
+ (scale-float (float -6491338259032560 1.0d0) -169)
+ (scale-float (float -6027186414927101 1.0d0) -226)
+ (scale-float (float 7531889095081984 1.0d0) -281))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7866569043897970 1.0d0) -53)
+ (scale-float (float 6203235208083930 1.0d0) -109)
+ (scale-float (float 7465551591673784 1.0d0) -164)
+ (scale-float (float 8166262348485213 1.0d0) -219)
+ (scale-float (float -6023336035352576 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7890957643149467 1.0d0) -53)
+ (scale-float (float 4565316914673408 1.0d0) -111)
+ (scale-float (float -5073270382141029 1.0d0) -169)
+ (scale-float (float 7284895438284374 1.0d0) -223)
+ (scale-float (float -6470251101290496 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7915411881269776 1.0d0) -53)
+ (scale-float (float -8732455080878904 1.0d0) -107)
+ (scale-float (float -8972624560631460 1.0d0) -161)
+ (scale-float (float -5802770418051256 1.0d0) -215)
+ (scale-float (float -5894612583809024 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7939932139156694 1.0d0) -53)
+ (scale-float (float -7728774586478161 1.0d0) -108)
+ (scale-float (float -5122395498390164 1.0d0) -162)
+ (scale-float (float 8034467693630628 1.0d0) -216)
+ (scale-float (float -6127267246014464 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7964518800390531 1.0d0) -53)
+ (scale-float (float -5333950519206214 1.0d0) -110)
+ (scale-float (float -6855336031570640 1.0d0) -166)
+ (scale-float (float -8103642639632277 1.0d0) -221)
+ (scale-float (float 8817951445614592 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7989172251258678 1.0d0) -53)
+ (scale-float (float 4799035515117038 1.0d0) -107)
+ (scale-float (float -7075338048210246 1.0d0) -161)
+ (scale-float (float -8586719858203288 1.0d0) -217)
+ (scale-float (float 5551191926112256 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8013892880780447 1.0d0) -53)
+ (scale-float (float 8070209461981732 1.0d0) -108)
+ (scale-float (float 5383960032839146 1.0d0) -163)
+ (scale-float (float -5391502856833359 1.0d0) -217)
+ (scale-float (float 4611789961494528 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8038681080732178 1.0d0) -53)
+ (scale-float (float 7052322924254692 1.0d0) -107)
+ (scale-float (float 4662847422718372 1.0d0) -162)
+ (scale-float (float 7185286506518269 1.0d0) -216)
+ (scale-float (float 5622161755602944 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8063537245672624 1.0d0) -53)
+ (scale-float (float 5672318795950278 1.0d0) -111)
+ (scale-float (float -5116080609750552 1.0d0) -166)
+ (scale-float (float -7609717448867233 1.0d0) -222)
+ (scale-float (float 4692897535361024 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8088461772968608 1.0d0) -53)
+ (scale-float (float 6561047830650932 1.0d0) -108)
+ (scale-float (float -7907785504659630 1.0d0) -162)
+ (scale-float (float -8942948971153189 1.0d0) -217)
+ (scale-float (float -7559890343952384 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8113455062820968 1.0d0) -53)
+ (scale-float (float -5472615846331824 1.0d0) -109)
+ (scale-float (float 5977609223732986 1.0d0) -164)
+ (scale-float (float 7115509566652408 1.0d0) -218)
+ (scale-float (float -5387108883628032 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8138517518290779 1.0d0) -53)
+ (scale-float (float 6752214430572379 1.0d0) -110)
+ (scale-float (float 7813943309258673 1.0d0) -164)
+ (scale-float (float -7531807323370307 1.0d0) -218)
+ (scale-float (float -8077148627795968 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8163649545325870 1.0d0) -53)
+ (scale-float (float 6998037274955710 1.0d0) -108)
+ (scale-float (float 7871939694839604 1.0d0) -162)
+ (scale-float (float 6893324305915105 1.0d0) -219)
+ (scale-float (float -6666193181081600 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8188851552787629 1.0d0) -53)
+ (scale-float (float -5530151176954949 1.0d0) -110)
+ (scale-float (float 6991091742977840 1.0d0) -164)
+ (scale-float (float 8482591613484455 1.0d0) -218)
+ (scale-float (float -7039437530988544 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8214123952478104 1.0d0) -53)
+ (scale-float (float -7054334098865418 1.0d0) -108)
+ (scale-float (float -8877605983907212 1.0d0) -163)
+ (scale-float (float 5682356343726468 1.0d0) -218)
+ (scale-float (float -8826109976117248 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8239467159167406 1.0d0) -53)
+ (scale-float (float -7651898140888595 1.0d0) -107)
+ (scale-float (float 8648965404520721 1.0d0) -161)
+ (scale-float (float 7028850772873957 1.0d0) -215)
+ (scale-float (float 5534674606866432 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8264881590621413 1.0d0) -53)
+ (scale-float (float -7510438895388554 1.0d0) -107)
+ (scale-float (float -5500854175455348 1.0d0) -161)
+ (scale-float (float 7176439462285651 1.0d0) -218)
+ (scale-float (float 7752654741241856 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8290367667629783 1.0d0) -53)
+ (scale-float (float 8133138596186356 1.0d0) -109)
+ (scale-float (float -7591268029116145 1.0d0) -163)
+ (scale-float (float -5898979962753431 1.0d0) -217)
+ (scale-float (float -6625987420028928 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8315925814034279 1.0d0) -53)
+ (scale-float (float 7519360826045658 1.0d0) -107)
+ (scale-float (float -4861813932032458 1.0d0) -163)
+ (scale-float (float -6822801646816934 1.0d0) -219)
+ (scale-float (float 6483083152850944 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8341556456757407 1.0d0) -53)
+ (scale-float (float 8713258068062022 1.0d0) -108)
+ (scale-float (float -8794846795103942 1.0d0) -164)
+ (scale-float (float 4763933906617127 1.0d0) -218)
+ (scale-float (float -8448473406504960 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8367260025831375 1.0d0) -53)
+ (scale-float (float 7832510640147127 1.0d0) -113)
+ (scale-float (float -4585451134943656 1.0d0) -168)
+ (scale-float (float 6860564854731439 1.0d0) -222)
+ (scale-float (float 4739820444188672 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8393036954427377 1.0d0) -53)
+ (scale-float (float -5882849124950196 1.0d0) -108)
+ (scale-float (float -7796383713284814 1.0d0) -163)
+ (scale-float (float 7952873874854669 1.0d0) -217)
+ (scale-float (float -6056073206824960 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8418887678885204 1.0d0) -53)
+ (scale-float (float -5715673222913417 1.0d0) -107)
+ (scale-float (float -5122652624101890 1.0d0) -161)
+ (scale-float (float -7070365230023692 1.0d0) -216)
+ (scale-float (float 7389122488401920 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8444812638743187 1.0d0) -53)
+ (scale-float (float -5300223451013964 1.0d0) -108)
+ (scale-float (float -7110683026382794 1.0d0) -162)
+ (scale-float (float -7744943696350442 1.0d0) -216)
+ (scale-float (float 6310419953451008 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8470812276768478 1.0d0) -53)
+ (scale-float (float 5910789752266694 1.0d0) -107)
+ (scale-float (float -4540777544879638 1.0d0) -161)
+ (scale-float (float 6851088171542932 1.0d0) -215)
+ (scale-float (float -7617921543036928 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8496887038987672 1.0d0) -53)
+ (scale-float (float 5531872111144993 1.0d0) -107)
+ (scale-float (float -7962212397842975 1.0d0) -162)
+ (scale-float (float -5860583371644180 1.0d0) -216)
+ (scale-float (float 7866919184433152 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8523037374717772 1.0d0) -53)
+ (scale-float (float 8853251511678952 1.0d0) -107)
+ (scale-float (float 7259767988058284 1.0d0) -162)
+ (scale-float (float 8389230841988564 1.0d0) -217)
+ (scale-float (float -8575876819451904 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8549263736597510 1.0d0) -53)
+ (scale-float (float -5579620565343165 1.0d0) -107)
+ (scale-float (float -5587574106166803 1.0d0) -161)
+ (scale-float (float -8188753341291124 1.0d0) -215)
+ (scale-float (float 7942509615710208 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8575566580619014 1.0d0) -53)
+ (scale-float (float 7060972329967819 1.0d0) -107)
+ (scale-float (float -6794461814768363 1.0d0) -161)
+ (scale-float (float 5860283490685656 1.0d0) -220)
+ (scale-float (float -5535999337693184 1.0d0) -278))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8601946366159849 1.0d0) -53)
+ (scale-float (float 6643600354864787 1.0d0) -111)
+ (scale-float (float -6774328151098143 1.0d0) -165)
+ (scale-float (float 6238045156276258 1.0d0) -220)
+ (scale-float (float 7385437152739328 1.0d0) -281))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8628403556015405 1.0d0) -53)
+ (scale-float (float -5689830371797970 1.0d0) -107)
+ (scale-float (float 8456917422509878 1.0d0) -161)
+ (scale-float (float 6498397382453532 1.0d0) -216)
+ (scale-float (float -7683261920575488 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8654938616431667 1.0d0) -53)
+ (scale-float (float 8182047312445503 1.0d0) -108)
+ (scale-float (float -6662523829600515 1.0d0) -162)
+ (scale-float (float 5290567255884442 1.0d0) -217)
+ (scale-float (float -6464888284348416 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8681552017138358 1.0d0) -53)
+ (scale-float (float -7006822305559368 1.0d0) -107)
+ (scale-float (float 7451129425931068 1.0d0) -161)
+ (scale-float (float -7173167161450929 1.0d0) -215)
+ (scale-float (float -5536285008453632 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8708244231382452 1.0d0) -53)
+ (scale-float (float -8087631037263965 1.0d0) -107)
+ (scale-float (float -8185307178763586 1.0d0) -161)
+ (scale-float (float -6511095932131732 1.0d0) -215)
+ (scale-float (float 8343018883710976 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8735015735962084 1.0d0) -53)
+ (scale-float (float -8117625885586849 1.0d0) -107)
+ (scale-float (float 7067185933598292 1.0d0) -161)
+ (scale-float (float -5928047136609223 1.0d0) -217)
+ (scale-float (float -4613124548198400 1.0d0) -279))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8761867011260840 1.0d0) -53)
+ (scale-float (float 8610737154062316 1.0d0) -107)
+ (scale-float (float 5316487286030695 1.0d0) -161)
+ (scale-float (float 8025315088065011 1.0d0) -216)
+ (scale-float (float -8789522686148608 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8788798541282450 1.0d0) -53)
+ (scale-float (float -5767028858726936 1.0d0) -110)
+ (scale-float (float 5809369621052884 1.0d0) -167)
+ (scale-float (float 7326787612774527 1.0d0) -221)
+ (scale-float (float -6442635476598784 1.0d0) -279))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8815810813685869 1.0d0) -53)
+ (scale-float (float -8724536074899524 1.0d0) -109)
+ (scale-float (float 5172102500931788 1.0d0) -166)
+ (scale-float (float -8595123929132079 1.0d0) -220)
+ (scale-float (float -4972293416550400 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8842904319820777 1.0d0) -53)
+ (scale-float (float 7692158636243959 1.0d0) -107)
+ (scale-float (float -6981365851709947 1.0d0) -161)
+ (scale-float (float 5606403711887330 1.0d0) -216)
+ (scale-float (float 7207011875684352 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8870079554763484 1.0d0) -53)
+ (scale-float (float 6730270946682744 1.0d0) -108)
+ (scale-float (float -6566124735755288 1.0d0) -163)
+ (scale-float (float 4704554665939634 1.0d0) -217)
+ (scale-float (float 5990258066063360 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8897337017353248 1.0d0) -53)
+ (scale-float (float -6246556062351795 1.0d0) -108)
+ (scale-float (float 7682958297604200 1.0d0) -163)
+ (scale-float (float -6314968768802122 1.0d0) -217)
+ (scale-float (float -6603959870652416 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8924677210229021 1.0d0) -53)
+ (scale-float (float 5469297920188961 1.0d0) -109)
+ (scale-float (float -8593195763191850 1.0d0) -163)
+ (scale-float (float -7114494562938148 1.0d0) -217)
+ (scale-float (float 8594557003857920 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8952100639866623 1.0d0) -53)
+ (scale-float (float -4764119273928549 1.0d0) -107)
+ (scale-float (float -4842944010947886 1.0d0) -161)
+ (scale-float (float 6684392706093202 1.0d0) -215)
+ (scale-float (float 5193091026345984 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8979607816616344 1.0d0) -53)
+ (scale-float (float -7789931843743237 1.0d0) -107)
+ (scale-float (float -8124365004371129 1.0d0) -164)
+ (scale-float (float 8996080488067980 1.0d0) -218)
+ (scale-float (float 6558996243415040 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4503599627370496 1.0d0) -52)
+ (scale-float (float -4503599627370496 1.0d0) -308) (scale-float (float 0 1.0d0) 0)
+ (scale-float (float 0 1.0d0) 0) (scale-float (float 0 1.0d0) 0))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4517437736227193 1.0d0) -52)
+ (scale-float (float -5847015961790376 1.0d0) -107)
+ (scale-float (float -4716335209519244 1.0d0) -161)
+ (scale-float (float 6089224749422725 1.0d0) -219)
+ (scale-float (float 4687409247682560 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4531318495980147 1.0d0) -52)
+ (scale-float (float 8707865871150605 1.0d0) -106)
+ (scale-float (float -8742156179954147 1.0d0) -160)
+ (scale-float (float 7423461641638503 1.0d0) -214)
+ (scale-float (float 4946309413175296 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4545242169745922 1.0d0) -52)
+ (scale-float (float 6120288057254408 1.0d0) -106)
+ (scale-float (float -7134966792624880 1.0d0) -160)
+ (scale-float (float 7106442382470865 1.0d0) -214)
+ (scale-float (float -4994665554444288 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4559209022675690 1.0d0) -52)
+ (scale-float (float 4642612743551652 1.0d0) -107)
+ (scale-float (float -8835620097922572 1.0d0) -162)
+ (scale-float (float 5462967962548958 1.0d0) -216)
+ (scale-float (float -7488916543471616 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4573219321975402 1.0d0) -52)
+ (scale-float (float 8208268750109258 1.0d0) -106)
+ (scale-float (float 8779294862775466 1.0d0) -161)
+ (scale-float (float 8575869339142009 1.0d0) -216)
+ (scale-float (float 5754828073402368 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4587273336926197 1.0d0) -52)
+ (scale-float (float 6567139298043908 1.0d0) -108)
+ (scale-float (float -5788397270204549 1.0d0) -167)
+ (scale-float (float 8365114338788143 1.0d0) -227)
+ (scale-float (float -6680456019836928 1.0d0) -283))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4601371338905047 1.0d0) -52)
+ (scale-float (float 5156158567470130 1.0d0) -106)
+ (scale-float (float 7491499535329569 1.0d0) -160)
+ (scale-float (float 6874719364608933 1.0d0) -219)
+ (scale-float (float 8812820396507136 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4615513601405656 1.0d0) -52)
+ (scale-float (float 8637286653403373 1.0d0) -106)
+ (scale-float (float -5845648852952455 1.0d0) -163)
+ (scale-float (float 8213629556057855 1.0d0) -217)
+ (scale-float (float -7694357970223104 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4629700400059602 1.0d0) -52)
+ (scale-float (float -6640905085885411 1.0d0) -107)
+ (scale-float (float -6108186170495346 1.0d0) -161)
+ (scale-float (float -5276109493674260 1.0d0) -216)
+ (scale-float (float -6528630449078272 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4643932012657730 1.0d0) -52)
+ (scale-float (float -7676944829602621 1.0d0) -109)
+ (scale-float (float -7576235611493503 1.0d0) -163)
+ (scale-float (float -5866291950993164 1.0d0) -218)
+ (scale-float (float -4570226453118976 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4658208719171809 1.0d0) -52)
+ (scale-float (float -6462358001331209 1.0d0) -106)
+ (scale-float (float 4841745630889741 1.0d0) -161)
+ (scale-float (float -6165834006044884 1.0d0) -215)
+ (scale-float (float -6336043552489472 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4672530801776438 1.0d0) -52)
+ (scale-float (float -7691439632814366 1.0d0) -107)
+ (scale-float (float -5275038674081474 1.0d0) -162)
+ (scale-float (float -5290430969572931 1.0d0) -217)
+ (scale-float (float -4752702542184448 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4686898544871223 1.0d0) -52)
+ (scale-float (float 7616878022565265 1.0d0) -106)
+ (scale-float (float -4891512935952183 1.0d0) -161)
+ (scale-float (float -7554585890962611 1.0d0) -215)
+ (scale-float (float 8158457242517504 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4701312235103219 1.0d0) -52)
+ (scale-float (float -8828957998279163 1.0d0) -106)
+ (scale-float (float 8896627949166807 1.0d0) -161)
+ (scale-float (float 6455528090084148 1.0d0) -215)
+ (scale-float (float 5376526822440960 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4715772161389634 1.0d0) -52)
+ (scale-float (float 6611889806761557 1.0d0) -107)
+ (scale-float (float 8587106394250273 1.0d0) -161)
+ (scale-float (float 4612376928302046 1.0d0) -215)
+ (scale-float (float -7995449752584192 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4730278614940825 1.0d0) -52)
+ (scale-float (float 5797047947429435 1.0d0) -106)
+ (scale-float (float 8451360026022682 1.0d0) -162)
+ (scale-float (float -7176326364695730 1.0d0) -216)
+ (scale-float (float 5588354057633792 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4744831889283554 1.0d0) -52)
+ (scale-float (float 5440507614362052 1.0d0) -106)
+ (scale-float (float -7472777561652180 1.0d0) -162)
+ (scale-float (float 5322393024626314 1.0d0) -217)
+ (scale-float (float -6975573859958784 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4759432280284537 1.0d0) -52)
+ (scale-float (float -7804460408252274 1.0d0) -108)
+ (scale-float (float 4721420388794970 1.0d0) -162)
+ (scale-float (float -4869051928629796 1.0d0) -216)
+ (scale-float (float -5855131702919168 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4774080086174274 1.0d0) -52)
+ (scale-float (float 5078391214474324 1.0d0) -106)
+ (scale-float (float 8726228470903242 1.0d0) -160)
+ (scale-float (float 5726008165951771 1.0d0) -215)
+ (scale-float (float 5327202326757376 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4788775607571175 1.0d0) -52)
+ (scale-float (float 6042915648874728 1.0d0) -106)
+ (scale-float (float -6737326657531783 1.0d0) -166)
+ (scale-float (float -7385308912213535 1.0d0) -220)
+ (scale-float (float -7546812207988736 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4803519147505973 1.0d0) -52)
+ (scale-float (float 6821857535497915 1.0d0) -107)
+ (scale-float (float 6448918725600666 1.0d0) -161)
+ (scale-float (float -6602953432721212 1.0d0) -219)
+ (scale-float (float -6849715759480832 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4818311011446440 1.0d0) -52)
+ (scale-float (float 7538637027465560 1.0d0) -106)
+ (scale-float (float 6748868498788284 1.0d0) -161)
+ (scale-float (float 8322818221344581 1.0d0) -216)
+ (scale-float (float 4765752779046912 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4833151507322407 1.0d0) -52)
+ (scale-float (float 5187081350654200 1.0d0) -109)
+ (scale-float (float 4527064833154022 1.0d0) -163)
+ (scale-float (float 7727203281482466 1.0d0) -221)
+ (scale-float (float 8475947126751232 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4848040945551086 1.0d0) -52)
+ (scale-float (float -5832991476629573 1.0d0) -106)
+ (scale-float (float -8678368141246756 1.0d0) -162)
+ (scale-float (float -6698834309432254 1.0d0) -216)
+ (scale-float (float -5925838650703872 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4862979639062708 1.0d0) -52)
+ (scale-float (float 6794302758030968 1.0d0) -106)
+ (scale-float (float -6710157956760469 1.0d0) -161)
+ (scale-float (float -8243514520532244 1.0d0) -215)
+ (scale-float (float 6449818064977920 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4877967903326479 1.0d0) -52)
+ (scale-float (float 8154215292809681 1.0d0) -106)
+ (scale-float (float -5509504215723478 1.0d0) -162)
+ (scale-float (float -8971056361398774 1.0d0) -217)
+ (scale-float (float 7952769083899904 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4893006056376849 1.0d0) -52)
+ (scale-float (float 5057769703051193 1.0d0) -110)
+ (scale-float (float -7124920471066105 1.0d0) -165)
+ (scale-float (float 8682182329137565 1.0d0) -219)
+ (scale-float (float 7684547366879232 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4908094418840112 1.0d0) -52)
+ (scale-float (float -6997879398230154 1.0d0) -107)
+ (scale-float (float 6546058407120439 1.0d0) -163)
+ (scale-float (float -5274800579489853 1.0d0) -217)
+ (scale-float (float -5245426427887616 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4923233313961336 1.0d0) -52)
+ (scale-float (float -6942158939172050 1.0d0) -113)
+ (scale-float (float 8228310865713679 1.0d0) -172)
+ (scale-float (float -4601925709315571 1.0d0) -227)
+ (scale-float (float -7263043301933056 1.0d0) -281))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4938423067631627 1.0d0) -52)
+ (scale-float (float -5530707171972330 1.0d0) -107)
+ (scale-float (float 7866626135932406 1.0d0) -161)
+ (scale-float (float 5790192201545901 1.0d0) -216)
+ (scale-float (float 6639625734520832 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4953664008415730 1.0d0) -52)
+ (scale-float (float -8872028529868000 1.0d0) -112)
+ (scale-float (float -4994381805917503 1.0d0) -166)
+ (scale-float (float -5033825816006095 1.0d0) -220)
+ (scale-float (float 4856569822969856 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4968956467579979 1.0d0) -52)
+ (scale-float (float 7114716596311967 1.0d0) -106)
+ (scale-float (float -4782362984658837 1.0d0) -161)
+ (scale-float (float 8374869555575251 1.0d0) -215)
+ (scale-float (float -7500377938362368 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4984300779120595 1.0d0) -52)
+ (scale-float (float -7507565419188659 1.0d0) -109)
+ (scale-float (float -8262093613781549 1.0d0) -163)
+ (scale-float (float -8266901577533332 1.0d0) -218)
+ (scale-float (float -8686654726340608 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4999697279792335 1.0d0) -52)
+ (scale-float (float -8555622703224681 1.0d0) -108)
+ (scale-float (float 5489580344728516 1.0d0) -162)
+ (scale-float (float 7502523356519082 1.0d0) -217)
+ (scale-float (float -5087482778615808 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5015146309137508 1.0d0) -52)
+ (scale-float (float 6009190491712938 1.0d0) -107)
+ (scale-float (float -5960955796465403 1.0d0) -162)
+ (scale-float (float 7835124684248771 1.0d0) -216)
+ (scale-float (float 5746239523520512 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5030648209515352 1.0d0) -52)
+ (scale-float (float 7936843531829287 1.0d0) -107)
+ (scale-float (float -4585410160052836 1.0d0) -162)
+ (scale-float (float -8621225892320225 1.0d0) -216)
+ (scale-float (float 7710108439543808 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5046203326131781 1.0d0) -52)
+ (scale-float (float 5158856777537267 1.0d0) -106)
+ (scale-float (float 4618156553226288 1.0d0) -161)
+ (scale-float (float 4833555759796584 1.0d0) -217)
+ (scale-float (float 5248807128268800 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5061812007069511 1.0d0) -52)
+ (scale-float (float -5372672245251699 1.0d0) -110)
+ (scale-float (float -6155918414023994 1.0d0) -164)
+ (scale-float (float -6076117403626994 1.0d0) -218)
+ (scale-float (float -6909448552448000 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5077474603318565 1.0d0) -52)
+ (scale-float (float -7872412654372175 1.0d0) -106)
+ (scale-float (float -7640420387406356 1.0d0) -160)
+ (scale-float (float 8467733000367172 1.0d0) -219)
+ (scale-float (float 4808649420570624 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5093191468807167 1.0d0) -52)
+ (scale-float (float -7390176804989206 1.0d0) -106)
+ (scale-float (float 7677554952883375 1.0d0) -160)
+ (scale-float (float -6041022645373913 1.0d0) -215)
+ (scale-float (float 5202695561084928 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5108962960433030 1.0d0) -52)
+ (scale-float (float -4883489843268605 1.0d0) -106)
+ (scale-float (float -5947149930910021 1.0d0) -160)
+ (scale-float (float 7534085244535872 1.0d0) -215)
+ (scale-float (float -6233059199598592 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5124789438095041 1.0d0) -52)
+ (scale-float (float -7742270852632945 1.0d0) -106)
+ (scale-float (float -6813610688219826 1.0d0) -161)
+ (scale-float (float -8001223243516280 1.0d0) -215)
+ (scale-float (float 6305398319022080 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5140671264725350 1.0d0) -52)
+ (scale-float (float 7250990733991090 1.0d0) -106)
+ (scale-float (float 7083281718424973 1.0d0) -160)
+ (scale-float (float -4884865306153148 1.0d0) -214)
+ (scale-float (float -5908183825727488 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5156608806321877 1.0d0) -52)
+ (scale-float (float 6764461164591122 1.0d0) -111)
+ (scale-float (float -8849667432852637 1.0d0) -165)
+ (scale-float (float 5955325841257886 1.0d0) -219)
+ (scale-float (float 7098341156454400 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5172602431981224 1.0d0) -52)
+ (scale-float (float -6068710065284638 1.0d0) -106)
+ (scale-float (float 4560291370760431 1.0d0) -161)
+ (scale-float (float -7980608815099774 1.0d0) -218)
+ (scale-float (float -7408551747780608 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5188652513932022 1.0d0) -52)
+ (scale-float (float -8361586724300927 1.0d0) -106)
+ (scale-float (float 5083568272833154 1.0d0) -161)
+ (scale-float (float -6766243031787910 1.0d0) -215)
+ (scale-float (float 5012841632055296 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5204759427568702 1.0d0) -52)
+ (scale-float (float -7868926527126995 1.0d0) -111)
+ (scale-float (float -7111689560364649 1.0d0) -165)
+ (scale-float (float -7923744305549435 1.0d0) -219)
+ (scale-float (float -7840953111412736 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5220923551485705 1.0d0) -52)
+ (scale-float (float 4558766697113952 1.0d0) -107)
+ (scale-float (float 8636791486606798 1.0d0) -161)
+ (scale-float (float -8534698707320123 1.0d0) -215)
+ (scale-float (float 5170869010464768 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5237145267512131 1.0d0) -52)
+ (scale-float (float 5671333817527839 1.0d0) -106)
+ (scale-float (float 6702731158711598 1.0d0) -164)
+ (scale-float (float 8725677669579077 1.0d0) -220)
+ (scale-float (float -8054127175139328 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5253424960746842 1.0d0) -52)
+ (scale-float (float 4914006112278795 1.0d0) -106)
+ (scale-float (float -6640198425541870 1.0d0) -160)
+ (scale-float (float -7482977692808900 1.0d0) -214)
+ (scale-float (float 7146494793342976 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5269763019594019 1.0d0) -52)
+ (scale-float (float -6197178020972243 1.0d0) -106)
+ (scale-float (float -6368333410350760 1.0d0) -160)
+ (scale-float (float 8920519928215835 1.0d0) -214)
+ (scale-float (float -6098770810658816 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5286159835799181 1.0d0) -52)
+ (scale-float (float 7761834614816388 1.0d0) -110)
+ (scale-float (float -6495572605073135 1.0d0) -169)
+ (scale-float (float 6271977073868380 1.0d0) -223)
+ (scale-float (float 5384071907639296 1.0d0) -278))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5302615804485681 1.0d0) -52)
+ (scale-float (float 5380131577539679 1.0d0) -106)
+ (scale-float (float 7219845164474095 1.0d0) -160)
+ (scale-float (float -5620655606260218 1.0d0) -216)
+ (scale-float (float 7670657555038208 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5319131324191672 1.0d0) -52)
+ (scale-float (float -5714718294713518 1.0d0) -107)
+ (scale-float (float -5467512887293186 1.0d0) -162)
+ (scale-float (float 5169815790195207 1.0d0) -218)
+ (scale-float (float -7534175560663040 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5335706796907560 1.0d0) -52)
+ (scale-float (float -7743357533407159 1.0d0) -106)
+ (scale-float (float 8602872195364813 1.0d0) -160)
+ (scale-float (float 5956292379557479 1.0d0) -214)
+ (scale-float (float -6644807458160640 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5352342628113952 1.0d0) -52)
+ (scale-float (float 8287948830298086 1.0d0) -106)
+ (scale-float (float -8263058540515532 1.0d0) -161)
+ (scale-float (float 8746414962754213 1.0d0) -215)
+ (scale-float (float -4647619282599936 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5369039226820106 1.0d0) -52)
+ (scale-float (float 4788887780696931 1.0d0) -108)
+ (scale-float (float -5417627612608227 1.0d0) -162)
+ (scale-float (float 6930209616115571 1.0d0) -218)
+ (scale-float (float -5943628753010688 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5385797005602878 1.0d0) -52)
+ (scale-float (float -8613972398492569 1.0d0) -107)
+ (scale-float (float -8780328477970895 1.0d0) -161)
+ (scale-float (float 6334968262014952 1.0d0) -215)
+ (scale-float (float -6431481749700608 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5402616380646197 1.0d0) -52)
+ (scale-float (float -8461026404816341 1.0d0) -106)
+ (scale-float (float 6110845169392857 1.0d0) -166)
+ (scale-float (float 4613892684805469 1.0d0) -221)
+ (scale-float (float -6099356071493632 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5419497771781056 1.0d0) -52)
+ (scale-float (float 5850327538265884 1.0d0) -106)
+ (scale-float (float -4661457073413234 1.0d0) -161)
+ (scale-float (float 5691100896377569 1.0d0) -215)
+ (scale-float (float 6955708596404224 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5436441602526041 1.0d0) -52)
+ (scale-float (float 5907679784846151 1.0d0) -108)
+ (scale-float (float 8916729613410306 1.0d0) -163)
+ (scale-float (float -6542909483744733 1.0d0) -220)
+ (scale-float (float 7442857689350144 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5453448300128390 1.0d0) -52)
+ (scale-float (float -5395172642177515 1.0d0) -106)
+ (scale-float (float -7415820396980726 1.0d0) -162)
+ (scale-float (float 8565277280800078 1.0d0) -216)
+ (scale-float (float -6487363912400896 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5470518295605609 1.0d0) -52)
+ (scale-float (float 6859549412285172 1.0d0) -106)
+ (scale-float (float 8410295424490072 1.0d0) -161)
+ (scale-float (float 5617606155659205 1.0d0) -215)
+ (scale-float (float -5730893386301440 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5487652023787646 1.0d0) -52)
+ (scale-float (float -6894328101426537 1.0d0) -108)
+ (scale-float (float -4863443290707938 1.0d0) -162)
+ (scale-float (float 7473415355050136 1.0d0) -216)
+ (scale-float (float -8046079960907776 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5504849923359620 1.0d0) -52)
+ (scale-float (float -7675733602073683 1.0d0) -106)
+ (scale-float (float -4959418929518672 1.0d0) -164)
+ (scale-float (float 8055799358766222 1.0d0) -221)
+ (scale-float (float 8901690440810496 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5522112436905136 1.0d0) -52)
+ (scale-float (float -5502589643288498 1.0d0) -106)
+ (scale-float (float 4920876623060797 1.0d0) -163)
+ (scale-float (float 6507281189931081 1.0d0) -217)
+ (scale-float (float 7931598952398848 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5539440010950179 1.0d0) -52)
+ (scale-float (float -6586300721274210 1.0d0) -106)
+ (scale-float (float 4875414167676657 1.0d0) -161)
+ (scale-float (float -5971935162612676 1.0d0) -217)
+ (scale-float (float -8879786832166912 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5556833096007599 1.0d0) -52)
+ (scale-float (float -5983320784766758 1.0d0) -106)
+ (scale-float (float 4761683160661033 1.0d0) -160)
+ (scale-float (float 4780794256244852 1.0d0) -214)
+ (scale-float (float 5044951728259072 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5574292146622201 1.0d0) -52)
+ (scale-float (float -8886887860497170 1.0d0) -110)
+ (scale-float (float 6445995358430954 1.0d0) -165)
+ (scale-float (float 7277245463857843 1.0d0) -219)
+ (scale-float (float 5619182104215552 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5591817621416446 1.0d0) -52)
+ (scale-float (float 5298355796694084 1.0d0) -106)
+ (scale-float (float -5114747045044762 1.0d0) -160)
+ (scale-float (float -7370756506461501 1.0d0) -216)
+ (scale-float (float -5777120783073280 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5609409983136773 1.0d0) -52)
+ (scale-float (float 8803645493974858 1.0d0) -109)
+ (scale-float (float 8607267036649616 1.0d0) -163)
+ (scale-float (float 7266687025234818 1.0d0) -219)
+ (scale-float (float -8378684359573504 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5627069698700551 1.0d0) -52)
+ (scale-float (float -5069687772444870 1.0d0) -106)
+ (scale-float (float -6985058564174371 1.0d0) -161)
+ (scale-float (float 6795876030934237 1.0d0) -215)
+ (scale-float (float 7953330937856000 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5644797239243674 1.0d0) -52)
+ (scale-float (float 8411381203376034 1.0d0) -106)
+ (scale-float (float 7653256017934632 1.0d0) -163)
+ (scale-float (float 7152356641584070 1.0d0) -217)
+ (scale-float (float 5009045517697024 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5662593080168812 1.0d0) -52)
+ (scale-float (float -7463623433219470 1.0d0) -106)
+ (scale-float (float -6749935140334936 1.0d0) -162)
+ (scale-float (float -5132882691543150 1.0d0) -217)
+ (scale-float (float -7518575503867904 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5680457701194310 1.0d0) -52)
+ (scale-float (float -6998750368212970 1.0d0) -107)
+ (scale-float (float -7930918713877090 1.0d0) -161)
+ (scale-float (float -8747426055564017 1.0d0) -215)
+ (scale-float (float 5887302577258496 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5698391586403778 1.0d0) -52)
+ (scale-float (float 6429457098929092 1.0d0) -106)
+ (scale-float (float 5364497324013643 1.0d0) -161)
+ (scale-float (float -5389536438482203 1.0d0) -219)
+ (scale-float (float -5449683185958912 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5716395224296353 1.0d0) -52)
+ (scale-float (float -8699934226618341 1.0d0) -106)
+ (scale-float (float 8727990775977224 1.0d0) -161)
+ (scale-float (float 6321497904821580 1.0d0) -215)
+ (scale-float (float 8394350004862976 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5734469107837653 1.0d0) -52)
+ (scale-float (float -5608466080249442 1.0d0) -106)
+ (scale-float (float -8128962820009935 1.0d0) -160)
+ (scale-float (float -8734907705205393 1.0d0) -214)
+ (scale-float (float 7574031242117120 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5752613734511449 1.0d0) -52)
+ (scale-float (float 8359797713652660 1.0d0) -107)
+ (scale-float (float 7268348276446850 1.0d0) -162)
+ (scale-float (float 8547978174302657 1.0d0) -220)
+ (scale-float (float -4901703552860160 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5770829606372044 1.0d0) -52)
+ (scale-float (float 8873848746075100 1.0d0) -106)
+ (scale-float (float -5482395340917506 1.0d0) -161)
+ (scale-float (float 4950129265951595 1.0d0) -215)
+ (scale-float (float 8348001891680256 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5789117230097384 1.0d0) -52)
+ (scale-float (float -5907478425914740 1.0d0) -106)
+ (scale-float (float 8155485967379828 1.0d0) -164)
+ (scale-float (float 8073351445144473 1.0d0) -218)
+ (scale-float (float -7648255763808256 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5807477117042906 1.0d0) -52)
+ (scale-float (float 7379105030513962 1.0d0) -106)
+ (scale-float (float 6962354212586022 1.0d0) -160)
+ (scale-float (float -5068089388980974 1.0d0) -214)
+ (scale-float (float 5266491457921024 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5825909783296151 1.0d0) -52)
+ (scale-float (float 5797874806894183 1.0d0) -107)
+ (scale-float (float 8949531194295957 1.0d0) -161)
+ (scale-float (float -4871977890381284 1.0d0) -218)
+ (scale-float (float -8203445065875456 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5844415749732125 1.0d0) -52)
+ (scale-float (float -5611268112741578 1.0d0) -106)
+ (scale-float (float -4714589241636602 1.0d0) -160)
+ (scale-float (float -7435363496845589 1.0d0) -215)
+ (scale-float (float 5053626226671616 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5862995542069449 1.0d0) -52)
+ (scale-float (float 7488415117650730 1.0d0) -107)
+ (scale-float (float -6614643630069895 1.0d0) -162)
+ (scale-float (float -5102430690183685 1.0d0) -218)
+ (scale-float (float 7259113985015808 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5881649690927300 1.0d0) -52)
+ (scale-float (float -8983594369336534 1.0d0) -110)
+ (scale-float (float -8803855787500514 1.0d0) -164)
+ (scale-float (float -5829848534110580 1.0d0) -220)
+ (scale-float (float 6388222641831936 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5900378731883146 1.0d0) -52)
+ (scale-float (float 5282966696948388 1.0d0) -106)
+ (scale-float (float -7227500597331042 1.0d0) -160)
+ (scale-float (float 7122644606364067 1.0d0) -214)
+ (scale-float (float 8679813332058112 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5919183205531309 1.0d0) -52)
+ (scale-float (float 6020360633385612 1.0d0) -106)
+ (scale-float (float -5617027140810653 1.0d0) -160)
+ (scale-float (float -8063497217131366 1.0d0) -215)
+ (scale-float (float -6998831223095296 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5938063657542350 1.0d0) -52)
+ (scale-float (float 5349144650243834 1.0d0) -108)
+ (scale-float (float 4932281782375480 1.0d0) -162)
+ (scale-float (float -7435308876813488 1.0d0) -219)
+ (scale-float (float 7014939923316736 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5957020638723301 1.0d0) -52)
+ (scale-float (float 6050693286119645 1.0d0) -106)
+ (scale-float (float -7010959626751421 1.0d0) -160)
+ (scale-float (float 4831433211189875 1.0d0) -220)
+ (scale-float (float -5946420923203584 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5976054705078758 1.0d0) -52)
+ (scale-float (float -5804760634859385 1.0d0) -107)
+ (scale-float (float -6678204498813162 1.0d0) -161)
+ (scale-float (float -7794647540220125 1.0d0) -215)
+ (scale-float (float 7130250855546880 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5995166417872839 1.0d0) -52)
+ (scale-float (float -7083656090478066 1.0d0) -106)
+ (scale-float (float -5085604729162056 1.0d0) -160)
+ (scale-float (float -4786273674027804 1.0d0) -214)
+ (scale-float (float -7576257161363456 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6014356343692036 1.0d0) -52)
+ (scale-float (float 5366472246956758 1.0d0) -106)
+ (scale-float (float -5071220322235649 1.0d0) -169)
+ (scale-float (float 6954359692199752 1.0d0) -223)
+ (scale-float (float -5034514724159488 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6033625054508968 1.0d0) -52)
+ (scale-float (float 5677257234433246 1.0d0) -106)
+ (scale-float (float -5084702581541349 1.0d0) -161)
+ (scale-float (float 5654826779275307 1.0d0) -215)
+ (scale-float (float -4653569025212416 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6052973127747045 1.0d0) -52)
+ (scale-float (float -5992522324811026 1.0d0) -107)
+ (scale-float (float 5137769490681806 1.0d0) -163)
+ (scale-float (float 6191509978816801 1.0d0) -217)
+ (scale-float (float -5937582080655360 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6072401146346069 1.0d0) -52)
+ (scale-float (float 6368946399492854 1.0d0) -107)
+ (scale-float (float 5940989044276757 1.0d0) -161)
+ (scale-float (float -6257130296766040 1.0d0) -215)
+ (scale-float (float -8387244314984448 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6091909698828786 1.0d0) -52)
+ (scale-float (float 4825684163849395 1.0d0) -106)
+ (scale-float (float 6244703829615250 1.0d0) -160)
+ (scale-float (float -7353096679909392 1.0d0) -214)
+ (scale-float (float 6242314420658176 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6111499379368395 1.0d0) -52)
+ (scale-float (float 6853268348922355 1.0d0) -107)
+ (scale-float (float 8921987650280235 1.0d0) -162)
+ (scale-float (float -5647125548986718 1.0d0) -218)
+ (scale-float (float 7050803615367168 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6131170787857042 1.0d0) -52)
+ (scale-float (float 7076646005340217 1.0d0) -107)
+ (scale-float (float -8918575034835941 1.0d0) -166)
+ (scale-float (float 6834943287816370 1.0d0) -222)
+ (scale-float (float 6145850373832704 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6150924529975311 1.0d0) -52)
+ (scale-float (float -6211441221071454 1.0d0) -107)
+ (scale-float (float -8016332564782876 1.0d0) -161)
+ (scale-float (float -4773628654070188 1.0d0) -216)
+ (scale-float (float -8576558004961280 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6170761217262726 1.0d0) -52)
+ (scale-float (float 4529737820769807 1.0d0) -107)
+ (scale-float (float -6371861108480422 1.0d0) -161)
+ (scale-float (float -8743805348163722 1.0d0) -217)
+ (scale-float (float 5463106528870400 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6190681467189290 1.0d0) -52)
+ (scale-float (float 4583442240251745 1.0d0) -106)
+ (scale-float (float 8007699635050869 1.0d0) -161)
+ (scale-float (float 7067192484128569 1.0d0) -216)
+ (scale-float (float 5880342829596672 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6210685903228067 1.0d0) -52)
+ (scale-float (float 6563328176446876 1.0d0) -107)
+ (scale-float (float 8373952085979007 1.0d0) -161)
+ (scale-float (float -7691011378213255 1.0d0) -217)
+ (scale-float (float 8480275457310720 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6230775154928834 1.0d0) -52)
+ (scale-float (float 7704622863134887 1.0d0) -106)
+ (scale-float (float 7323134867572349 1.0d0) -160)
+ (scale-float (float -5005478534218041 1.0d0) -214)
+ (scale-float (float -7309238760914944 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6250949857992820 1.0d0) -52)
+ (scale-float (float 7987647985519856 1.0d0) -107)
+ (scale-float (float -7487426820719905 1.0d0) -161)
+ (scale-float (float -5364782272810499 1.0d0) -215)
+ (scale-float (float -8832938274062336 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6271210654348545 1.0d0) -52)
+ (scale-float (float -7202865618189550 1.0d0) -107)
+ (scale-float (float -6519805450253747 1.0d0) -161)
+ (scale-float (float -6252520507001189 1.0d0) -215)
+ (scale-float (float 8927192142708736 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6291558192228785 1.0d0) -52)
+ (scale-float (float -6205580932530312 1.0d0) -108)
+ (scale-float (float 8383826856069705 1.0d0) -162)
+ (scale-float (float 7536245349448984 1.0d0) -217)
+ (scale-float (float 7909342424727552 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6311993126248681 1.0d0) -52)
+ (scale-float (float 5505618814708415 1.0d0) -110)
+ (scale-float (float -6766921334681526 1.0d0) -164)
+ (scale-float (float 7244415763832851 1.0d0) -220)
+ (scale-float (float 8690738430738432 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6332516117485007 1.0d0) -52)
+ (scale-float (float -4986656226720623 1.0d0) -112)
+ (scale-float (float -7019315119988339 1.0d0) -167)
+ (scale-float (float -8547683247092648 1.0d0) -221)
+ (scale-float (float 8098755056238592 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6353127833556623 1.0d0) -52)
+ (scale-float (float -6484016137410317 1.0d0) -106)
+ (scale-float (float 7194743581760215 1.0d0) -165)
+ (scale-float (float -6107308258168385 1.0d0) -221)
+ (scale-float (float 6471096203214848 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6373828948706130 1.0d0) -52)
+ (scale-float (float -7570036791396226 1.0d0) -106)
+ (scale-float (float 7505571551562323 1.0d0) -162)
+ (scale-float (float -6361470971601130 1.0d0) -216)
+ (scale-float (float 6530359831363584 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6394620143882752 1.0d0) -52)
+ (scale-float (float -5926281191235762 1.0d0) -106)
+ (scale-float (float 6906608668392283 1.0d0) -162)
+ (scale-float (float 8869198526887854 1.0d0) -216)
+ (scale-float (float 8679426859663360 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6415502106826461 1.0d0) -52)
+ (scale-float (float 6540068083767816 1.0d0) -106)
+ (scale-float (float 6153041982415204 1.0d0) -162)
+ (scale-float (float 8610841340982497 1.0d0) -216)
+ (scale-float (float -6431942437240832 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6436475532153374 1.0d0) -52)
+ (scale-float (float -8004461954805426 1.0d0) -109)
+ (scale-float (float -4616699193508432 1.0d0) -163)
+ (scale-float (float 5836784995704703 1.0d0) -220)
+ (scale-float (float 4650103046406144 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6457541121442432 1.0d0) -52)
+ (scale-float (float 8229890068077468 1.0d0) -110)
+ (scale-float (float 8417589833442195 1.0d0) -164)
+ (scale-float (float 4993999935830255 1.0d0) -218)
+ (scale-float (float 8387867879931904 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6478699583323403 1.0d0) -52)
+ (scale-float (float 6209766338586700 1.0d0) -108)
+ (scale-float (float 8812525065085517 1.0d0) -162)
+ (scale-float (float 7606674576940641 1.0d0) -218)
+ (scale-float (float 5829493922594816 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6499951633566213 1.0d0) -52)
+ (scale-float (float 5344999255632671 1.0d0) -106)
+ (scale-float (float 6659043903118210 1.0d0) -160)
+ (scale-float (float 7988952299473118 1.0d0) -215)
+ (scale-float (float 8825753877725184 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6521297995171641 1.0d0) -52)
+ (scale-float (float 8289589138315224 1.0d0) -106)
+ (scale-float (float -7613861187390282 1.0d0) -160)
+ (scale-float (float -7921364707044254 1.0d0) -215)
+ (scale-float (float -6003899739537408 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6542739398463397 1.0d0) -52)
+ (scale-float (float 7091371929556171 1.0d0) -107)
+ (scale-float (float -7866566071479408 1.0d0) -161)
+ (scale-float (float 8144757392471106 1.0d0) -215)
+ (scale-float (float -4970357131509760 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6564276581181608 1.0d0) -52)
+ (scale-float (float 5586345902748011 1.0d0) -107)
+ (scale-float (float 5533721210527600 1.0d0) -162)
+ (scale-float (float 6324541974446864 1.0d0) -218)
+ (scale-float (float -5530738939396096 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6585910288577741 1.0d0) -52)
+ (scale-float (float 8176993161446191 1.0d0) -106)
+ (scale-float (float -8048923049888439 1.0d0) -161)
+ (scale-float (float -7609732061919437 1.0d0) -215)
+ (scale-float (float -8657823220236288 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6607641273510985 1.0d0) -52)
+ (scale-float (float 7535617707354145 1.0d0) -108)
+ (scale-float (float 8267981124035699 1.0d0) -162)
+ (scale-float (float 5231058758323122 1.0d0) -219)
+ (scale-float (float 6731453978116096 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6629470296546116 1.0d0) -52)
+ (scale-float (float -5694113360457882 1.0d0) -106)
+ (scale-float (float 7867501777997419 1.0d0) -161)
+ (scale-float (float 4661073714339451 1.0d0) -215)
+ (scale-float (float -5569705019637760 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6651398126052879 1.0d0) -52)
+ (scale-float (float 5437625136686112 1.0d0) -108)
+ (scale-float (float 8896126577259305 1.0d0) -165)
+ (scale-float (float -7927086154208746 1.0d0) -220)
+ (scale-float (float -8096798980702208 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6673425538306912 1.0d0) -52)
+ (scale-float (float -6355083395775152 1.0d0) -106)
+ (scale-float (float 8453211253049352 1.0d0) -160)
+ (scale-float (float -8691832140261531 1.0d0) -222)
+ (scale-float (float -5169064211120128 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6695553317592230 1.0d0) -52)
+ (scale-float (float -7099652996876641 1.0d0) -107)
+ (scale-float (float -5912312036174398 1.0d0) -161)
+ (scale-float (float -6829599742043205 1.0d0) -215)
+ (scale-float (float -7999020490719232 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6717782256305316 1.0d0) -52)
+ (scale-float (float 7640675240741809 1.0d0) -106)
+ (scale-float (float 9004736994580097 1.0d0) -161)
+ (scale-float (float 8048234290283575 1.0d0) -219)
+ (scale-float (float -4616011050909696 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6740113155060833 1.0d0) -52)
+ (scale-float (float 5658062833881743 1.0d0) -106)
+ (scale-float (float 5176537792598149 1.0d0) -160)
+ (scale-float (float 6593049061175946 1.0d0) -214)
+ (scale-float (float -8140125752188928 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6762546822798989 1.0d0) -52)
+ (scale-float (float 6542015343501424 1.0d0) -106)
+ (scale-float (float 5510453757822690 1.0d0) -165)
+ (scale-float (float -8660836269389139 1.0d0) -220)
+ (scale-float (float -4521150734925824 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6785084076894595 1.0d0) -52)
+ (scale-float (float -8024134181405234 1.0d0) -107)
+ (scale-float (float 5148548049104106 1.0d0) -162)
+ (scale-float (float -6278138916873739 1.0d0) -216)
+ (scale-float (float -6662350973861888 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6807725743267832 1.0d0) -52)
+ (scale-float (float 6275060935804555 1.0d0) -106)
+ (scale-float (float -8635713178261019 1.0d0) -161)
+ (scale-float (float -5754998230360339 1.0d0) -218)
+ (scale-float (float 7456362891575296 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6830472656496777 1.0d0) -52)
+ (scale-float (float 7158775444717677 1.0d0) -106)
+ (scale-float (float 5033196369861081 1.0d0) -160)
+ (scale-float (float -4787767046091634 1.0d0) -215)
+ (scale-float (float 7492117972484096 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6853325659931699 1.0d0) -52)
+ (scale-float (float -5590101145421790 1.0d0) -106)
+ (scale-float (float 6079703184931234 1.0d0) -160)
+ (scale-float (float 6859027620564742 1.0d0) -216)
+ (scale-float (float 7305674740727808 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6876285605811173 1.0d0) -52)
+ (scale-float (float 5465150212415167 1.0d0) -106)
+ (scale-float (float -5110000069201240 1.0d0) -161)
+ (scale-float (float -5085577717522676 1.0d0) -218)
+ (scale-float (float 8557488985866240 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6899353355380049 1.0d0) -52)
+ (scale-float (float 4838330837729897 1.0d0) -107)
+ (scale-float (float -4738094219478219 1.0d0) -161)
+ (scale-float (float 6719406853451633 1.0d0) -217)
+ (scale-float (float 8861176190861312 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6922529779009289 1.0d0) -52)
+ (scale-float (float 7843821730419908 1.0d0) -106)
+ (scale-float (float 5823970951752681 1.0d0) -160)
+ (scale-float (float -8186736237649020 1.0d0) -215)
+ (scale-float (float -7865276087861248 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6945815756317735 1.0d0) -52)
+ (scale-float (float -8579755896278066 1.0d0) -106)
+ (scale-float (float 7288315308749691 1.0d0) -163)
+ (scale-float (float 8365316799719055 1.0d0) -217)
+ (scale-float (float -7721116629467136 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6969212176295817 1.0d0) -52)
+ (scale-float (float -8315922210808482 1.0d0) -106)
+ (scale-float (float -5702883920033279 1.0d0) -160)
+ (scale-float (float -7686770830327470 1.0d0) -214)
+ (scale-float (float 7472762215374848 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6992719937431264 1.0d0) -52)
+ (scale-float (float -6914293524384001 1.0d0) -108)
+ (scale-float (float -5867244076282738 1.0d0) -162)
+ (scale-float (float 7696698117705235 1.0d0) -216)
+ (scale-float (float -8220053476999168 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7016339947836833 1.0d0) -52)
+ (scale-float (float -8450020054804773 1.0d0) -109)
+ (scale-float (float -6919436099493397 1.0d0) -164)
+ (scale-float (float 5290185985792271 1.0d0) -218)
+ (scale-float (float -6108474780024832 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7040073125380105 1.0d0) -52)
+ (scale-float (float -4550651818919722 1.0d0) -107)
+ (scale-float (float 6679243867380362 1.0d0) -162)
+ (scale-float (float 4912056610678102 1.0d0) -216)
+ (scale-float (float 4750189385154560 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7063920397815387 1.0d0) -52)
+ (scale-float (float 5523738978247978 1.0d0) -106)
+ (scale-float (float -7126224356225534 1.0d0) -160)
+ (scale-float (float -6524323916222883 1.0d0) -214)
+ (scale-float (float -5885479783497728 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7087882702917760 1.0d0) -52)
+ (scale-float (float 7475770277114994 1.0d0) -108)
+ (scale-float (float -7704651318171570 1.0d0) -163)
+ (scale-float (float -7609353640231345 1.0d0) -217)
+ (scale-float (float 5202114242281472 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7111960988619306 1.0d0) -52)
+ (scale-float (float 8105525534785960 1.0d0) -106)
+ (scale-float (float -6185671794388809 1.0d0) -160)
+ (scale-float (float 7093706143124601 1.0d0) -215)
+ (scale-float (float 5099017510748160 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7136156213147571 1.0d0) -52)
+ (scale-float (float -7818466985562942 1.0d0) -107)
+ (scale-float (float -8196325047558754 1.0d0) -161)
+ (scale-float (float 7327501339175382 1.0d0) -215)
+ (scale-float (float 7270013848780800 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7160469345166286 1.0d0) -52)
+ (scale-float (float 6660981521680870 1.0d0) -107)
+ (scale-float (float 8981189081472347 1.0d0) -163)
+ (scale-float (float 8530922126423510 1.0d0) -217)
+ (scale-float (float 4654045647994880 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7184901363918415 1.0d0) -52)
+ (scale-float (float -8714320796204334 1.0d0) -107)
+ (scale-float (float 6929090388678396 1.0d0) -163)
+ (scale-float (float 8774061564943841 1.0d0) -219)
+ (scale-float (float -5660133128929280 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7209453259371545 1.0d0) -52)
+ (scale-float (float 8444759199683197 1.0d0) -106)
+ (scale-float (float -5106966562560949 1.0d0) -160)
+ (scale-float (float -6469344206533755 1.0d0) -214)
+ (scale-float (float -7324907678924800 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7234126032365695 1.0d0) -52)
+ (scale-float (float -5905602391740602 1.0d0) -108)
+ (scale-float (float -6357685931096535 1.0d0) -162)
+ (scale-float (float -8561037202104213 1.0d0) -217)
+ (scale-float (float 7885071340011520 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7258920694763558 1.0d0) -52)
+ (scale-float (float -8837989029989582 1.0d0) -106)
+ (scale-float (float -7733550203613935 1.0d0) -160)
+ (scale-float (float -6331548833860318 1.0d0) -214)
+ (scale-float (float -6788960204709888 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7283838269603253 1.0d0) -52)
+ (scale-float (float -8872870132223229 1.0d0) -106)
+ (scale-float (float -6009880889763839 1.0d0) -160)
+ (scale-float (float 4825738412059365 1.0d0) -215)
+ (scale-float (float 4589757610934272 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7308879791253617 1.0d0) -52)
+ (scale-float (float -8274578270836648 1.0d0) -106)
+ (scale-float (float 6182491319721802 1.0d0) -160)
+ (scale-float (float 5685546970461737 1.0d0) -219)
+ (scale-float (float 8240459038064640 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7334046305572091 1.0d0) -52)
+ (scale-float (float 6538631887819978 1.0d0) -107)
+ (scale-float (float 5074582270124995 1.0d0) -163)
+ (scale-float (float -7399242229208454 1.0d0) -217)
+ (scale-float (float 8719309077479424 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7359338870065256 1.0d0) -52)
+ (scale-float (float 6253263043292830 1.0d0) -106)
+ (scale-float (float 8701508368181859 1.0d0) -160)
+ (scale-float (float -7925731726653277 1.0d0) -216)
+ (scale-float (float -4983790590722048 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7384758554052061 1.0d0) -52)
+ (scale-float (float 7222435099407230 1.0d0) -106)
+ (scale-float (float -7026468917474546 1.0d0) -161)
+ (scale-float (float -8700465992504918 1.0d0) -217)
+ (scale-float (float -8377219604807680 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7410306438829807 1.0d0) -52)
+ (scale-float (float 4880848817813136 1.0d0) -117)
+ (scale-float (float 7350430596561503 1.0d0) -171)
+ (scale-float (float -6834991603195178 1.0d0) -225)
+ (scale-float (float -6508972068569088 1.0d0) -282))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7435983617842932 1.0d0) -52)
+ (scale-float (float -4936633312102464 1.0d0) -108)
+ (scale-float (float -4586532790720996 1.0d0) -164)
+ (scale-float (float -5995662022739528 1.0d0) -219)
+ (scale-float (float -6122781272440832 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7461791196854660 1.0d0) -52)
+ (scale-float (float 7235481383616237 1.0d0) -106)
+ (scale-float (float 6487567776731441 1.0d0) -161)
+ (scale-float (float -5606196606941048 1.0d0) -215)
+ (scale-float (float 7836165487624192 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7487730294121567 1.0d0) -52)
+ (scale-float (float -8889820063948728 1.0d0) -106)
+ (scale-float (float -6530263170751758 1.0d0) -160)
+ (scale-float (float 7225013578430047 1.0d0) -214)
+ (scale-float (float 7944683267145728 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7513802040571114 1.0d0) -52)
+ (scale-float (float -7722658158794595 1.0d0) -108)
+ (scale-float (float 5815132029301593 1.0d0) -166)
+ (scale-float (float -6928708525599455 1.0d0) -220)
+ (scale-float (float 7704045701562368 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7540007579982230 1.0d0) -52)
+ (scale-float (float -7569212622669446 1.0d0) -109)
+ (scale-float (float 8460517646045379 1.0d0) -169)
+ (scale-float (float -8599298522205394 1.0d0) -223)
+ (scale-float (float -4531637106769920 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7566348069168975 1.0d0) -52)
+ (scale-float (float 7434517115760676 1.0d0) -107)
+ (scale-float (float 7476909206662982 1.0d0) -161)
+ (scale-float (float -7912632647859737 1.0d0) -216)
+ (scale-float (float -8200515293413376 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7592824678167370 1.0d0) -52)
+ (scale-float (float 4726388825644092 1.0d0) -108)
+ (scale-float (float 7734927965263806 1.0d0) -163)
+ (scale-float (float 6773912128020125 1.0d0) -218)
+ (scale-float (float 5041169150246912 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7619438590425442 1.0d0) -52)
+ (scale-float (float 5503995361504686 1.0d0) -106)
+ (scale-float (float 7473486702684451 1.0d0) -164)
+ (scale-float (float -6608415174617732 1.0d0) -218)
+ (scale-float (float -7507524966678528 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7646191002996560 1.0d0) -52)
+ (scale-float (float 7233696640180094 1.0d0) -106)
+ (scale-float (float -7424525764075406 1.0d0) -160)
+ (scale-float (float -7087988465701772 1.0d0) -218)
+ (scale-float (float -8532617565569024 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7673083126736119 1.0d0) -52)
+ (scale-float (float 7102258468555939 1.0d0) -108)
+ (scale-float (float 5559350604454066 1.0d0) -162)
+ (scale-float (float -4819800819068898 1.0d0) -217)
+ (scale-float (float -7454359290642432 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7700116186501645 1.0d0) -52)
+ (scale-float (float 4814654823599867 1.0d0) -106)
+ (scale-float (float -5312182834629036 1.0d0) -162)
+ (scale-float (float 5021497915287775 1.0d0) -216)
+ (scale-float (float 7232810079191040 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7727291421356394 1.0d0) -52)
+ (scale-float (float -6448209946056877 1.0d0) -106)
+ (scale-float (float -8056123697790814 1.0d0) -160)
+ (scale-float (float 8864501968791276 1.0d0) -214)
+ (scale-float (float 6523215591964672 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7754610084776504 1.0d0) -52)
+ (scale-float (float -6055282469355262 1.0d0) -106)
+ (scale-float (float -8535442044858421 1.0d0) -160)
+ (scale-float (float 4932484634552268 1.0d0) -214)
+ (scale-float (float 4854282506149888 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7782073444861790 1.0d0) -52)
+ (scale-float (float 5715688236164071 1.0d0) -106)
+ (scale-float (float -7790646907288377 1.0d0) -160)
+ (scale-float (float 8613967927072865 1.0d0) -218)
+ (scale-float (float -5106176465829888 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7809682784550244 1.0d0) -52)
+ (scale-float (float -7905805098743459 1.0d0) -106)
+ (scale-float (float -5542054708964861 1.0d0) -163)
+ (scale-float (float -7392439062693147 1.0d0) -217)
+ (scale-float (float 5914933245247488 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7837439401836313 1.0d0) -52)
+ (scale-float (float -5274620473453587 1.0d0) -106)
+ (scale-float (float 5309487360663029 1.0d0) -160)
+ (scale-float (float -6846544814492423 1.0d0) -215)
+ (scale-float (float 6364497217683456 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7865344609993054 1.0d0) -52)
+ (scale-float (float -6960432712494099 1.0d0) -108)
+ (scale-float (float -5261651726650240 1.0d0) -162)
+ (scale-float (float 4570340060721171 1.0d0) -217)
+ (scale-float (float -6625465896271872 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7893399737798221 1.0d0) -52)
+ (scale-float (float -4901543619596787 1.0d0) -106)
+ (scale-float (float 5003921559019641 1.0d0) -162)
+ (scale-float (float -5775690738734107 1.0d0) -216)
+ (scale-float (float 4923849420832768 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7921606129764380 1.0d0) -52)
+ (scale-float (float -7224066045360451 1.0d0) -107)
+ (scale-float (float 7179631466264596 1.0d0) -161)
+ (scale-float (float 7722685805907788 1.0d0) -215)
+ (scale-float (float -5336729861619712 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7949965146373135 1.0d0) -52)
+ (scale-float (float 4683450739878459 1.0d0) -106)
+ (scale-float (float 5872464728488067 1.0d0) -160)
+ (scale-float (float -7423411352728631 1.0d0) -217)
+ (scale-float (float -6852393463840768 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7978478164313548 1.0d0) -52)
+ (scale-float (float -7539536548766330 1.0d0) -111)
+ (scale-float (float -6959083601008122 1.0d0) -165)
+ (scale-float (float 5147026058692382 1.0d0) -220)
+ (scale-float (float -6838176295419904 1.0d0) -279))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8007146576724837 1.0d0) -52)
+ (scale-float (float 8125689861568848 1.0d0) -106)
+ (scale-float (float -4966592922510836 1.0d0) -163)
+ (scale-float (float 8879542236482956 1.0d0) -217)
+ (scale-float (float 5290559168249856 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8035971793443456 1.0d0) -52)
+ (scale-float (float 8846151859554218 1.0d0) -107)
+ (scale-float (float -7097686501320745 1.0d0) -161)
+ (scale-float (float -5772481724941971 1.0d0) -215)
+ (scale-float (float 5504987843428352 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8064955241254629 1.0d0) -52)
+ (scale-float (float 8692289481797304 1.0d0) -106)
+ (scale-float (float 5018213851800480 1.0d0) -161)
+ (scale-float (float 8465232655080171 1.0d0) -216)
+ (scale-float (float 5734681667731456 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8094098364148453 1.0d0) -52)
+ (scale-float (float 8683774843736916 1.0d0) -106)
+ (scale-float (float 6458428269031229 1.0d0) -162)
+ (scale-float (float 7868818629128906 1.0d0) -217)
+ (scale-float (float 7074941657939968 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8123402623580650 1.0d0) -52)
+ (scale-float (float 8394666525519859 1.0d0) -106)
+ (scale-float (float -8227700072422655 1.0d0) -161)
+ (scale-float (float -8526292033163607 1.0d0) -216)
+ (scale-float (float -6468556363726848 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8152869498738078 1.0d0) -52)
+ (scale-float (float 5812179079396220 1.0d0) -106)
+ (scale-float (float -7676014650498385 1.0d0) -161)
+ (scale-float (float -5603679704578218 1.0d0) -215)
+ (scale-float (float 5669344107839488 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8182500486809097 1.0d0) -52)
+ (scale-float (float -5557009219055588 1.0d0) -108)
+ (scale-float (float -4640331853462786 1.0d0) -162)
+ (scale-float (float -8143557958925724 1.0d0) -217)
+ (scale-float (float 5579415019847680 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8212297103258895 1.0d0) -52)
+ (scale-float (float -6877329639592607 1.0d0) -109)
+ (scale-float (float -8422443193077326 1.0d0) -163)
+ (scale-float (float 6129537386443126 1.0d0) -219)
+ (scale-float (float 4818167232200704 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8242260882109884 1.0d0) -52)
+ (scale-float (float -8138600312309569 1.0d0) -107)
+ (scale-float (float -5601830974017904 1.0d0) -161)
+ (scale-float (float -8958193669964181 1.0d0) -216)
+ (scale-float (float 5925345600241664 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8272393376227267 1.0d0) -52)
+ (scale-float (float 8298148560658028 1.0d0) -106)
+ (scale-float (float 8508603678331331 1.0d0) -162)
+ (scale-float (float -8486309418804537 1.0d0) -217)
+ (scale-float (float -5147654831407104 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8302696157609901 1.0d0) -52)
+ (scale-float (float -6320469433768359 1.0d0) -107)
+ (scale-float (float -5076438843848382 1.0d0) -162)
+ (scale-float (float 8903418434077401 1.0d0) -216)
+ (scale-float (float 8950448579018752 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8333170817686550 1.0d0) -52)
+ (scale-float (float 7546292343864592 1.0d0) -109)
+ (scale-float (float -7800709243750414 1.0d0) -163)
+ (scale-float (float 6598422720804850 1.0d0) -218)
+ (scale-float (float 8807538521407488 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8363818967617673 1.0d0) -52)
+ (scale-float (float 6997754063386601 1.0d0) -106)
+ (scale-float (float -8565628394307231 1.0d0) -160)
+ (scale-float (float -8439939564592947 1.0d0) -214)
+ (scale-float (float -7616844314025984 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8394642238602842 1.0d0) -52)
+ (scale-float (float 8878950056850851 1.0d0) -107)
+ (scale-float (float 8723213175988695 1.0d0) -161)
+ (scale-float (float -8327860237491630 1.0d0) -216)
+ (scale-float (float 4980946269896704 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8425642282193926 1.0d0) -52)
+ (scale-float (float 4779845309893006 1.0d0) -107)
+ (scale-float (float -6757676580943280 1.0d0) -161)
+ (scale-float (float 8425855058608660 1.0d0) -215)
+ (scale-float (float 4974898380816384 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8456820770614168 1.0d0) -52)
+ (scale-float (float -4972489650285567 1.0d0) -107)
+ (scale-float (float -4769531766660469 1.0d0) -163)
+ (scale-float (float -8001510013778334 1.0d0) -217)
+ (scale-float (float 4717884663398400 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8488179397083279 1.0d0) -52)
+ (scale-float (float -4912112564810610 1.0d0) -106)
+ (scale-float (float 7942805665757040 1.0d0) -160)
+ (scale-float (float 8811895955504207 1.0d0) -214)
+ (scale-float (float 8675264099876864 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8519719876148687 1.0d0) -52)
+ (scale-float (float -7982099506647040 1.0d0) -106)
+ (scale-float (float -8841418358411833 1.0d0) -160)
+ (scale-float (float 6904205857327128 1.0d0) -214)
+ (scale-float (float 8443528115421184 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8551443944023073 1.0d0) -52)
+ (scale-float (float -5997882268187211 1.0d0) -109)
+ (scale-float (float -8496346745753890 1.0d0) -163)
+ (scale-float (float -4894421872165890 1.0d0) -219)
+ (scale-float (float 4601465184714752 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8583353358928340 1.0d0) -52)
+ (scale-float (float -8814761974669894 1.0d0) -106)
+ (scale-float (float 6948471023477363 1.0d0) -162)
+ (scale-float (float 7328637586292604 1.0d0) -216)
+ (scale-float (float -6243556978163712 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8615449901446146 1.0d0) -52)
+ (scale-float (float 8113149089767557 1.0d0) -107)
+ (scale-float (float -7432909260246323 1.0d0) -161)
+ (scale-float (float -7305551804337175 1.0d0) -217)
+ (scale-float (float 6354440576040960 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8647735374875169 1.0d0) -52)
+ (scale-float (float 4701163981653150 1.0d0) -106)
+ (scale-float (float -8491463606061709 1.0d0) -160)
+ (scale-float (float -8224472126148106 1.0d0) -215)
+ (scale-float (float 5892533466447872 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8680211605595229 1.0d0) -52)
+ (scale-float (float -6345861736784294 1.0d0) -106)
+ (scale-float (float 5776467372825407 1.0d0) -160)
+ (scale-float (float 7593416625580479 1.0d0) -215)
+ (scale-float (float 7718840200691712 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8712880443438441 1.0d0) -52)
+ (scale-float (float -6342506878020311 1.0d0) -106)
+ (scale-float (float -8000635766600025 1.0d0) -160)
+ (scale-float (float 5719218459519351 1.0d0) -214)
+ (scale-float (float -6198634980245504 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8745743762067553 1.0d0) -52)
+ (scale-float (float 6844417690932138 1.0d0) -106)
+ (scale-float (float -6885399513169297 1.0d0) -162)
+ (scale-float (float 5330164457289929 1.0d0) -217)
+ (scale-float (float 5864964667473920 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8778803459361628 1.0d0) -52)
+ (scale-float (float 7769480413660448 1.0d0) -106)
+ (scale-float (float 4990037450690366 1.0d0) -160)
+ (scale-float (float 4839956142521049 1.0d0) -215)
+ (scale-float (float 7867181987250176 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8812061457809235 1.0d0) -52)
+ (scale-float (float 7510128508333371 1.0d0) -106)
+ (scale-float (float 7829409707258784 1.0d0) -163)
+ (scale-float (float 7694454672518857 1.0d0) -218)
+ (scale-float (float -5529384792489984 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8845519704909331 1.0d0) -52)
+ (scale-float (float -7611897701674087 1.0d0) -107)
+ (scale-float (float 5002468143804897 1.0d0) -161)
+ (scale-float (float 8089345121571351 1.0d0) -216)
+ (scale-float (float -5981796730929152 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8879180173579997 1.0d0) -52)
+ (scale-float (float -5740489964967134 1.0d0) -106)
+ (scale-float (float -6481797620571133 1.0d0) -162)
+ (scale-float (float 7349818714667008 1.0d0) -216)
+ (scale-float (float -4759398920978432 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8913044862575220 1.0d0) -52)
+ (scale-float (float 6795715640058057 1.0d0) -107)
+ (scale-float (float -6816375220181127 1.0d0) -161)
+ (scale-float (float 7370821425444048 1.0d0) -219)
+ (scale-float (float -7203721854844928 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8947115796909898 1.0d0) -52)
+ (scale-float (float 7724240165188716 1.0d0) -107)
+ (scale-float (float -7047535107188379 1.0d0) -161)
+ (scale-float (float 7520417695255970 1.0d0) -215)
+ (scale-float (float 8746954853597184 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8981395028293258 1.0d0) -52)
+ (scale-float (float -5211309319734257 1.0d0) -108)
+ (scale-float (float 7350914624408000 1.0d0) -162)
+ (scale-float (float -6930865922440237 1.0d0) -216)
+ (scale-float (float 8160536897486848 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4507942317785444 1.0d0) -51)
+ (scale-float (float -8112920450222280 1.0d0) -108)
+ (scale-float (float -4633033814833455 1.0d0) -162)
+ (scale-float (float -8034998550836901 1.0d0) -217)
+ (scale-float (float 8180827530199040 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4525293362587790 1.0d0) -51)
+ (scale-float (float 6179343154002858 1.0d0) -108)
+ (scale-float (float 8703203171723310 1.0d0) -162)
+ (scale-float (float -6213654595809493 1.0d0) -217)
+ (scale-float (float 6632929259421696 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4542751715793594 1.0d0) -51)
+ (scale-float (float 8994041374757648 1.0d0) -106)
+ (scale-float (float -8652637522498836 1.0d0) -160)
+ (scale-float (float 7844548489486572 1.0d0) -214)
+ (scale-float (float -8418484123598848 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4560318458900858 1.0d0) -51)
+ (scale-float (float -6865874344020962 1.0d0) -105)
+ (scale-float (float -4855957659792291 1.0d0) -159)
+ (scale-float (float 6840176623805998 1.0d0) -213)
+ (scale-float (float 7102978793480192 1.0d0) -267))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4577994687904921 1.0d0) -51)
+ (scale-float (float -8580167512516603 1.0d0) -105)
+ (scale-float (float 7399673441574908 1.0d0) -159)
+ (scale-float (float 5926983132286003 1.0d0) -214)
+ (scale-float (float 7064953812008960 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4595781513542561 1.0d0) -51)
+ (scale-float (float 6881231372859908 1.0d0) -105)
+ (scale-float (float 7023693700156889 1.0d0) -160)
+ (scale-float (float 5922424877162099 1.0d0) -214)
+ (scale-float (float 8225388493799424 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4613680061541043 1.0d0) -51)
+ (scale-float (float 5881634407042754 1.0d0) -106)
+ (scale-float (float -8930023400584930 1.0d0) -160)
+ (scale-float (float -5146291796594786 1.0d0) -215)
+ (scale-float (float 6706515274235904 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4631691472872225 1.0d0) -51)
+ (scale-float (float 5890776712056895 1.0d0) -107)
+ (scale-float (float 5832063788390196 1.0d0) -162)
+ (scale-float (float 6591451445563752 1.0d0) -216)
+ (scale-float (float 6280061233135616 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4649816904011860 1.0d0) -51)
+ (scale-float (float 5454348993952511 1.0d0) -107)
+ (scale-float (float -7838288711848346 1.0d0) -162)
+ (scale-float (float 5071818222172620 1.0d0) -216)
+ (scale-float (float -7119121918722048 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4668057527204202 1.0d0) -51)
+ (scale-float (float -4943368423135290 1.0d0) -108)
+ (scale-float (float -8511787137486369 1.0d0) -163)
+ (scale-float (float 8141491753938557 1.0d0) -220)
+ (scale-float (float 7907892751499264 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4686414530732050 1.0d0) -51)
+ (scale-float (float -7568115761223155 1.0d0) -105)
+ (scale-float (float -8799439543744175 1.0d0) -159)
+ (scale-float (float 7952737685838994 1.0d0) -215)
+ (scale-float (float -4677091422633984 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4704889119192359 1.0d0) -51)
+ (scale-float (float -6625139056032962 1.0d0) -105)
+ (scale-float (float 6340817092719046 1.0d0) -160)
+ (scale-float (float 7277739084036241 1.0d0) -214)
+ (scale-float (float -5234923158634496 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4723482513777556 1.0d0) -51)
+ (scale-float (float -4525892343443549 1.0d0) -105)
+ (scale-float (float -8032296315579629 1.0d0) -160)
+ (scale-float (float -6720437390993336 1.0d0) -215)
+ (scale-float (float -7408496692232192 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4742195952562693 1.0d0) -51)
+ (scale-float (float -8775649112842370 1.0d0) -106)
+ (scale-float (float -7028344224447296 1.0d0) -160)
+ (scale-float (float 5430706302837071 1.0d0) -214)
+ (scale-float (float -7032435558858752 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4761030690798583 1.0d0) -51)
+ (scale-float (float 6700890742573426 1.0d0) -106)
+ (scale-float (float 8517663623061862 1.0d0) -160)
+ (scale-float (float -8351123014271912 1.0d0) -214)
+ (scale-float (float -8523717545361408 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4779988001211067 1.0d0) -51)
+ (scale-float (float -7412695062535691 1.0d0) -107)
+ (scale-float (float -8333778395735522 1.0d0) -161)
+ (scale-float (float -8005396742108668 1.0d0) -216)
+ (scale-float (float 8555360010043392 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4799069174306553 1.0d0) -51)
+ (scale-float (float -6654620461486504 1.0d0) -106)
+ (scale-float (float 5802603391804805 1.0d0) -160)
+ (scale-float (float 5008422188327585 1.0d0) -214)
+ (scale-float (float -8284430063616000 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4818275518683994 1.0d0) -51)
+ (scale-float (float -5754383055639459 1.0d0) -109)
+ (scale-float (float 6874777385534123 1.0d0) -164)
+ (scale-float (float 4732414121178789 1.0d0) -219)
+ (scale-float (float -7692481904771072 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4837608361353453 1.0d0) -51)
+ (scale-float (float 8074256282507404 1.0d0) -105)
+ (scale-float (float 8107238484430522 1.0d0) -160)
+ (scale-float (float -7665576932769853 1.0d0) -214)
+ (scale-float (float -5550231555932160 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4857069048061424 1.0d0) -51)
+ (scale-float (float 5573662177923259 1.0d0) -107)
+ (scale-float (float -6190898135404773 1.0d0) -169)
+ (scale-float (float 4861250181949393 1.0d0) -227)
+ (scale-float (float -7189879406460928 1.0d0) -282))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4876658943623070 1.0d0) -51)
+ (scale-float (float -5797488569663105 1.0d0) -106)
+ (scale-float (float 5943397845313088 1.0d0) -161)
+ (scale-float (float -7659456383056697 1.0d0) -215)
+ (scale-float (float 8033132261146624 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4896379432261561 1.0d0) -51)
+ (scale-float (float 6176610507957441 1.0d0) -107)
+ (scale-float (float -4777461322713456 1.0d0) -163)
+ (scale-float (float -5986621159816620 1.0d0) -217)
+ (scale-float (float -6453729645559808 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4916231917954681 1.0d0) -51)
+ (scale-float (float 8588141350290096 1.0d0) -107)
+ (scale-float (float -6538137139653070 1.0d0) -161)
+ (scale-float (float -5367876147221190 1.0d0) -215)
+ (scale-float (float -6211316813987840 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4936217824788886 1.0d0) -51)
+ (scale-float (float 8955588813284292 1.0d0) -105)
+ (scale-float (float 8192617247222676 1.0d0) -159)
+ (scale-float (float 5480451822051539 1.0d0) -214)
+ (scale-float (float 8108249688489984 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4956338597321009 1.0d0) -51)
+ (scale-float (float -8625892916963286 1.0d0) -106)
+ (scale-float (float -8693836795712583 1.0d0) -161)
+ (scale-float (float 6871050900024872 1.0d0) -215)
+ (scale-float (float -7711352672518144 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4976595700947791 1.0d0) -51)
+ (scale-float (float -5616750136770440 1.0d0) -105)
+ (scale-float (float 6510467057312425 1.0d0) -163)
+ (scale-float (float -7628369649567092 1.0d0) -218)
+ (scale-float (float 5955369073377280 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4996990622283456 1.0d0) -51)
+ (scale-float (float -7942191285095059 1.0d0) -106)
+ (scale-float (float -6064273275229659 1.0d0) -160)
+ (scale-float (float -5319119386674314 1.0d0) -215)
+ (scale-float (float -7646359613997056 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5017524869545515 1.0d0) -51)
+ (scale-float (float 8104421411399551 1.0d0) -105)
+ (scale-float (float 5198629989954815 1.0d0) -160)
+ (scale-float (float 6631968396190026 1.0d0) -215)
+ (scale-float (float 5353559158325248 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5038199972949024 1.0d0) -51)
+ (scale-float (float 7017576463989287 1.0d0) -105)
+ (scale-float (float -7547375243341514 1.0d0) -159)
+ (scale-float (float -7426093200599037 1.0d0) -213)
+ (scale-float (float -4839153031282688 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5059017485109501 1.0d0) -51)
+ (scale-float (float -5256502056897405 1.0d0) -105)
+ (scale-float (float 8051618487691050 1.0d0) -166)
+ (scale-float (float -4880892799359926 1.0d0) -220)
+ (scale-float (float -7939247772270592 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5079978981454734 1.0d0) -51)
+ (scale-float (float -5227066467451071 1.0d0) -106)
+ (scale-float (float -5522085046755756 1.0d0) -160)
+ (scale-float (float 7783388497565455 1.0d0) -216)
+ (scale-float (float 5765530325352448 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5101086060645710 1.0d0) -51)
+ (scale-float (float -8038288147332616 1.0d0) -107)
+ (scale-float (float -5028989851674966 1.0d0) -161)
+ (scale-float (float -6526043318984233 1.0d0) -216)
+ (scale-float (float 8204474594361344 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5122340345006890 1.0d0) -51)
+ (scale-float (float 8534489371591094 1.0d0) -105)
+ (scale-float (float -8422091584111265 1.0d0) -159)
+ (scale-float (float -5283450070500595 1.0d0) -213)
+ (scale-float (float -6431827347800064 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5143743480966089 1.0d0) -51)
+ (scale-float (float 6313120262388408 1.0d0) -110)
+ (scale-float (float -7505846896165875 1.0d0) -164)
+ (scale-float (float 4740247571734401 1.0d0) -219)
+ (scale-float (float -6660853340831744 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5165297139504195 1.0d0) -51)
+ (scale-float (float -7776064178571584 1.0d0) -105)
+ (scale-float (float 8675871213227517 1.0d0) -159)
+ (scale-float (float 6062006298668271 1.0d0) -213)
+ (scale-float (float 8013315401146368 1.0d0) -267))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5187003016615002 1.0d0) -51)
+ (scale-float (float -7118173844446244 1.0d0) -106)
+ (scale-float (float -4845291921963261 1.0d0) -160)
+ (scale-float (float 8891161534297773 1.0d0) -217)
+ (scale-float (float -5602645897248768 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5208862833775413 1.0d0) -51)
+ (scale-float (float -6765045630603889 1.0d0) -106)
+ (scale-float (float 6079755601626192 1.0d0) -162)
+ (scale-float (float 8597325995288489 1.0d0) -217)
+ (scale-float (float 8163453345857536 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5230878338426285 1.0d0) -51)
+ (scale-float (float -6910322926908159 1.0d0) -107)
+ (scale-float (float 8551121322420234 1.0d0) -163)
+ (scale-float (float -6138896908024698 1.0d0) -217)
+ (scale-float (float -5736017005379584 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5253051304464207 1.0d0) -51)
+ (scale-float (float -8187725108832186 1.0d0) -105)
+ (scale-float (float 6310392441460258 1.0d0) -159)
+ (scale-float (float 6622489199440459 1.0d0) -213)
+ (scale-float (float -5400949404868608 1.0d0) -267))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5275383532744492 1.0d0) -51)
+ (scale-float (float 6710235860012905 1.0d0) -105)
+ (scale-float (float 6946167165217878 1.0d0) -159)
+ (scale-float (float -8190714099250867 1.0d0) -214)
+ (scale-float (float 8653598270357504 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5297876851595697 1.0d0) -51)
+ (scale-float (float -6104299294155149 1.0d0) -112)
+ (scale-float (float -7871097816959897 1.0d0) -167)
+ (scale-float (float 7564633731288480 1.0d0) -223)
+ (scale-float (float -5458923029004288 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5320533117345957 1.0d0) -51)
+ (scale-float (float -8110104653789814 1.0d0) -105)
+ (scale-float (float -6095125970748473 1.0d0) -161)
+ (scale-float (float -8417660405993412 1.0d0) -217)
+ (scale-float (float 6981803257495552 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5343354214861476 1.0d0) -51)
+ (scale-float (float 7055846370374930 1.0d0) -105)
+ (scale-float (float 5207656993073958 1.0d0) -159)
+ (scale-float (float -8526235223130475 1.0d0) -214)
+ (scale-float (float 4895808563183616 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5366342058097493 1.0d0) -51)
+ (scale-float (float 5050089741084139 1.0d0) -105)
+ (scale-float (float 5213531896513175 1.0d0) -159)
+ (scale-float (float -8516093744548960 1.0d0) -213)
+ (scale-float (float -7818972591054848 1.0d0) -267))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5389498590662050 1.0d0) -51)
+ (scale-float (float 7841269413863276 1.0d0) -105)
+ (scale-float (float 6486469616282850 1.0d0) -159)
+ (scale-float (float -6622029625462178 1.0d0) -219)
+ (scale-float (float -5554733397835776 1.0d0) -278))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5412825786392934 1.0d0) -51)
+ (scale-float (float 8974515617660484 1.0d0) -105)
+ (scale-float (float 7720037443034322 1.0d0) -162)
+ (scale-float (float -7250042294309602 1.0d0) -216)
+ (scale-float (float 8683802057048064 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5436325649948134 1.0d0) -51)
+ (scale-float (float 5085679199899093 1.0d0) -105)
+ (scale-float (float 6048680740045173 1.0d0) -160)
+ (scale-float (float 5197737643093849 1.0d0) -216)
+ (scale-float (float 6206530074443776 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5460000217410192 1.0d0) -51)
+ (scale-float (float 8973148485816752 1.0d0) -105)
+ (scale-float (float 8450781311989665 1.0d0) -159)
+ (scale-float (float 6062324972963764 1.0d0) -213)
+ (scale-float (float -5653993235595264 1.0d0) -267))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5483851556904833 1.0d0) -51)
+ (scale-float (float 5996905394696639 1.0d0) -105)
+ (scale-float (float 5196356464997887 1.0d0) -159)
+ (scale-float (float 5712707906316225 1.0d0) -213)
+ (scale-float (float 4830730584612864 1.0d0) -267))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5507881769234261 1.0d0) -51)
+ (scale-float (float -4715026875390648 1.0d0) -106)
+ (scale-float (float 5398898725927355 1.0d0) -160)
+ (scale-float (float -5070766412321352 1.0d0) -216)
+ (scale-float (float 7752820875853824 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5532092988525536 1.0d0) -51)
+ (scale-float (float -4859330332975918 1.0d0) -106)
+ (scale-float (float -4535998530621815 1.0d0) -160)
+ (scale-float (float -7628146934727197 1.0d0) -214)
+ (scale-float (float -7268228718526464 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5556487382894451 1.0d0) -51)
+ (scale-float (float 7398907756334830 1.0d0) -105)
+ (scale-float (float -7502586526034506 1.0d0) -159)
+ (scale-float (float -7861850574598044 1.0d0) -214)
+ (scale-float (float -6690007956193280 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5581067155125341 1.0d0) -51)
+ (scale-float (float 7691681711198996 1.0d0) -105)
+ (scale-float (float -7115388140873694 1.0d0) -161)
+ (scale-float (float -6173322695373787 1.0d0) -216)
+ (scale-float (float 8667376767008768 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5605834543367270 1.0d0) -51)
+ (scale-float (float -5650666465953453 1.0d0) -107)
+ (scale-float (float 6442418102644520 1.0d0) -162)
+ (scale-float (float 6220973504925671 1.0d0) -219)
+ (scale-float (float 7032008885665792 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5630791821847063 1.0d0) -51)
+ (scale-float (float 6495800535873934 1.0d0) -105)
+ (scale-float (float 7160337352712604 1.0d0) -160)
+ (scale-float (float -4913981280107361 1.0d0) -215)
+ (scale-float (float -4717585707106304 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5655941301599663 1.0d0) -51)
+ (scale-float (float 8865630141503023 1.0d0) -105)
+ (scale-float (float 7224643194944885 1.0d0) -160)
+ (scale-float (float -8464404145528280 1.0d0) -214)
+ (scale-float (float 5566125709950976 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5681285331216293 1.0d0) -51)
+ (scale-float (float 8667538878825471 1.0d0) -105)
+ (scale-float (float -5170118114604015 1.0d0) -159)
+ (scale-float (float -6912059689396079 1.0d0) -213)
+ (scale-float (float -6314400139616256 1.0d0) -267))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5706826297610946 1.0d0) -51)
+ (scale-float (float 5531964275807128 1.0d0) -105)
+ (scale-float (float -7551658916899182 1.0d0) -161)
+ (scale-float (float 6419683413669191 1.0d0) -215)
+ (scale-float (float -6650380303532032 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5732566626805721 1.0d0) -51)
+ (scale-float (float 4623367017186410 1.0d0) -107)
+ (scale-float (float 5669387184151161 1.0d0) -163)
+ (scale-float (float -7546306897435610 1.0d0) -218)
+ (scale-float (float -7361787774107648 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5758508784735550 1.0d0) -51)
+ (scale-float (float 7776333632546842 1.0d0) -107)
+ (scale-float (float -7468320812394801 1.0d0) -164)
+ (scale-float (float 6616495651735432 1.0d0) -218)
+ (scale-float (float -7799059100729344 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5784655278072878 1.0d0) -51)
+ (scale-float (float -8487524648621328 1.0d0) -108)
+ (scale-float (float -8746245465599726 1.0d0) -162)
+ (scale-float (float -5379186649194166 1.0d0) -221)
+ (scale-float (float 6650728865071104 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5811008655072871 1.0d0) -51)
+ (scale-float (float 6311463727248441 1.0d0) -105)
+ (scale-float (float 8779841134514476 1.0d0) -159)
+ (scale-float (float -7243825179367515 1.0d0) -213)
+ (scale-float (float -6481905193451520 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5837571506439760 1.0d0) -51)
+ (scale-float (float -6804171393563275 1.0d0) -105)
+ (scale-float (float 7045798592656872 1.0d0) -162)
+ (scale-float (float -6822079463935728 1.0d0) -219)
+ (scale-float (float -5813075772964864 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5864346466214924 1.0d0) -51)
+ (scale-float (float -5184981689329813 1.0d0) -105)
+ (scale-float (float -8422052236864799 1.0d0) -162)
+ (scale-float (float -5073156352586921 1.0d0) -216)
+ (scale-float (float 6764228161306624 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5891336212687374 1.0d0) -51)
+ (scale-float (float 5857775210754033 1.0d0) -108)
+ (scale-float (float 6653884317228603 1.0d0) -170)
+ (scale-float (float 8042430601619832 1.0d0) -225)
+ (scale-float (float -5599598642987008 1.0d0) -280))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5918543469327278 1.0d0) -51)
+ (scale-float (float 6720416503876543 1.0d0) -106)
+ (scale-float (float 7278392337773370 1.0d0) -161)
+ (scale-float (float -8580570494647867 1.0d0) -215)
+ (scale-float (float 4700821298085888 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5945971005743222 1.0d0) -51)
+ (scale-float (float 5747872957565350 1.0d0) -106)
+ (scale-float (float 7237512575569957 1.0d0) -160)
+ (scale-float (float 7519916400400684 1.0d0) -214)
+ (scale-float (float 7026029074186240 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5973621638663912 1.0d0) -51)
+ (scale-float (float 7603750326698922 1.0d0) -106)
+ (scale-float (float 6652072696777216 1.0d0) -163)
+ (scale-float (float 7989394499417516 1.0d0) -219)
+ (scale-float (float 8104150199959552 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6001498232945048 1.0d0) -51)
+ (scale-float (float 5596161946714234 1.0d0) -105)
+ (scale-float (float -5657098515459172 1.0d0) -159)
+ (scale-float (float 6818458972753785 1.0d0) -214)
+ (scale-float (float -5850059272421376 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6029603702602126 1.0d0) -51)
+ (scale-float (float -8661095485909429 1.0d0) -105)
+ (scale-float (float 7964107159598417 1.0d0) -160)
+ (scale-float (float 7268034324556626 1.0d0) -214)
+ (scale-float (float 8202707095896064 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6057941011869946 1.0d0) -51)
+ (scale-float (float -7814804856545473 1.0d0) -105)
+ (scale-float (float -8827798623861726 1.0d0) -160)
+ (scale-float (float 7429499671020655 1.0d0) -216)
+ (scale-float (float -6367692999884800 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6086513176289648 1.0d0) -51)
+ (scale-float (float 4578034378383201 1.0d0) -108)
+ (scale-float (float 6982181288388044 1.0d0) -164)
+ (scale-float (float -8494698295370626 1.0d0) -221)
+ (scale-float (float 5957737645080576 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6115323263824099 1.0d0) -51)
+ (scale-float (float -5629808809415017 1.0d0) -105)
+ (scale-float (float -5789479587879729 1.0d0) -159)
+ (scale-float (float 6539899976723531 1.0d0) -213)
+ (scale-float (float 5728472811929600 1.0d0) -267))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6144374396002502 1.0d0) -51)
+ (scale-float (float -6897434225732640 1.0d0) -106)
+ (scale-float (float 6336648630615878 1.0d0) -161)
+ (scale-float (float 5703276546834140 1.0d0) -215)
+ (scale-float (float -7928987398176768 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6173669749095134 1.0d0) -51)
+ (scale-float (float -5664846035779868 1.0d0) -105)
+ (scale-float (float 8724016140480060 1.0d0) -161)
+ (scale-float (float 6023810855636000 1.0d0) -215)
+ (scale-float (float -8972796615917568 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6203212555319126 1.0d0) -51)
+ (scale-float (float 6605071462957030 1.0d0) -106)
+ (scale-float (float -7037152943512478 1.0d0) -160)
+ (scale-float (float 8602728544719004 1.0d0) -214)
+ (scale-float (float -4829848980717568 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6233006104076262 1.0d0) -51)
+ (scale-float (float 5418068427722583 1.0d0) -107)
+ (scale-float (float -7512046825645834 1.0d0) -161)
+ (scale-float (float 7364970826292161 1.0d0) -217)
+ (scale-float (float 8518978910683136 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6263053743223778 1.0d0) -51)
+ (scale-float (float 5338290581447600 1.0d0) -107)
+ (scale-float (float -6774962939360783 1.0d0) -164)
+ (scale-float (float -5068052199625959 1.0d0) -218)
+ (scale-float (float 5680139766595584 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6293358880379207 1.0d0) -51)
+ (scale-float (float 7541088478502348 1.0d0) -108)
+ (scale-float (float -6928433475633757 1.0d0) -162)
+ (scale-float (float 6925116340197341 1.0d0) -220)
+ (scale-float (float -5618580581253120 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6323924984260328 1.0d0) -51)
+ (scale-float (float -7957025817072767 1.0d0) -108)
+ (scale-float (float 5238640849290498 1.0d0) -162)
+ (scale-float (float -7237193257262058 1.0d0) -217)
+ (scale-float (float 8963926809378816 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6354755586061330 1.0d0) -51)
+ (scale-float (float 6035977658673238 1.0d0) -105)
+ (scale-float (float 5909115808556134 1.0d0) -161)
+ (scale-float (float 5448585342718612 1.0d0) -216)
+ (scale-float (float -7638585966329856 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6385854280866341 1.0d0) -51)
+ (scale-float (float -7329837226546584 1.0d0) -106)
+ (scale-float (float -6237428625754562 1.0d0) -163)
+ (scale-float (float 4654869573460842 1.0d0) -217)
+ (scale-float (float 4724821654896640 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6417224729101500 1.0d0) -51)
+ (scale-float (float -8215297978981489 1.0d0) -106)
+ (scale-float (float -5072007063126597 1.0d0) -160)
+ (scale-float (float 6698464313634628 1.0d0) -215)
+ (scale-float (float -6190594246344704 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6448870658026821 1.0d0) -51)
+ (scale-float (float 7234551941005534 1.0d0) -106)
+ (scale-float (float 8326847540415379 1.0d0) -162)
+ (scale-float (float -8295425596065759 1.0d0) -216)
+ (scale-float (float 5520826882588672 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6480795863269112 1.0d0) -51)
+ (scale-float (float 5813548228359865 1.0d0) -105)
+ (scale-float (float 5956902973334625 1.0d0) -161)
+ (scale-float (float 8663020857685117 1.0d0) -217)
+ (scale-float (float 4505446199459840 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6513004210397278 1.0d0) -51)
+ (scale-float (float 6466923411169698 1.0d0) -106)
+ (scale-float (float -5267289208280170 1.0d0) -163)
+ (scale-float (float 4609478115949264 1.0d0) -217)
+ (scale-float (float 4739939846848512 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6545499636541384 1.0d0) -51)
+ (scale-float (float 7093153950789948 1.0d0) -105)
+ (scale-float (float 8073936291697341 1.0d0) -159)
+ (scale-float (float -5963469835091489 1.0d0) -213)
+ (scale-float (float -6208799993217024 1.0d0) -267))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6578286152056903 1.0d0) -51)
+ (scale-float (float -6247597367189225 1.0d0) -107)
+ (scale-float (float 5166374476986216 1.0d0) -163)
+ (scale-float (float -7446463954218782 1.0d0) -217)
+ (scale-float (float -8826492783951872 1.0d0) -278))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6611367842235619 1.0d0) -51)
+ (scale-float (float -5963923807595087 1.0d0) -105)
+ (scale-float (float -7361707976966807 1.0d0) -159)
+ (scale-float (float -8007427361941428 1.0d0) -213)
+ (scale-float (float -5322375616880640 1.0d0) -267))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6644748869064731 1.0d0) -51)
+ (scale-float (float -7144219676664510 1.0d0) -105)
+ (scale-float (float -7128087720892246 1.0d0) -159)
+ (scale-float (float 8414661721104555 1.0d0) -213)
+ (scale-float (float -7483960229576704 1.0d0) -267))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6678433473035738 1.0d0) -51)
+ (scale-float (float 7126836505406673 1.0d0) -105)
+ (scale-float (float -7383799656035430 1.0d0) -159)
+ (scale-float (float 7771064719831640 1.0d0) -213)
+ (scale-float (float 6834613159329792 1.0d0) -267))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6712425975004767 1.0d0) -51)
+ (scale-float (float -8313042875753344 1.0d0) -105)
+ (scale-float (float -6688704901746663 1.0d0) -159)
+ (scale-float (float 8301123678722637 1.0d0) -213)
+ (scale-float (float -7721636949917696 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6746730778106040 1.0d0) -51)
+ (scale-float (float 6304322779476888 1.0d0) -105)
+ (scale-float (float 7826894828906743 1.0d0) -160)
+ (scale-float (float 8530425707514419 1.0d0) -214)
+ (scale-float (float -6413262201864192 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6781352369720294 1.0d0) -51)
+ (scale-float (float 8983160734907249 1.0d0) -107)
+ (scale-float (float -8664733214681189 1.0d0) -162)
+ (scale-float (float -7960550074052480 1.0d0) -216)
+ (scale-float (float -5650496022380544 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6816295323499960 1.0d0) -51)
+ (scale-float (float 7658952711249613 1.0d0) -107)
+ (scale-float (float 4620256611705977 1.0d0) -161)
+ (scale-float (float 5339882517437881 1.0d0) -215)
+ (scale-float (float 6825061989482496 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6851564301453058 1.0d0) -51)
+ (scale-float (float 7273932892417493 1.0d0) -105)
+ (scale-float (float 7813099383492531 1.0d0) -160)
+ (scale-float (float -6761861727721979 1.0d0) -214)
+ (scale-float (float -5350302622810112 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6887164056087783 1.0d0) -51)
+ (scale-float (float -8193605673865315 1.0d0) -105)
+ (scale-float (float -8157229188379241 1.0d0) -159)
+ (scale-float (float -6981673042370715 1.0d0) -225)
+ (scale-float (float 6263709437526016 1.0d0) -282))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6923099432619853 1.0d0) -51)
+ (scale-float (float 7311538058821719 1.0d0) -106)
+ (scale-float (float 4900713516174706 1.0d0) -161)
+ (scale-float (float 8730943236205763 1.0d0) -216)
+ (scale-float (float 5571612107079680 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6959375371244794 1.0d0) -51)
+ (scale-float (float -7096258238654345 1.0d0) -107)
+ (scale-float (float -5770947297319723 1.0d0) -161)
+ (scale-float (float 8800175558598180 1.0d0) -221)
+ (scale-float (float -5336386655748096 1.0d0) -278))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6995996909477367 1.0d0) -51)
+ (scale-float (float 7135698892090420 1.0d0) -105)
+ (scale-float (float 5966326990220529 1.0d0) -163)
+ (scale-float (float 6252634847559452 1.0d0) -217)
+ (scale-float (float -5590957230653440 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7032969184560500 1.0d0) -51)
+ (scale-float (float 5293838285907909 1.0d0) -107)
+ (scale-float (float 8790224413870813 1.0d0) -161)
+ (scale-float (float 8088085434372655 1.0d0) -218)
+ (scale-float (float -6446348639928320 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7070297435946114 1.0d0) -51)
+ (scale-float (float 6411619724802408 1.0d0) -105)
+ (scale-float (float -4939979436820681 1.0d0) -159)
+ (scale-float (float 7212244304314212 1.0d0) -213)
+ (scale-float (float -7270907064745984 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7107987007850386 1.0d0) -51)
+ (scale-float (float -7986454439992759 1.0d0) -107)
+ (scale-float (float -7149323724943389 1.0d0) -165)
+ (scale-float (float 5017022337912441 1.0d0) -219)
+ (scale-float (float -8661650026528768 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7146043351886043 1.0d0) -51)
+ (scale-float (float 8494996469924568 1.0d0) -105)
+ (scale-float (float 8211382279563909 1.0d0) -159)
+ (scale-float (float -8621970676835046 1.0d0) -217)
+ (scale-float (float 5061263191179264 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7184472029774435 1.0d0) -51)
+ (scale-float (float 8261201322528939 1.0d0) -105)
+ (scale-float (float 8494826551139706 1.0d0) -159)
+ (scale-float (float -5252592996148024 1.0d0) -215)
+ (scale-float (float 4585238951624704 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7223278716140197 1.0d0) -51)
+ (scale-float (float -8823560495097450 1.0d0) -110)
+ (scale-float (float 7033690483373051 1.0d0) -165)
+ (scale-float (float 4597906315467119 1.0d0) -219)
+ (scale-float (float -8669887290408960 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7262469201391468 1.0d0) -51)
+ (scale-float (float 4650384302815730 1.0d0) -108)
+ (scale-float (float 5605504769622637 1.0d0) -164)
+ (scale-float (float -8189277670227551 1.0d0) -218)
+ (scale-float (float -7025344805601280 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7302049394688733 1.0d0) -51)
+ (scale-float (float 7279713193953038 1.0d0) -105)
+ (scale-float (float -7208763068417898 1.0d0) -161)
+ (scale-float (float -4768695581327986 1.0d0) -216)
+ (scale-float (float 5237711203991552 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7342025327005482 1.0d0) -51)
+ (scale-float (float 5357997003469114 1.0d0) -105)
+ (scale-float (float 8695503966818441 1.0d0) -159)
+ (scale-float (float -7471504103356836 1.0d0) -214)
+ (scale-float (float 6788700404973568 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7382403154284018 1.0d0) -51)
+ (scale-float (float -4962274709422180 1.0d0) -105)
+ (scale-float (float 6670621399198282 1.0d0) -161)
+ (scale-float (float 5070027530331753 1.0d0) -217)
+ (scale-float (float 8690824917024768 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7423189160689885 1.0d0) -51)
+ (scale-float (float -7734054192845246 1.0d0) -106)
+ (scale-float (float -6816372342739885 1.0d0) -160)
+ (scale-float (float 6535733956045124 1.0d0) -214)
+ (scale-float (float 4509157468127232 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7464389761968532 1.0d0) -51)
+ (scale-float (float 6893014061925633 1.0d0) -107)
+ (scale-float (float -4977734513509468 1.0d0) -161)
+ (scale-float (float -6025926871313080 1.0d0) -216)
+ (scale-float (float -6946865583226880 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7506011508907973 1.0d0) -51)
+ (scale-float (float -5168444478203074 1.0d0) -106)
+ (scale-float (float 6136656779657905 1.0d0) -162)
+ (scale-float (float -6767814868545424 1.0d0) -218)
+ (scale-float (float -5126616077041664 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7548061090911371 1.0d0) -51)
+ (scale-float (float 8602300988368704 1.0d0) -105)
+ (scale-float (float 6621940108869347 1.0d0) -159)
+ (scale-float (float -8287253242683244 1.0d0) -213)
+ (scale-float (float -7136389171322880 1.0d0) -267))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7590545339683649 1.0d0) -51)
+ (scale-float (float -4916189126172257 1.0d0) -105)
+ (scale-float (float -6355932773319006 1.0d0) -159)
+ (scale-float (float -7098041782917320 1.0d0) -215)
+ (scale-float (float -6767458156216320 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7633471233036373 1.0d0) -51)
+ (scale-float (float 8721089986462790 1.0d0) -105)
+ (scale-float (float -8552815325940330 1.0d0) -162)
+ (scale-float (float 4876931181892126 1.0d0) -217)
+ (scale-float (float 7797539261382656 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7676845898815393 1.0d0) -51)
+ (scale-float (float -4742638373772551 1.0d0) -105)
+ (scale-float (float 7916583400175240 1.0d0) -159)
+ (scale-float (float 8460862899289455 1.0d0) -213)
+ (scale-float (float 5308269820141568 1.0d0) -267))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7720676618955844 1.0d0) -51)
+ (scale-float (float -5979798443394226 1.0d0) -109)
+ (scale-float (float 6850854280922486 1.0d0) -164)
+ (scale-float (float 5976401171513954 1.0d0) -220)
+ (scale-float (float -6835992994512896 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7764970833669396 1.0d0) -51)
+ (scale-float (float 5543007123611566 1.0d0) -107)
+ (scale-float (float -5911100238100129 1.0d0) -163)
+ (scale-float (float -6020602519605240 1.0d0) -218)
+ (scale-float (float 8861062094651392 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7809736145768777 1.0d0) -51)
+ (scale-float (float -8674035310357218 1.0d0) -105)
+ (scale-float (float 5148421548762854 1.0d0) -162)
+ (scale-float (float -5680543539602354 1.0d0) -216)
+ (scale-float (float -5047891664568320 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7854980325134865 1.0d0) -51)
+ (scale-float (float 5454493626848983 1.0d0) -105)
+ (scale-float (float -5934139456574024 1.0d0) -160)
+ (scale-float (float -6886896215496900 1.0d0) -216)
+ (scale-float (float 8171164072935424 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7900711313331869 1.0d0) -51)
+ (scale-float (float 6225563646010790 1.0d0) -107)
+ (scale-float (float 5318576075952789 1.0d0) -161)
+ (scale-float (float 8951089425954890 1.0d0) -216)
+ (scale-float (float -7900121062703104 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7946937228376334 1.0d0) -51)
+ (scale-float (float 4860551429143179 1.0d0) -105)
+ (scale-float (float -6679183222842464 1.0d0) -159)
+ (scale-float (float 8986203990266944 1.0d0) -213)
+ (scale-float (float -7800362304159744 1.0d0) -267))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7993666369666015 1.0d0) -51)
+ (scale-float (float 5060857131832143 1.0d0) -107)
+ (scale-float (float 5977334033607903 1.0d0) -163)
+ (scale-float (float -7012630978595163 1.0d0) -217)
+ (scale-float (float -8051553535000576 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8040907223074883 1.0d0) -51)
+ (scale-float (float 7840365419538151 1.0d0) -110)
+ (scale-float (float 5803342974358266 1.0d0) -167)
+ (scale-float (float 5514076964040409 1.0d0) -223)
+ (scale-float (float -8234034912034816 1.0d0) -278))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8088668466220848 1.0d0) -51)
+ (scale-float (float 7402466421814509 1.0d0) -105)
+ (scale-float (float 7796836038387986 1.0d0) -160)
+ (scale-float (float -8349623045440600 1.0d0) -216)
+ (scale-float (float 7996981865086976 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8136958973913063 1.0d0) -51)
+ (scale-float (float 6613989967363466 1.0d0) -108)
+ (scale-float (float 4672363052762850 1.0d0) -162)
+ (scale-float (float 5321008906127303 1.0d0) -216)
+ (scale-float (float -6662496561135616 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8185787823785987 1.0d0) -51)
+ (scale-float (float 5815321815605723 1.0d0) -105)
+ (scale-float (float 5052728278216073 1.0d0) -159)
+ (scale-float (float 6743977587935015 1.0d0) -215)
+ (scale-float (float 6233590479749120 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8235164302127735 1.0d0) -51)
+ (scale-float (float 6987608580827249 1.0d0) -105)
+ (scale-float (float -5030607182998876 1.0d0) -159)
+ (scale-float (float -6524005548070875 1.0d0) -213)
+ (scale-float (float -6102268045000704 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8285097909910559 1.0d0) -51)
+ (scale-float (float 6590135828404160 1.0d0) -106)
+ (scale-float (float 6742766983522102 1.0d0) -161)
+ (scale-float (float 8188011768648261 1.0d0) -215)
+ (scale-float (float -8228188902981632 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8335598369031698 1.0d0) -51)
+ (scale-float (float 4662302940215681 1.0d0) -109)
+ (scale-float (float -7415916869142093 1.0d0) -163)
+ (scale-float (float 7158239008047361 1.0d0) -219)
+ (scale-float (float -4888138247831552 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8386675628773205 1.0d0) -51)
+ (scale-float (float 7564119385564749 1.0d0) -107)
+ (scale-float (float 8015230080300989 1.0d0) -161)
+ (scale-float (float 5998257482665129 1.0d0) -215)
+ (scale-float (float 7929347722969088 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8438339872489768 1.0d0) -51)
+ (scale-float (float -7603073825222678 1.0d0) -106)
+ (scale-float (float 6808761766149567 1.0d0) -160)
+ (scale-float (float 8149354660853537 1.0d0) -214)
+ (scale-float (float 7625273014435840 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8490601524533965 1.0d0) -51)
+ (scale-float (float -8689470578362239 1.0d0) -108)
+ (scale-float (float -6187768527572901 1.0d0) -165)
+ (scale-float (float -7008250757235598 1.0d0) -219)
+ (scale-float (float -7684954594476032 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8543471257428855 1.0d0) -51)
+ (scale-float (float -7813605099909875 1.0d0) -106)
+ (scale-float (float -6796497038942889 1.0d0) -160)
+ (scale-float (float -5539743128678295 1.0d0) -216)
+ (scale-float (float -6736160705675264 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8596959999298260 1.0d0) -51)
+ (scale-float (float 5021611987741080 1.0d0) -105)
+ (scale-float (float 8770067323245082 1.0d0) -159)
+ (scale-float (float -6967837632154810 1.0d0) -213)
+ (scale-float (float 5315713377173504 1.0d0) -267))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8651078941565619 1.0d0) -51)
+ (scale-float (float -6477829563185041 1.0d0) -106)
+ (scale-float (float -7920204658193574 1.0d0) -161)
+ (scale-float (float 6147178406352208 1.0d0) -215)
+ (scale-float (float 6351786322886656 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8705839546932790 1.0d0) -51)
+ (scale-float (float -7529630816817007 1.0d0) -107)
+ (scale-float (float 5735561243294849 1.0d0) -162)
+ (scale-float (float 8942864457589964 1.0d0) -218)
+ (scale-float (float -7502983972257792 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8761253557650770 1.0d0) -51)
+ (scale-float (float 4780698761224885 1.0d0) -106)
+ (scale-float (float -5470212898494580 1.0d0) -160)
+ (scale-float (float -4827378085896671 1.0d0) -214)
+ (scale-float (float 7022379013521408 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8817333004094852 1.0d0) -51)
+ (scale-float (float -6645730691547394 1.0d0) -105)
+ (scale-float (float 5209284030250115 1.0d0) -159)
+ (scale-float (float -8939693872217468 1.0d0) -213)
+ (scale-float (float 6883043139567616 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8874090213657379 1.0d0) -51)
+ (scale-float (float -8367030626203290 1.0d0) -105)
+ (scale-float (float 6388696937998469 1.0d0) -159)
+ (scale-float (float -8406146726255517 1.0d0) -214)
+ (scale-float (float 6399905418280960 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8931537819971910 1.0d0) -51)
+ (scale-float (float 8524875977603628 1.0d0) -105)
+ (scale-float (float -5848434731404509 1.0d0) -159)
+ (scale-float (float -5667130485761682 1.0d0) -214)
+ (scale-float (float 7217108479901696 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8989688772483292 1.0d0) -51)
+ (scale-float (float -6931103927484219 1.0d0) -107)
+ (scale-float (float 5204888733770148 1.0d0) -164)
+ (scale-float (float 6152375870965018 1.0d0) -218)
+ (scale-float (float -4689379163111424 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4524278173189428 1.0d0) -50)
+ (scale-float (float -7857932784079837 1.0d0) -108)
+ (scale-float (float -5220155662344333 1.0d0) -162)
+ (scale-float (float -8705893866989820 1.0d0) -216)
+ (scale-float (float -7330523124596736 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4554077076448381 1.0d0) -50)
+ (scale-float (float 5512839027679925 1.0d0) -105)
+ (scale-float (float -7796765614716848 1.0d0) -164)
+ (scale-float (float 8566408185532710 1.0d0) -218)
+ (scale-float (float -4847576310349824 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4584248075014142 1.0d0) -50)
+ (scale-float (float 7778065609684159 1.0d0) -106)
+ (scale-float (float -8267409846106549 1.0d0) -160)
+ (scale-float (float 4825445499532236 1.0d0) -214)
+ (scale-float (float -5874337337835520 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4614798326815861 1.0d0) -50)
+ (scale-float (float -7886745239856818 1.0d0) -105)
+ (scale-float (float 6139448757204664 1.0d0) -159)
+ (scale-float (float 4905901705808241 1.0d0) -214)
+ (scale-float (float -6473661257318400 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4645735174488265 1.0d0) -50)
+ (scale-float (float -7391766335195762 1.0d0) -106)
+ (scale-float (float -6949685806131419 1.0d0) -161)
+ (scale-float (float -5091796544777519 1.0d0) -215)
+ (scale-float (float -4733728074891264 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4677066151368610 1.0d0) -50)
+ (scale-float (float -4787054302984548 1.0d0) -106)
+ (scale-float (float 7329507444535018 1.0d0) -161)
+ (scale-float (float 8058361876170577 1.0d0) -218)
+ (scale-float (float -7270852575887360 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4708798987728803 1.0d0) -50)
+ (scale-float (float 8750319080912930 1.0d0) -104)
+ (scale-float (float 4772777117450483 1.0d0) -159)
+ (scale-float (float -7709029592768861 1.0d0) -214)
+ (scale-float (float -7500734252023808 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4740941617253534 1.0d0) -50)
+ (scale-float (float 7836652996916187 1.0d0) -104)
+ (scale-float (float 7029551319114224 1.0d0) -158)
+ (scale-float (float 7474721444715091 1.0d0) -212)
+ (scale-float (float 4571996889481216 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4773502183775811 1.0d0) -50)
+ (scale-float (float 7666250788945536 1.0d0) -106)
+ (scale-float (float -4973721619222805 1.0d0) -160)
+ (scale-float (float -6547947312642659 1.0d0) -214)
+ (scale-float (float 7501570719612928 1.0d0) -277))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4806489048281921 1.0d0) -50)
+ (scale-float (float -5716680014470084 1.0d0) -105)
+ (scale-float (float -8783805053184800 1.0d0) -159)
+ (scale-float (float -8831983638861787 1.0d0) -217)
+ (scale-float (float 6957023344197632 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4839910796198468 1.0d0) -50)
+ (scale-float (float 6594642138244419 1.0d0) -104)
+ (scale-float (float 5288964033025966 1.0d0) -158)
+ (scale-float (float 8634063999222374 1.0d0) -213)
+ (scale-float (float -8893718092922880 1.0d0) -267))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4873776244974835 1.0d0) -50)
+ (scale-float (float -8639979433695208 1.0d0) -104)
+ (scale-float (float 4828621720356606 1.0d0) -158)
+ (scale-float (float -5877036457540954 1.0d0) -216)
+ (scale-float (float -8180534148333568 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4908094451975123 1.0d0) -50)
+ (scale-float (float -4828304883868757 1.0d0) -108)
+ (scale-float (float -6270316524648948 1.0d0) -162)
+ (scale-float (float 5225900337775959 1.0d0) -218)
+ (scale-float (float -8854315413274624 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4942874722694433 1.0d0) -50)
+ (scale-float (float 8311431571623252 1.0d0) -104)
+ (scale-float (float -5850013926105659 1.0d0) -160)
+ (scale-float (float 5033857637343171 1.0d0) -217)
+ (scale-float (float -5846683619426304 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4978126619315118 1.0d0) -50)
+ (scale-float (float 8651259418657351 1.0d0) -104)
+ (scale-float (float 8356913624992857 1.0d0) -159)
+ (scale-float (float -8997010089735028 1.0d0) -214)
+ (scale-float (float -8852131818700800 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5013859969619551 1.0d0) -50)
+ (scale-float (float -8698474462696510 1.0d0) -105)
+ (scale-float (float -5523882703258717 1.0d0) -159)
+ (scale-float (float 6821949825607191 1.0d0) -213)
+ (scale-float (float 4868488751235072 1.0d0) -267))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5050084876276853 1.0d0) -50)
+ (scale-float (float -4800311499441744 1.0d0) -104)
+ (scale-float (float 6845021933519717 1.0d0) -159)
+ (scale-float (float -5685142016707295 1.0d0) -213)
+ (scale-float (float -8727124494548992 1.0d0) -267))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5086811726522023 1.0d0) -50)
+ (scale-float (float -5345881373634279 1.0d0) -109)
+ (scale-float (float -6685493706246338 1.0d0) -169)
+ (scale-float (float -5501064813076920 1.0d0) -223)
+ (scale-float (float 4551987802669056 1.0d0) -280))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5124051202246940 1.0d0) -50)
+ (scale-float (float 5343290894274956 1.0d0) -104)
+ (scale-float (float 4609766441216761 1.0d0) -158)
+ (scale-float (float -5255239983854309 1.0d0) -212)
+ (scale-float (float 6168102361399296 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5161814290523839 1.0d0) -50)
+ (scale-float (float 8189635444913318 1.0d0) -106)
+ (scale-float (float 8577718390294588 1.0d0) -160)
+ (scale-float (float -7603337344007599 1.0d0) -216)
+ (scale-float (float -7685941649997824 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5200112294583036 1.0d0) -50)
+ (scale-float (float -4721808481078608 1.0d0) -104)
+ (scale-float (float -5816123228221285 1.0d0) -162)
+ (scale-float (float 8620514424462029 1.0d0) -217)
+ (scale-float (float 7757670207193088 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5238956845267947 1.0d0) -50)
+ (scale-float (float -8744191081096657 1.0d0) -105)
+ (scale-float (float -6127764073690772 1.0d0) -160)
+ (scale-float (float 8200948064908668 1.0d0) -215)
+ (scale-float (float -4881870132609024 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5278359912991787 1.0d0) -50)
+ (scale-float (float 8687334381320225 1.0d0) -108)
+ (scale-float (float -6068684457660176 1.0d0) -162)
+ (scale-float (float -6207766203371522 1.0d0) -217)
+ (scale-float (float 8485621868265472 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5318333820221769 1.0d0) -50)
+ (scale-float (float -5523609802630350 1.0d0) -106)
+ (scale-float (float -8560352922485173 1.0d0) -162)
+ (scale-float (float 5920709932808206 1.0d0) -217)
+ (scale-float (float -8637451779702784 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5358891254518155 1.0d0) -50)
+ (scale-float (float -4890941832729782 1.0d0) -104)
+ (scale-float (float 8524554922066444 1.0d0) -158)
+ (scale-float (float 5619661652289697 1.0d0) -212)
+ (scale-float (float 6579991304568832 1.0d0) -267))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5400045282157147 1.0d0) -50)
+ (scale-float (float 8864323672088947 1.0d0) -106)
+ (scale-float (float -8445021323397316 1.0d0) -160)
+ (scale-float (float 8492097350381435 1.0d0) -215)
+ (scale-float (float 6155854513045504 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5441809362368346 1.0d0) -50)
+ (scale-float (float -5842943949056910 1.0d0) -110)
+ (scale-float (float 5009571930499495 1.0d0) -164)
+ (scale-float (float -7519500500875788 1.0d0) -218)
+ (scale-float (float -5085596283830272 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5484197362219362 1.0d0) -50)
+ (scale-float (float 4899532164520227 1.0d0) -104)
+ (scale-float (float 6603314574193900 1.0d0) -158)
+ (scale-float (float -4552978725019522 1.0d0) -212)
+ (scale-float (float -8641795423010816 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5527223572182170 1.0d0) -50)
+ (scale-float (float -6055838300213851 1.0d0) -104)
+ (scale-float (float -6362698856028721 1.0d0) -160)
+ (scale-float (float -8109194223806676 1.0d0) -215)
+ (scale-float (float -7886760551383040 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5570902722417903 1.0d0) -50)
+ (scale-float (float 5084679226584164 1.0d0) -104)
+ (scale-float (float 7089728589645293 1.0d0) -158)
+ (scale-float (float -5190801840792408 1.0d0) -216)
+ (scale-float (float -5339212592709632 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5615249999819091 1.0d0) -50)
+ (scale-float (float -6686020099209120 1.0d0) -104)
+ (scale-float (float -7196983245802506 1.0d0) -158)
+ (scale-float (float 8552126782874617 1.0d0) -213)
+ (scale-float (float -5338697915203584 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5660281065850737 1.0d0) -50)
+ (scale-float (float 4792801230552846 1.0d0) -107)
+ (scale-float (float 7943899304054448 1.0d0) -161)
+ (scale-float (float 6000933608322297 1.0d0) -217)
+ (scale-float (float -7416525918044160 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5706012075234297 1.0d0) -50)
+ (scale-float (float -7952366272028203 1.0d0) -106)
+ (scale-float (float 8808581243530676 1.0d0) -161)
+ (scale-float (float 5876141118921453 1.0d0) -215)
+ (scale-float (float -7669317861769216 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5752459695521358 1.0d0) -50)
+ (scale-float (float -5755781022198304 1.0d0) -104)
+ (scale-float (float 6235408287345925 1.0d0) -158)
+ (scale-float (float 8125829755427516 1.0d0) -212)
+ (scale-float (float 7651930072711168 1.0d0) -267))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5799641127606861 1.0d0) -50)
+ (scale-float (float -5331669837522491 1.0d0) -104)
+ (scale-float (float 8828359409000453 1.0d0) -159)
+ (scale-float (float -7330718632146391 1.0d0) -213)
+ (scale-float (float 4894007987437568 1.0d0) -267))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5847574127234897 1.0d0) -50)
+ (scale-float (float -4765276063086402 1.0d0) -105)
+ (scale-float (float 7588657903329273 1.0d0) -159)
+ (scale-float (float -5458415408401000 1.0d0) -216)
+ (scale-float (float 4637968444555264 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5896277027553566 1.0d0) -50)
+ (scale-float (float -7925399423902561 1.0d0) -104)
+ (scale-float (float -8205732894593822 1.0d0) -159)
+ (scale-float (float 6439815312103899 1.0d0) -213)
+ (scale-float (float -8312359159857152 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5945768762779089 1.0d0) -50)
+ (scale-float (float -4604541852401179 1.0d0) -104)
+ (scale-float (float -8127518754929395 1.0d0) -158)
+ (scale-float (float 6989430539955643 1.0d0) -213)
+ (scale-float (float 5123010860154880 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5996068893033352 1.0d0) -50)
+ (scale-float (float 4707612555350960 1.0d0) -106)
+ (scale-float (float 7425587011449122 1.0d0) -160)
+ (scale-float (float 5352922239701652 1.0d0) -214)
+ (scale-float (float 6950289070620672 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6047197630423323 1.0d0) -50)
+ (scale-float (float -8923246722605432 1.0d0) -106)
+ (scale-float (float -6168958763822143 1.0d0) -161)
+ (scale-float (float -4619840048743219 1.0d0) -216)
+ (scale-float (float 5481386463854592 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6099175866435397 1.0d0) -50)
+ (scale-float (float -8221018383842792 1.0d0) -105)
+ (scale-float (float 6231283718599270 1.0d0) -162)
+ (scale-float (float 8248289034415291 1.0d0) -217)
+ (scale-float (float 4583417639600128 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6152025200722677 1.0d0) -50)
+ (scale-float (float -5024973585206614 1.0d0) -105)
+ (scale-float (float 4919147755933202 1.0d0) -164)
+ (scale-float (float -5009014416736221 1.0d0) -218)
+ (scale-float (float 6163397020745728 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6205767971368524 1.0d0) -50)
+ (scale-float (float -6652234810155037 1.0d0) -104)
+ (scale-float (float 4924533252939154 1.0d0) -158)
+ (scale-float (float 6993553090393191 1.0d0) -212)
+ (scale-float (float 7498201661579264 1.0d0) -266))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6260427286715461 1.0d0) -50)
+ (scale-float (float -5261794858909198 1.0d0) -104)
+ (scale-float (float 8088564039653977 1.0d0) -158)
+ (scale-float (float 5860056599597916 1.0d0) -214)
+ (scale-float (float 8300108917899264 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6316027058854719 1.0d0) -50)
+ (scale-float (float 4912305611875474 1.0d0) -107)
+ (scale-float (float 8247457332486304 1.0d0) -161)
+ (scale-float (float 7179067211439716 1.0d0) -215)
+ (scale-float (float 8680078238613504 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6372592038878388 1.0d0) -50)
+ (scale-float (float 8934256162385481 1.0d0) -104)
+ (scale-float (float -8150754196643953 1.0d0) -158)
+ (scale-float (float -6395337638343832 1.0d0) -214)
+ (scale-float (float 8819950786838528 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6430147854003365 1.0d0) -50)
+ (scale-float (float 5339761977269331 1.0d0) -106)
+ (scale-float (float 8307957748230247 1.0d0) -161)
+ (scale-float (float -7731042475045646 1.0d0) -216)
+ (scale-float (float -7285563473133568 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6488721046684081 1.0d0) -50)
+ (scale-float (float -4800641097989748 1.0d0) -104)
+ (scale-float (float -7689871963688738 1.0d0) -159)
+ (scale-float (float 7248983184352869 1.0d0) -213)
+ (scale-float (float -4648751244509184 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6548339115839435 1.0d0) -50)
+ (scale-float (float -7678179087946984 1.0d0) -105)
+ (scale-float (float 7447364613352970 1.0d0) -159)
+ (scale-float (float -7077479988484817 1.0d0) -213)
+ (scale-float (float 8079517972267008 1.0d0) -267))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6609030560328467 1.0d0) -50)
+ (scale-float (float -6307303545390465 1.0d0) -105)
+ (scale-float (float -4741362620342740 1.0d0) -160)
+ (scale-float (float -8962967231728929 1.0d0) -216)
+ (scale-float (float 6287728779460608 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6670824924819186 1.0d0) -50)
+ (scale-float (float -6857094799294079 1.0d0) -105)
+ (scale-float (float -6283805258449109 1.0d0) -160)
+ (scale-float (float -4579983583681872 1.0d0) -220)
+ (scale-float (float 7609977640321024 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6733752848205667 1.0d0) -50)
+ (scale-float (float 5487320384991960 1.0d0) -104)
+ (scale-float (float -5968471068963710 1.0d0) -158)
+ (scale-float (float -4642200669305259 1.0d0) -213)
+ (scale-float (float -5801923254386688 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6797846114740128 1.0d0) -50)
+ (scale-float (float -7965896037018844 1.0d0) -108)
+ (scale-float (float 6838643187043039 1.0d0) -169)
+ (scale-float (float -8719148014921162 1.0d0) -223)
+ (scale-float (float -5719747131867136 1.0d0) -278))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6863137708059268 1.0d0) -50)
+ (scale-float (float 5254691613734420 1.0d0) -104)
+ (scale-float (float 4814953101967566 1.0d0) -159)
+ (scale-float (float -5055906382036925 1.0d0) -213)
+ (scale-float (float -5354935406133248 1.0d0) -267))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6929661868297835 1.0d0) -50)
+ (scale-float (float -5249416198130502 1.0d0) -104)
+ (scale-float (float 7530283165629458 1.0d0) -160)
+ (scale-float (float -7043970844927767 1.0d0) -214)
+ (scale-float (float 7099149547405312 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6997454152497195 1.0d0) -50)
+ (scale-float (float -5852054827841794 1.0d0) -105)
+ (scale-float (float -5958966439822559 1.0d0) -159)
+ (scale-float (float 8342575618968944 1.0d0) -215)
+ (scale-float (float -5673665823768576 1.0d0) -278))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7066551498532859 1.0d0) -50)
+ (scale-float (float -6504596222793428 1.0d0) -104)
+ (scale-float (float -6352301105293032 1.0d0) -158)
+ (scale-float (float -6835671604903275 1.0d0) -214)
+ (scale-float (float 6344252063907840 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7136992292802442 1.0d0) -50)
+ (scale-float (float -4870302911349459 1.0d0) -105)
+ (scale-float (float -6461504691059873 1.0d0) -160)
+ (scale-float (float -7615712784955118 1.0d0) -215)
+ (scale-float (float 4854685916069888 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7208816441934696 1.0d0) -50)
+ (scale-float (float 8755298938682695 1.0d0) -104)
+ (scale-float (float -4896101517312375 1.0d0) -158)
+ (scale-float (float 8256456025958531 1.0d0) -212)
+ (scale-float (float 8825528422293504 1.0d0) -266))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7282065448801083 1.0d0) -50)
+ (scale-float (float -7637297660145052 1.0d0) -105)
+ (scale-float (float 8294171045418444 1.0d0) -160)
+ (scale-float (float -4805088089848024 1.0d0) -217)
+ (scale-float (float -8684191584354304 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7356782493134103 1.0d0) -50)
+ (scale-float (float 4595001399306702 1.0d0) -104)
+ (scale-float (float 5664962187334257 1.0d0) -158)
+ (scale-float (float 7155643428856045 1.0d0) -212)
+ (scale-float (float 6332163332702208 1.0d0) -267))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7433012517081453 1.0d0) -50)
+ (scale-float (float -6207052766373585 1.0d0) -104)
+ (scale-float (float -5726040873116938 1.0d0) -158)
+ (scale-float (float -5744932538006929 1.0d0) -213)
+ (scale-float (float -7124278212657152 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7510802316052177 1.0d0) -50)
+ (scale-float (float 4504599034960326 1.0d0) -104)
+ (scale-float (float 6214828861631402 1.0d0) -159)
+ (scale-float (float 4705990701910521 1.0d0) -213)
+ (scale-float (float -5000866475016192 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7590200635240719 1.0d0) -50)
+ (scale-float (float -7568587671493133 1.0d0) -105)
+ (scale-float (float 6241425333405656 1.0d0) -164)
+ (scale-float (float -7651285879370675 1.0d0) -218)
+ (scale-float (float -4635717366972416 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7671258272247214 1.0d0) -50)
+ (scale-float (float -8623978487160342 1.0d0) -105)
+ (scale-float (float 8349476327862151 1.0d0) -161)
+ (scale-float (float 7494318504549410 1.0d0) -216)
+ (scale-float (float -7181102652850176 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7754028186248024 1.0d0) -50)
+ (scale-float (float 5921107024594400 1.0d0) -104)
+ (scale-float (float -5621732277816876 1.0d0) -158)
+ (scale-float (float -5779119339137049 1.0d0) -213)
+ (scale-float (float -8722031943647232 1.0d0) -267))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7838565614209529 1.0d0) -50)
+ (scale-float (float 6578428132991252 1.0d0) -105)
+ (scale-float (float 8003597548422836 1.0d0) -159)
+ (scale-float (float 6363377530585056 1.0d0) -213)
+ (scale-float (float -7805092724293632 1.0d0) -267))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7924928194681074 1.0d0) -50)
+ (scale-float (float 8614003572664764 1.0d0) -104)
+ (scale-float (float 5598145495971156 1.0d0) -158)
+ (scale-float (float -8037027712831091 1.0d0) -213)
+ (scale-float (float 8787734523445248 1.0d0) -267))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8013176099750097 1.0d0) -50)
+ (scale-float (float 7354797866751837 1.0d0) -105)
+ (scale-float (float -5803387611186421 1.0d0) -159)
+ (scale-float (float 4781754483793883 1.0d0) -215)
+ (scale-float (float 5214983144931328 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8103372175794257 1.0d0) -50)
+ (scale-float (float -7194188268812371 1.0d0) -104)
+ (scale-float (float -4844467840881682 1.0d0) -158)
+ (scale-float (float 7778970615641888 1.0d0) -215)
+ (scale-float (float 8051647654330368 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8195582093722473 1.0d0) -50)
+ (scale-float (float 5080708612307624 1.0d0) -105)
+ (scale-float (float 6499432302200239 1.0d0) -160)
+ (scale-float (float 6368980990068618 1.0d0) -215)
+ (scale-float (float -5084896891764736 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8289874509459675 1.0d0) -50)
+ (scale-float (float -8250952382522686 1.0d0) -104)
+ (scale-float (float -8455685004262270 1.0d0) -161)
+ (scale-float (float -8265729016802429 1.0d0) -217)
+ (scale-float (float 7915945365864448 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8386321235499455 1.0d0) -50)
+ (scale-float (float 8303732635517882 1.0d0) -106)
+ (scale-float (float -7620138409168773 1.0d0) -162)
+ (scale-float (float -7343834892629589 1.0d0) -216)
+ (scale-float (float -8589164570214400 1.0d0) -274))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8484997424425525 1.0d0) -50)
+ (scale-float (float 4611668826314095 1.0d0) -105)
+ (scale-float (float -5909091437288483 1.0d0) -159)
+ (scale-float (float 6642726400911220 1.0d0) -213)
+ (scale-float (float 5366889213165568 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8585981765387615 1.0d0) -50)
+ (scale-float (float 8364211109868830 1.0d0) -105)
+ (scale-float (float 8104420497043001 1.0d0) -160)
+ (scale-float (float 6997637222700747 1.0d0) -214)
+ (scale-float (float -8468906328555520 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8689356694611374 1.0d0) -50)
+ (scale-float (float -8308032601175505 1.0d0) -106)
+ (scale-float (float -8092082710083755 1.0d0) -161)
+ (scale-float (float -6638969541410807 1.0d0) -215)
+ (scale-float (float -7372315960279040 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8795208621125848 1.0d0) -50)
+ (scale-float (float -8466372619290203 1.0d0) -104)
+ (scale-float (float 5941370226429769 1.0d0) -158)
+ (scale-float (float -4811373108529117 1.0d0) -212)
+ (scale-float (float -6673186804056064 1.0d0) -266))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8903628169007605 1.0d0) -50)
+ (scale-float (float 8776836797087053 1.0d0) -104)
+ (scale-float (float 7999848126381412 1.0d0) -159)
+ (scale-float (float -8775543322363202 1.0d0) -214)
+ (scale-float (float 7724496350347264 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4507355218784437 1.0d0) -49)
+ (scale-float (float -7205798416896588 1.0d0) -106)
+ (scale-float (float -7015587535281554 1.0d0) -161)
+ (scale-float (float -7356449236273485 1.0d0) -215)
+ (scale-float (float 7786774315270144 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4564277640529890 1.0d0) -49)
+ (scale-float (float -8244376128276527 1.0d0) -104)
+ (scale-float (float 7920645601437474 1.0d0) -160)
+ (scale-float (float -7464953264467531 1.0d0) -214)
+ (scale-float (float -6832176693903360 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4622633804806901 1.0d0) -49)
+ (scale-float (float -6426498859852973 1.0d0) -105)
+ (scale-float (float 6286414974293041 1.0d0) -159)
+ (scale-float (float 6055628403240541 1.0d0) -213)
+ (scale-float (float 5193970548211712 1.0d0) -275))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4682478856671437 1.0d0) -49)
+ (scale-float (float 6673630797752163 1.0d0) -103)
+ (scale-float (float -7884194045319478 1.0d0) -158)
+ (scale-float (float 5894329904575727 1.0d0) -216)
+ (scale-float (float 6485690748764160 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4743870805843326 1.0d0) -49)
+ (scale-float (float 8164246650167072 1.0d0) -104)
+ (scale-float (float -5216463620110085 1.0d0) -158)
+ (scale-float (float -4961813917373847 1.0d0) -214)
+ (scale-float (float -7663652377133056 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4806870715170990 1.0d0) -49)
+ (scale-float (float -7522320940190383 1.0d0) -105)
+ (scale-float (float 8994946860597597 1.0d0) -159)
+ (scale-float (float 8017382725273567 1.0d0) -213)
+ (scale-float (float -5238324859502592 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4871542904173360 1.0d0) -49)
+ (scale-float (float 8555826975728450 1.0d0) -105)
+ (scale-float (float 6059688777454006 1.0d0) -160)
+ (scale-float (float -6249704986778178 1.0d0) -214)
+ (scale-float (float 6380739929047040 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4937955169085190 1.0d0) -49)
+ (scale-float (float 4972862905629400 1.0d0) -103)
+ (scale-float (float 6025982028507577 1.0d0) -157)
+ (scale-float (float -6270890530919483 1.0d0) -213)
+ (scale-float (float -8025612088246272 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5006179020988284 1.0d0) -49)
+ (scale-float (float -5814341173818329 1.0d0) -103)
+ (scale-float (float -4805012562340711 1.0d0) -160)
+ (scale-float (float 4720273162440715 1.0d0) -214)
+ (scale-float (float 4517988474552320 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5076289943786991 1.0d0) -49)
+ (scale-float (float -8224579237253861 1.0d0) -104)
+ (scale-float (float 6305502084383431 1.0d0) -158)
+ (scale-float (float 5148877315266984 1.0d0) -212)
+ (scale-float (float -7805967186395136 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5148367673984452 1.0d0) -49)
+ (scale-float (float 8925664162300119 1.0d0) -103)
+ (scale-float (float 7264969663176127 1.0d0) -158)
+ (scale-float (float -6814829290056163 1.0d0) -212)
+ (scale-float (float 6404490112434176 1.0d0) -267))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5222496504439664 1.0d0) -49)
+ (scale-float (float 6636279319110934 1.0d0) -103)
+ (scale-float (float 8699395247056727 1.0d0) -159)
+ (scale-float (float 8984111330560230 1.0d0) -215)
+ (scale-float (float 6446719866109952 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5298765614538198 1.0d0) -49)
+ (scale-float (float 8286210000040794 1.0d0) -104)
+ (scale-float (float 5354822512015696 1.0d0) -159)
+ (scale-float (float 7908316457176409 1.0d0) -216)
+ (scale-float (float -7004773900353536 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5377269429495635 1.0d0) -49)
+ (scale-float (float -7101328778309126 1.0d0) -103)
+ (scale-float (float 7499054499721386 1.0d0) -158)
+ (scale-float (float -7731092944852372 1.0d0) -212)
+ (scale-float (float -7895595260903424 1.0d0) -266))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5458108011837422 1.0d0) -49)
+ (scale-float (float -4675179495701427 1.0d0) -103)
+ (scale-float (float 8932883464021247 1.0d0) -158)
+ (scale-float (float 8616809540048386 1.0d0) -212)
+ (scale-float (float -8763016816476160 1.0d0) -266))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5541387488467813 1.0d0) -49)
+ (scale-float (float -7007445549784159 1.0d0) -103)
+ (scale-float (float -7072923874504712 1.0d0) -157)
+ (scale-float (float -5329906372904150 1.0d0) -211)
+ (scale-float (float -7853024514547712 1.0d0) -265))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5627220517160550 1.0d0) -49)
+ (scale-float (float -5176176853952796 1.0d0) -104)
+ (scale-float (float -7020248087158517 1.0d0) -158)
+ (scale-float (float 4859429353206122 1.0d0) -212)
+ (scale-float (float -6599028030570496 1.0d0) -267))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5715726796783052 1.0d0) -49)
+ (scale-float (float 5438025236037917 1.0d0) -103)
+ (scale-float (float -8692020137574919 1.0d0) -158)
+ (scale-float (float 7989842226064959 1.0d0) -214)
+ (scale-float (float 6400116832010240 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5807033626113381 1.0d0) -49)
+ (scale-float (float 4911820440045489 1.0d0) -106)
+ (scale-float (float 8802946619837513 1.0d0) -160)
+ (scale-float (float 6801061177340681 1.0d0) -214)
+ (scale-float (float -7270329594413056 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5901276516736267 1.0d0) -49)
+ (scale-float (float -7436249549661228 1.0d0) -103)
+ (scale-float (float 4676936347870920 1.0d0) -157)
+ (scale-float (float -5785755935908217 1.0d0) -215)
+ (scale-float (float -7226502156386304 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5998599866223991 1.0d0) -49)
+ (scale-float (float 5059727762454945 1.0d0) -104)
+ (scale-float (float 6414029253445363 1.0d0) -158)
+ (scale-float (float 8656609927134767 1.0d0) -212)
+ (scale-float (float 7132792128372736 1.0d0) -266))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6099157698635359 1.0d0) -49)
+ (scale-float (float -6838644432646690 1.0d0) -104)
+ (scale-float (float -6541362498174330 1.0d0) -158)
+ (scale-float (float -7637259258515656 1.0d0) -213)
+ (scale-float (float 7175769889177600 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6203114480319646 1.0d0) -49)
+ (scale-float (float -5568657277656399 1.0d0) -104)
+ (scale-float (float 7542733007574790 1.0d0) -158)
+ (scale-float (float -7012723917336706 1.0d0) -213)
+ (scale-float (float 8497344615022592 1.0d0) -267))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6310646020114063 1.0d0) -49)
+ (scale-float (float -7800325722416645 1.0d0) -104)
+ (scale-float (float -5388478017272763 1.0d0) -159)
+ (scale-float (float -7950046440912224 1.0d0) -213)
+ (scale-float (float 5990792093270016 1.0d0) -267))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6421940464298844 1.0d0) -49)
+ (scale-float (float 5063771858376485 1.0d0) -105)
+ (scale-float (float -6783131086082439 1.0d0) -161)
+ (scale-float (float 8427999506330064 1.0d0) -215)
+ (scale-float (float 7364898304294912 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6537199398154669 1.0d0) -49)
+ (scale-float (float -7599373380810108 1.0d0) -103)
+ (scale-float (float -7243786415111521 1.0d0) -158)
+ (scale-float (float -8933575180508159 1.0d0) -212)
+ (scale-float (float 5913876585807872 1.0d0) -266))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6656639067689980 1.0d0) -49)
+ (scale-float (float 7360013642515307 1.0d0) -103)
+ (scale-float (float -7855450244520173 1.0d0) -158)
+ (scale-float (float 5412875609833951 1.0d0) -213)
+ (scale-float (float 7666401682882560 1.0d0) -267))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6780491737115790 1.0d0) -49)
+ (scale-float (float -6378411869235755 1.0d0) -103)
+ (scale-float (float 8783987385350485 1.0d0) -157)
+ (scale-float (float -8245657774080235 1.0d0) -212)
+ (scale-float (float -6550005802663936 1.0d0) -267))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6909007199996866 1.0d0) -49)
+ (scale-float (float -8837774218144292 1.0d0) -103)
+ (scale-float (float 8717423028508527 1.0d0) -158)
+ (scale-float (float 7752033631097315 1.0d0) -212)
+ (scale-float (float 7051715353378816 1.0d0) -266))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7042454464766529 1.0d0) -49)
+ (scale-float (float -7717918564726027 1.0d0) -103)
+ (scale-float (float 5904053301730163 1.0d0) -159)
+ (scale-float (float 5636691058427787 1.0d0) -214)
+ (scale-float (float 8254886482542592 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7181123638537301 1.0d0) -49)
+ (scale-float (float -4692424184352077 1.0d0) -103)
+ (scale-float (float -8255099239413905 1.0d0) -162)
+ (scale-float (float -7983025562852820 1.0d0) -217)
+ (scale-float (float 7125811068928000 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7325328036968833 1.0d0) -49)
+ (scale-float (float 6145600063130994 1.0d0) -105)
+ (scale-float (float 6699370727529123 1.0d0) -162)
+ (scale-float (float -8530909862138954 1.0d0) -222)
+ (scale-float (float 8658983422263296 1.0d0) -276))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7475406552487008 1.0d0) -49)
+ (scale-float (float 6508292523268850 1.0d0) -103)
+ (scale-float (float 8651403870904095 1.0d0) -158)
+ (scale-float (float 5031220044677692 1.0d0) -214)
+ (scale-float (float -7668986664976384 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7631726318530431 1.0d0) -49)
+ (scale-float (float 6331338246710264 1.0d0) -104)
+ (scale-float (float -5545085332746426 1.0d0) -158)
+ (scale-float (float -6955294281445236 1.0d0) -213)
+ (scale-float (float 8570242681602048 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7794685713913491 1.0d0) -49)
+ (scale-float (float 8085602522047296 1.0d0) -104)
+ (scale-float (float 7011985758625205 1.0d0) -158)
+ (scale-float (float -7615486664199397 1.0d0) -213)
+ (scale-float (float -6045266584272896 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7964717759062869 1.0d0) -49)
+ (scale-float (float 7057597303030161 1.0d0) -103)
+ (scale-float (float 4763291241478853 1.0d0) -159)
+ (scale-float (float -5048491471916004 1.0d0) -213)
+ (scale-float (float 6403137709015040 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8142293965085578 1.0d0) -49)
+ (scale-float (float -5968860496746126 1.0d0) -104)
+ (scale-float (float 7717615794333638 1.0d0) -161)
+ (scale-float (float 7737247246080083 1.0d0) -215)
+ (scale-float (float -6027429370920960 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8327928707709914 1.0d0) -49)
+ (scale-float (float 8161425915706692 1.0d0) -103)
+ (scale-float (float -4626625264391650 1.0d0) -157)
+ (scale-float (float 6719828360360851 1.0d0) -212)
+ (scale-float (float -4653783298686976 1.0d0) -266))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8522184211543760 1.0d0) -49)
+ (scale-float (float -5794793515298676 1.0d0) -103)
+ (scale-float (float 7494740244157845 1.0d0) -158)
+ (scale-float (float -6395745845282527 1.0d0) -214)
+ (scale-float (float 5127560460435456 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8725676246369773 1.0d0) -49)
+ (scale-float (float -6847558691679281 1.0d0) -103)
+ (scale-float (float -4639526880247401 1.0d0) -157)
+ (scale-float (float -8040102235321215 1.0d0) -211)
+ (scale-float (float 4778856041168896 1.0d0) -266))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8939080657044762 1.0d0) -49)
+ (scale-float (float 5984605661790546 1.0d0) -105)
+ (scale-float (float -4689910945695088 1.0d0) -159)
+ (scale-float (float 7942218162489357 1.0d0) -213)
+ (scale-float (float 6084108253921280 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4581570436441982 1.0d0) -48)
+ (scale-float (float -8529302667360591 1.0d0) -102)
+ (scale-float (float -5134708848598001 1.0d0) -156)
+ (scale-float (float -7297795657395979 1.0d0) -210)
+ (scale-float (float -8892655261065216 1.0d0) -264))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4699338286167601 1.0d0) -48)
+ (scale-float (float -5760570017839759 1.0d0) -103)
+ (scale-float (float -7964579737947934 1.0d0) -160)
+ (scale-float (float 7117709242024680 1.0d0) -215)
+ (scale-float (float 5559094723739648 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4823296857879754 1.0d0) -48)
+ (scale-float (float -7437815545545033 1.0d0) -102)
+ (scale-float (float -8956837905913622 1.0d0) -156)
+ (scale-float (float -5515347369523367 1.0d0) -212)
+ (scale-float (float 8814054480281600 1.0d0) -267))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4953948102574560 1.0d0) -48)
+ (scale-float (float 6563411715021955 1.0d0) -107)
+ (scale-float (float -4881755754841332 1.0d0) -161)
+ (scale-float (float -7038759865446038 1.0d0) -216)
+ (scale-float (float 7255865652412416 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5091849743565917 1.0d0) -48)
+ (scale-float (float 6384455094568543 1.0d0) -102)
+ (scale-float (float 5702890449723630 1.0d0) -157)
+ (scale-float (float -7589384686425635 1.0d0) -218)
+ (scale-float (float 8058940122202112 1.0d0) -273))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5237623243959472 1.0d0) -48)
+ (scale-float (float -6250630418786862 1.0d0) -104)
+ (scale-float (float -7184429040914303 1.0d0) -159)
+ (scale-float (float 5513312508283453 1.0d0) -215)
+ (scale-float (float 4749731872374784 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5391963180151410 1.0d0) -48)
+ (scale-float (float -7407081297448137 1.0d0) -102)
+ (scale-float (float 5185826904122421 1.0d0) -156)
+ (scale-float (float 7823667441420830 1.0d0) -210)
+ (scale-float (float 8936157189111808 1.0d0) -266))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5555648319599754 1.0d0) -48)
+ (scale-float (float -5491336161082583 1.0d0) -102)
+ (scale-float (float -6554264313276709 1.0d0) -156)
+ (scale-float (float -7585496654613802 1.0d0) -210)
+ (scale-float (float 4713805106823168 1.0d0) -265))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5729554775677781 1.0d0) -48)
+ (scale-float (float -7721231518321956 1.0d0) -108)
+ (scale-float (float 6182950135224119 1.0d0) -163)
+ (scale-float (float -5805908032198122 1.0d0) -217)
+ (scale-float (float 6138479531524096 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5914671708628099 1.0d0) -48)
+ (scale-float (float -8127496465237598 1.0d0) -103)
+ (scale-float (float 5113636924531285 1.0d0) -158)
+ (scale-float (float 7610245412227071 1.0d0) -212)
+ (scale-float (float 5419049157689344 1.0d0) -266))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6112120166707537 1.0d0) -48)
+ (scale-float (float 8554650084246937 1.0d0) -103)
+ (scale-float (float 6240992177685638 1.0d0) -161)
+ (scale-float (float 7196179540449182 1.0d0) -216)
+ (scale-float (float 6262113232224256 1.0d0) -272))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6323175825499951 1.0d0) -48)
+ (scale-float (float -8865111156616584 1.0d0) -102)
+ (scale-float (float 7085615420986638 1.0d0) -156)
+ (scale-float (float 7235233759408942 1.0d0) -211)
+ (scale-float (float -8649169230872576 1.0d0) -265))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6549296599938903 1.0d0) -48)
+ (scale-float (float 8257698953810403 1.0d0) -102)
+ (scale-float (float 8532553234643244 1.0d0) -157)
+ (scale-float (float -8270427433372553 1.0d0) -211)
+ (scale-float (float -8578788487872512 1.0d0) -265))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6792156392335400 1.0d0) -48)
+ (scale-float (float -6544379776982520 1.0d0) -104)
+ (scale-float (float 4901112354909220 1.0d0) -158)
+ (scale-float (float 6767333192271592 1.0d0) -216)
+ (scale-float (float -8842907181645824 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7053686628412010 1.0d0) -48)
+ (scale-float (float -8951188254702623 1.0d0) -102)
+ (scale-float (float 8621287380014728 1.0d0) -158)
+ (scale-float (float -7857861379957792 1.0d0) -213)
+ (scale-float (float 4826892277383168 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7336127761985185 1.0d0) -48)
+ (scale-float (float -8336340561589675 1.0d0) -104)
+ (scale-float (float -6723533502954940 1.0d0) -159)
+ (scale-float (float 7818179045611807 1.0d0) -214)
+ (scale-float (float -7201952627294208 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7642093655818158 1.0d0) -48)
+ (scale-float (float 5443555368163400 1.0d0) -106)
+ (scale-float (float -7387394316037603 1.0d0) -162)
+ (scale-float (float 5304483945651657 1.0d0) -217)
+ (scale-float (float -4963064904417280 1.0d0) -271))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7974652757478940 1.0d0) -48)
+ (scale-float (float -4601485407011345 1.0d0) -102)
+ (scale-float (float -7916486289406152 1.0d0) -157)
+ (scale-float (float -7279545329272873 1.0d0) -211)
+ (scale-float (float 5134317856817152 1.0d0) -265))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8337431414068683 1.0d0) -48)
+ (scale-float (float -5987902372410459 1.0d0) -102)
+ (scale-float (float -5307411281694402 1.0d0) -158)
+ (scale-float (float -5679062825222479 1.0d0) -212)
+ (scale-float (float 8245649354752000 1.0d0) -266))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8734746705443862 1.0d0) -48)
+ (scale-float (float -5185035314729970 1.0d0) -103)
+ (scale-float (float 5370141748632671 1.0d0) -158)
+ (scale-float (float 8551587498597857 1.0d0) -213)
+ (scale-float (float 5905522198839296 1.0d0) -270))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4585889563702555 1.0d0) -47)
+ (scale-float (float -7954556241258531 1.0d0) -102)
+ (scale-float (float -5413256311151729 1.0d0) -156)
+ (scale-float (float 6878574492056157 1.0d0) -210)
+ (scale-float (float 4794200525701120 1.0d0) -264))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4827399903209683 1.0d0) -47)
+ (scale-float (float -6275711490776414 1.0d0) -105)
+ (scale-float (float 8099918832814676 1.0d0) -160)
+ (scale-float (float -6152065565819033 1.0d0) -214)
+ (scale-float (float -6790464220692480 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5095736726291373 1.0d0) -47)
+ (scale-float (float 5702351686147640 1.0d0) -101)
+ (scale-float (float -8356071616588207 1.0d0) -155)
+ (scale-float (float 5407157322154023 1.0d0) -209)
+ (scale-float (float -5896165128568832 1.0d0) -264))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5395634118579270 1.0d0) -47)
+ (scale-float (float -8650595618423630 1.0d0) -102)
+ (scale-float (float -4637715105009220 1.0d0) -158)
+ (scale-float (float 6802436320551583 1.0d0) -213)
+ (scale-float (float 5674304881557504 1.0d0) -269))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5733009687095975 1.0d0) -47)
+ (scale-float (float 8484139752530675 1.0d0) -102)
+ (scale-float (float 5983330237824667 1.0d0) -156)
+ (scale-float (float 8366235526218494 1.0d0) -210)
+ (scale-float (float 5629484799655936 1.0d0) -264))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6115359067385373 1.0d0) -47)
+ (scale-float (float 7428268948615224 1.0d0) -101)
+ (scale-float (float 8097548842549957 1.0d0) -156)
+ (scale-float (float -7655306445395194 1.0d0) -210)
+ (scale-float (float -6488780694913024 1.0d0) -265))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6552319505127374 1.0d0) -47)
+ (scale-float (float -8178523606996029 1.0d0) -105)
+ (scale-float (float -8699896243399604 1.0d0) -159)
+ (scale-float (float -7740332332082545 1.0d0) -214)
+ (scale-float (float 6016821677785088 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7056493552344079 1.0d0) -47)
+ (scale-float (float -6660391185023610 1.0d0) -101)
+ (scale-float (float 8326117901300204 1.0d0) -156)
+ (scale-float (float -5180116769562087 1.0d0) -211)
+ (scale-float (float 6732836385259520 1.0d0) -265))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7644684611709030 1.0d0) -47)
+ (scale-float (float 7144281558445897 1.0d0) -105)
+ (scale-float (float 5769916130091718 1.0d0) -159)
+ (scale-float (float 6892393124855441 1.0d0) -213)
+ (scale-float (float 8609597045211136 1.0d0) -267))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 8339806414116051 1.0d0) -47)
+ (scale-float (float -4878300504338807 1.0d0) -101)
+ (scale-float (float 5390699203123886 1.0d0) -156)
+ (scale-float (float -7941956443494165 1.0d0) -210)
+ (scale-float (float 8699025989009408 1.0d0) -265))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4586969091394693 1.0d0) -46)
+ (scale-float (float -8978492069766178 1.0d0) -101)
+ (scale-float (float 7053055367607091 1.0d0) -155)
+ (scale-float (float -8712227340191945 1.0d0) -210)
+ (scale-float (float -7846634958946304 1.0d0) -265))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5096708286733636 1.0d0) -46)
+ (scale-float (float -4572705006895138 1.0d0) -100)
+ (scale-float (float 4718547123658870 1.0d0) -154)
+ (scale-float (float 7157224158707570 1.0d0) -210)
+ (scale-float (float -8590740628766720 1.0d0) -265))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5733873284861593 1.0d0) -46)
+ (scale-float (float -8604953363186775 1.0d0) -103)
+ (scale-float (float 8626935765066666 1.0d0) -158)
+ (scale-float (float -4858320692337793 1.0d0) -212)
+ (scale-float (float -7449309035233280 1.0d0) -266))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 6553075144281224 1.0d0) -46)
+ (scale-float (float 6620952143443553 1.0d0) -101)
+ (scale-float (float -5268353655146108 1.0d0) -156)
+ (scale-float (float 5893295495507489 1.0d0) -211)
+ (scale-float (float -4800425745186816 1.0d0) -266))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7645332295807713 1.0d0) -46)
+ (scale-float (float -5080909471366464 1.0d0) -102)
+ (scale-float (float 7938109188081450 1.0d0) -156)
+ (scale-float (float 4928452855514440 1.0d0) -210)
+ (scale-float (float 8885897390456832 1.0d0) -268))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 4587238957440646 1.0d0) -45)
+ (scale-float (float -7194218336984116 1.0d0) -99)
+ (scale-float (float -8985364386653513 1.0d0) -153)
+ (scale-float (float -8164942491672346 1.0d0) -207)
+ (scale-float (float 6286694831915008 1.0d0) -262))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5734089176174276 1.0d0) -45)
+ (scale-float (float -7647633804412292 1.0d0) -101)
+ (scale-float (float -7089963492055907 1.0d0) -155)
+ (scale-float (float 8957378262525840 1.0d0) -210)
+ (scale-float (float 8460149900050432 1.0d0) -265))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7645494213403192 1.0d0) -45)
+ (scale-float (float 4683660413726437 1.0d0) -99)
+ (scale-float (float -7150841523991633 1.0d0) -153)
+ (scale-float (float -4654257076122560 1.0d0) -207)
+ (scale-float (float 5269682304483328 1.0d0) -261))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5734143148494430 1.0d0) -44)
+ (scale-float (float 8353770598111665 1.0d0) -99)
+ (scale-float (float -8962023885528779 1.0d0) -158)
+ (scale-float (float -5933825828214605 1.0d0) -212)
+ (scale-float (float 5439908491034624 1.0d0) -266))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 5734156641542718 1.0d0) -43)
+ (scale-float (float 8633141086175409 1.0d0) -98)
+ (scale-float (float 5419442444201815 1.0d0) -153)
+ (scale-float (float -8712131584355876 1.0d0) -211)
+ (scale-float (float -5157997961543680 1.0d0) -266))
+ (%make-qd-d q0 q1 q2 q3))
+ (multiple-value-bind (q0 q1 q2 q3)
+ (renorm-5 (scale-float (float 7091480910882704 1.0d0) 204)
+ (scale-float (float 8415670760171201 1.0d0) 148)
+ (scale-float (float -8191062761010691 1.0d0) 94)
+ (scale-float (float 8061527243862424 1.0d0) 39)
+ (scale-float (float -8684710553714688 1.0d0) -17))
+ (%make-qd-d q0 q1 q2 q3)))))
#||
Some sample test code to convert long-float data from clisp to
@@ -3848,4 +18205,30 @@ something that we can use to initialize our tables.
(dotimes (k 256)
(push (convert-to-qd-parts (cos (* pi (/ (1+ k) 1024)))) val))
`(make-array 256 :initial-contents (list ,@(nreverse val))))
+
+;; Create atan table
+(let (val)
+ (dotimes (k +qd-atan-partition-size+)
+ (push (convert-to-qd-parts (tan (* pi (/ (+ 3 (* 2 k))
+ (* 4 +qd-atan-partition-size+)))))
+ val))
+ (write `(defconstant +qd-atan-partition+
+ (make-array +qd-atan-partition-size+
+ :initial-contents (list ,@(nreverse val))))
+ :case :downcase
+ :pretty t)
+ (values))
+
+(let (val)
+ (dotimes (k +qd-atan-partition-size+)
+ (push (convert-to-qd-parts (tan (* pi (/ (+ 2 (* 2 k))
+ (* 4 +qd-atan-partition-size+)))))
+ val))
+ (write `(defconstant +qd-atan-nodes+
+ (make-array +qd-atan-partition-size+
+ :initial-contents (list ,@(nreverse val))))
+ :case :downcase
+ :pretty t)
+ (values))
+
||#
diff --git a/qd-fun.lisp b/qd-fun.lisp
index b3ae7b6..e782a8a 100644
--- a/qd-fun.lisp
+++ b/qd-fun.lisp
@@ -1102,6 +1102,102 @@ is the cosine of A"
#+nil (optimize (speed 3) (space 0)))
(atan2-qd/newton y +qd-one+))
+;; Computation of atan using a table and taylor series.
+
+(defun find-atan-partition-linear (x)
+ ;; Simple linear search. Search through the qd-atan-partition table
+ ;; to find the entry k such that x > X[k]. Return k.
+ (loop for k from 0 below octi::+qd-atan-partition-size+
+ ;; do (format t "k = ~D, atan = ~S~%" k (aref octi::+qd-atan-partition+ k))
+ when (qd-< x (aref octi::+qd-atan-partition+ k))
+ return k))
+
+(defun find-atan-partition (x)
+ ;; Perform binary search through the atan partition table to find
+ ;; the smallest entry greater than x. Return the index of the
+ ;; entry.
+ (let* ((low 0)
+ (high (1- octi::+qd-atan-partition-size+))
+ (mid (ash (+ low high) -1)))
+ ;; high starts one less than the end because the end actually has junk.
+ ;; FIXME: Remove that junk last element.
+ (loop
+ (if (qd-< x (aref octi::+qd-atan-partition+ mid))
+ (setf high mid)
+ (setf low mid))
+ (setf mid (ash (+ low high) -1))
+ ;;(format t "low, mid, high = ~A ~A ~A~%" low mid high)
+ (when (<= (- high low) 1)
+ (return)))
+ ;;(format t "mid = ~A~%" mid)
+ ;;(format t "X[mid] = ~A~%" (aref octi::+qd-atan-partition+ mid))
+ (if (qd-< x (aref octi::+qd-atan-partition+ mid))
+ mid
+ (1+ mid))))
+
+
+(defun atan-taylor (a)
+ ;; Taylor series for atan(x).
+ ;;
+ ;; atan(x) = sum((-1)^k*x^(2*k+1)/(2*k+1), k, 0, inf)
+ ;; = x - x^3/3 + x^5/5 - x^7/7 + x^9/9 - ...
+ ;; = x*(1 - x^2/3 + x^4/5 - x^6/7 + x^8/9 - ...)
+ ;;
+ ;; x should be small for this to be effective, but no check is made
+ ;; for this. The series on converges for |x| < 1.
+ (let* ((x2 (neg-qd (sqr-qd a)))
+ (term x2)
+ (s (make-qd-d 1d0))
+ (m 3))
+ (loop
+ (setf s (add-qd s (div-qd-d term (float m 1d0))))
+ (setf term (mul-qd term x2))
+ (setf m (+ m 2))
+ (when (<= (abs (qd-0 term)) +qd-eps+)
+ ;;(format t "terms = ~A~%" m)
+ (return)))
+ (mul-qd s a)))
+
+(defun atan-qd/taylor (y)
+ ;; To compute atan(x) for x in [0,inf], we partition the interval
+ ;; [0,inf] such that partition points X[i] and the evaluation nodes
+ ;; x[i] are defined by
+ ;;
+ ;; x[i] = tan((2*i-2)*pi/(4*s)), i = 2, ..., s + 1
+ ;; X[i] = tan((2*i-1)*pi/(4*s)), i = 1, ..., s
+ ;;
+ ;; where 0 = X[0] < X[1] < x[2] < X[2] < ... < x[s] < X[s] < x[s+1]
+ ;; = X[s+1] = inf.
+ ;;
+ ;; So if x is in the interval [X[i-1], X[i]}, the computation of
+ ;; atan(x) is given by
+ ;;
+ ;; atan(x) = atan(x[i]) + atan(e)
+ ;;
+ ;; where e = 1/x[i] - (1+1/x[i]^2)/(x+1/x[i])
+ ;;
+ ;; But since x[i] = tan((2*i-1)*pi/(4*s)), atan(x[i]) =
+ ;; (2*i-1)*pi/(4*s), so
+ ;;
+ ;; atan(x) = (2*i-1)*pi/(4*s) + atan(e)
+ ;;
+ ;; Note that qd-atan-partition array starts with X[2].
+ (if (minusp-qd y)
+ (neg-qd (atan-qd/taylor (neg-qd y)))
+ (let* ((i (find-atan-partition y))
+ (atan-xi (mul-qd +qd-pi/2+
+ (rational-to-qd (/ (1- (+ i 2))
+ octi::+qd-atan-partition-size+))))
+ (1/xi (div-qd +qd-one+ (aref octi::+qd-atan-nodes+ i)))
+ (e1 (div-qd (add-qd-d (sqr-qd 1/xi) 1d0)
+ (add-qd 1/xi y)))
+ (e (sub-qd 1/xi
+ e1)))
+ ;;(format t "partition ~D~%" i)
+ ;;(format t "atan(xi) = ~S~%" atan-xi)
+ ;;(format t "e = ~S~%" e)
+ (add-qd atan-xi (atan-taylor e)))))
+
(defun atan2-qd (y x)
"atan2(y, x) = atan(y/x), but carefully handling the quadrant"
(declare (type %quad-double y x))
diff --git a/timing.lisp b/timing.lisp
index 582671b..1847c4c 100644
--- a/timing.lisp
+++ b/timing.lisp
@@ -174,3 +174,60 @@
(format t "Sqrt QD-REAL (method) ~d times~%" n)
#+cmu (ext:gc :full t)
(time (sqrt-qd-real))))
+
+(defun time-atan (&optional (n 10000))
+ (declare (fixnum n))
+ (flet ((time-atan/newton ()
+ (let ((sum (octi::make-qd-d 0.01d0)))
+ (declare (type octi::%quad-double sum)
+ (optimize (speed 3)))
+ (dotimes (k n)
+ (declare (fixnum k))
+ (setf sum (octi::atan-qd/newton sum)))
+ sum))
+ (time-atan/taylor ()
+ (let ((sum (octi::make-qd-d 0.01d0)))
+ (declare (type octi::%quad-double sum)
+ (optimize (speed 3)))
+ (dotimes (k n)
+ (declare (fixnum k))
+ (setf sum (octi::atan-qd/taylor sum)))
+ sum)))
+ (format t "atan-qd/newton ~d times~%" n)
+ #+cmu (ext:gc :full t)
+ (format t "sum = ~A~%" (time (time-atan/newton)))
+ (format t "atan-qd/taylor ~d times~%" n)
+ #+cmu (ext:gc :full t)
+ (format t "sum = ~A~%" (time (time-atan/taylor)))))
+
+;; Some timing results on an iMac, 3.06 GHz Core i3:
+
+; atan-qd/newton 10000 times
+
+; Evaluation took:
+; 6.15 seconds of real time
+; 6.116626 seconds of user run time
+; 0.021624 seconds of system run time
+; 18,805,071,897 CPU cycles
+; [Run times include 0.24 seconds GC run time]
+; 0 page faults and
+; 893,037,112 bytes consed.
+;
+; sum = #C(0.0077459785628163552318041722744135w0 5.8166227464838760117515984152653w-36)
+;
+; atan-qd/taylor 10000 times
+
+; Evaluation took:
+; 0.29 seconds of real time
+; 0.28987 seconds of user run time
+; 0.001629 seconds of system run time
+; 892,698,785 CPU cycles
+; [Run times include 0.02 seconds GC run time]
+; 0 page faults and
+; 79,108,384 bytes consed.
+;
+; sum = #C(0.0077459785628163552318041722744135w0 5.81662274648387601175165266362535w-36)
+
+;; We see that the taylor series is 21 times faster (!) and conses 11
+;; times less. That's a pretty nice gain, at the expense of two
+;; 1024-element tables.
-----------------------------------------------------------------------
Summary of changes:
qd-const.lisp | 7223 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++
qd-fun.lisp | 158 +-
rt-tests.lisp | 3 +
timing.lisp | 111 +
4 files changed, 7493 insertions(+), 2 deletions(-)
hooks/post-receive
--
OCT: A portable Lisp implementation for quad-double precision floats
1
0
[oct-git]OCT: A portable Lisp implementation for quad-double precision floats branch master updated. b1d9be467f5f44383a356a4a11a04a64f0f29402
by rtoy＠common-lisp.net 08 Apr '15
by rtoy＠common-lisp.net 08 Apr '15
08 Apr '15
This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "OCT: A portable Lisp implementation for quad-double precision floats".
The branch, master has been updated
via b1d9be467f5f44383a356a4a11a04a64f0f29402 (commit)
from bcb0aded33f57a2ea901fdcc43fdfd88e8dff17b (commit)
Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we list those
revisions in full, below.
- Log -----------------------------------------------------------------
commit b1d9be467f5f44383a356a4a11a04a64f0f29402
Author: Raymond Toy <toy.raymond(a)gmail.com>
Date: Wed Nov 27 09:09:50 2013 -0800
Add implementation for tan(x) using duplication.
Includes Lentz' algorithm for evaluating continued fractions and
updates the timing test to include tan(x) using duplication. Tests
show this is much slower than existing algorithms.
diff --git a/qd-extra.lisp b/qd-extra.lisp
index 61ce7e4..3670be5 100644
--- a/qd-extra.lisp
+++ b/qd-extra.lisp
@@ -993,6 +993,66 @@
y (add-qd (mul-qd y ct) (mul-qd x st)))
(div-qd y x))))
+(defvar *debug-cf-eval* nil)
+(defvar *max-cf-iterations* 10000)
+
+(defun lentz-qd (bf af)
+ (let ((tiny-value-count 0))
+ (flet ((value-or-tiny (v)
+ (cond ((zerop-qd v)
+ (incf tiny-value-count)
+ (make-qd-d (sqrt least-positive-normalized-double-float)))
+ (t
+ v))))
+ (let* ((f (value-or-tiny (funcall bf 0)))
+ (c f)
+ (d (make-qd-d 0d0))
+ (eps +qd-eps+))
+ (loop
+ for j from 1 upto *max-cf-iterations*
+ for an = (funcall af j)
+ for bn = (funcall bf j)
+ do (progn
+ (setf d (value-or-tiny (add-qd bn (mul-qd an d))))
+ (setf c (value-or-tiny (add-qd bn (div-qd an c))))
+ (when *debug-cf-eval*
+ (format t "~&j = ~d~%" j)
+ (format t " an = ~s~%" an)
+ (format t " bn = ~s~%" bn)
+ (format t " c = ~s~%" c)
+ (format t " d = ~s~%" d))
+ (let ((delta (div-qd c d)))
+ (setf d (div-qd +qd-one+ d))
+ (setf f (mul-qd f delta))
+ (when *debug-cf-eval*
+ (format t " dl= ~S (|dl - 1| = ~S)~%" delta (abs (1- delta)))
+ (format t " f = ~S~%" f))
+ (when (qd-<= (abs-qd (sub-qd-d delta 1d0)) eps)
+ (return-from lentz-qd (values f j tiny-value-count)))))
+ finally
+ (error 'simple-error
+ :format-control "~<Continued fraction failed to converge after ~D iterations.~% Delta = ~S~>"
+ :format-arguments (list *max-cf-iterations* (/ c d))))))))
+
+(defun tan-qd/duplication (x)
+ ;; tan(x) = 2*tan(x/2)/(1-tan(x/2)^2)
+ (cond ((< (abs (qd-0 x)) 1d-4)
+ ;; Continued fraction for tan(x)
+ ;;
+ ;; x
+ ;; tan(x) = -----------------------------
+ ;; 1 - K(2*k+1, -z^2, k, 0, inf)
+ (let ((x2 (neg-qd (sqr-qd x))))
+ (div-qd x
+ (lentz-qd #'(lambda (n)
+ (octi::make-qd-d (float (+ (* 2 n) 1) 1d0)))
+ #'(lambda (n)
+ (declare (ignore n))
+ x2)))))
+ (t
+ (let* ((tanx/2 (tan-qd/duplication (scale-float-qd x -1))))
+ (/ (mul-qd-d tanx/2 2d0)
+ (sub-d-qd 1d0 (sqr-qd tanx/2)))))))
(defun sin-qd/cordic (r)
(declare (type %quad-double r))
@@ -1374,17 +1434,22 @@
(format t "atan2-qd/newton~%")
(time (dotimes (k n)
(declare (fixnum k))
- (setf y (atan2-qd/newton x one))))
+ (setf y (octi::atan2-qd/newton x one))))
#+cmu (ext:gc :full t)
(format t "atan2-qd/cordic~%")
(time (dotimes (k n)
(declare (fixnum k))
- (setf y (atan2-qd/cordic x one))))
+ (setf y (octi::atan2-qd/cordic x one))))
#+cmu (ext:gc :full t)
(format t "atan-qd/duplication~%")
(time (dotimes (k n)
(declare (fixnum k))
- (setf y (atan-qd/duplication x))))
+ (setf y (octi::atan-qd/duplication x))))
+ #+cmu (ext:gc :full t)
+ (format t "atan-qd/taylor~%")
+ (time (dotimes (k n)
+ (declare (fixnum k))
+ (setf y (octi::atan-qd/taylor x))))
))
;; (time-tan #c(10w0 0) 10000)
-----------------------------------------------------------------------
Summary of changes:
qd-extra.lisp | 71 ++++++++++++++++++++++++++++++++++++++++++++++++++++++---
1 file changed, 68 insertions(+), 3 deletions(-)
hooks/post-receive
--
OCT: A portable Lisp implementation for quad-double precision floats
1
0
[oct-git]OCT: A portable Lisp implementation for quad-double precision floats branch master updated. 6127a79e0d6300bc7ac7754190fbd559d00e7401
by rtoy＠common-lisp.net 08 Apr '15
by rtoy＠common-lisp.net 08 Apr '15
08 Apr '15
This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "OCT: A portable Lisp implementation for quad-double precision floats".
The branch, master has been updated
via 6127a79e0d6300bc7ac7754190fbd559d00e7401 (commit)
from 94d15953c5116999ac15377515b6c7e5ae430ea7 (commit)
Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we list those
revisions in full, below.
- Log -----------------------------------------------------------------
commit 6127a79e0d6300bc7ac7754190fbd559d00e7401
Author: Raymond Toy <toy.raymond(a)gmail.com>
Date: Sun Nov 24 10:41:27 2013 -0800
Fix ticket:5
o Implement better pi reduction and also always do pi reduction.
o Add test for sin(pi) and cos(2^120), to test pi reduction.
o Accuracy for erfc is only 198 bits.
diff --git a/qd-fun.lisp b/qd-fun.lisp
index d131a7a..91c0b32 100644
--- a/qd-fun.lisp
+++ b/qd-fun.lisp
@@ -696,38 +696,46 @@ is the cosine of A"
(values mod f)
(values (mod (1+ mod) 4) (sub-qd f +qd-pi/2+))))))
-(defun rem-pi/2-int (qd)
- ;; Compute qd rem pi/2 = k*pi/2+y. So we compute k + y*2/pi =
- ;; qd*2/pi.
- ;;
- ;; First convert qd to 2^e*I. We already have 2/pi in the form
- ;; 2^-1584*J. Then qd*2/pi = 2^(e-1584)*I*J. Extract out the
- ;; integer and fractional parts of this. For the integer part we
- ;; only need it modulo 4, because of the periodicity. For the
- ;; fractional part, we only need 212 (or so bits of fraction).
- ;;
- ;; FIXME: But we don't really need to compute all the bits of I*J.
- ;; In the product, we really only need the 2 bits to the left of the
- ;; binary point, and then 212 bits to the right. This doesn't
- ;; require doing the full multiplication.
- (multiple-value-bind (i e s)
+(defun split-prod-2/pi (qd)
+ ;; Compute k and f such that k + f = qd*2/pi, where k is an intege
+ ;; and f < 1. Since we do not need more than the the least
+ ;; two bits from k, only the least two bits of k are returned.
+ (multiple-value-bind (i e)
(integer-decode-qd qd)
+ ;; First convert qd to 2^e*I. We already have 2/pi in the form
+ ;; 2^-1584*J. Then qd*2/pi = 2^(e-1584)*I*J. Extract out the
+ ;; integer and fractional parts of this. For the integer part we
+ ;; only need it modulo 4, because of the periodicity. For the
+ ;; fractional bits, we return the actual fraction as a ratio.
+ ;;
+ ;; FIXME: We compute the entire product I*J, but we only need the
+ ;; 2 bits to the left of the binary point. But we need many of
+ ;; the bits to the right of the binary point becaue we have no
+ ;; lower bound on the difference between a quad-double and pi.
(let* ((exp (- e (integer-length +2/pi-bits+)))
- (prod (* (* s i) +2/pi-bits+))
- (mod (ldb (byte 2 (- exp)) prod))
- ;; A quad-double has about 212 bits, but we add another 53
- ;; (5 doubles) for some extra accuracty.
- (qd-bits 265)
- (frac (ldb (byte qd-bits (- (- exp) qd-bits)) prod))
- (f (mul-qd (scale-float-qd (rational-to-qd frac) (- qd-bits))
- +qd-pi/2+)))
- ;; We want the remainder part to be <= pi/4 because the trig
- ;; functions want that. So if the fraction is too big, adjust
- ;; it, and mod value.
- (if (qd-<= (abs-qd f) +qd-pi/4+)
- (values mod f)
- (values (mod (1+ mod) 4) (sub-qd f +qd-pi/2+))))))
+ (binary-point (- exp))
+ (prod (* i +2/pi-bits+))
+ (int (ldb (byte 2 binary-point) prod))
+ (frac (/ (ldb (byte binary-point 0) prod)
+ (ash 1 binary-point))))
+ (values int frac))))
+(defun rem-pi/2-int (qd)
+ "Compute qd rem pi/2 = k + f, where k is an integer and |f| <
+ pi/4. Two values are returned: k mod 4 and f."
+ (if (minusp-qd qd)
+ (multiple-value-bind (k f)
+ (rem-pi/2-int (neg-qd qd))
+ (values (mod (- k) 4) (neg-qd f)))
+ (multiple-value-bind (k f)
+ (split-prod-2/pi qd)
+ ;; The trig functions want the arg to be less than pi/4. That
+ ;; is f < 1/2. Thus adjust k and f accordingly.
+ (when (> f 1/2)
+ (setf k (mod (1+ k) 4))
+ (setf f (- f 1)))
+ (values k (mul-qd +qd-pi/2+ (rational-to-qd f))))))
+
(defun rem-pi/2-int-b (qd)
(declare (type %quad-double qd))
(multiple-value-bind (i e s)
@@ -785,6 +793,13 @@ is the cosine of A"
(sub-qd a (mul-qd-d +qd-pi/2+ (float quot 1d0))))))
(t
(rem-pi/2-int a))))
+
+(defun rem-pi/2 (a)
+ ;; If the number is small enough, we don't need to use the full
+ ;; precision algorithm to compute the remainder. The value of 1024
+ ;; here is rather arbitrary. We should do an analysis to figure
+ ;; where the breakpoint should be.
+ (rem-pi/2-int a))
(defun sin-qd (a)
diff --git a/rt-tests.lisp b/rt-tests.lisp
index caf568f..69f6ee7 100644
--- a/rt-tests.lisp
+++ b/rt-tests.lisp
@@ -187,6 +187,18 @@
(check-accuracy 212 val true))
nil)
+;;; sin
+(rt:deftest oct.sin.pi
+ (not (zerop (sin +pi+)))
+ t)
+
+;;; cos
+(rt:deftest oct.cos.big
+ (let* ((val (cos (scale-float #q1 120)))
+ (err (abs (- val -0.9258790228548379d0))))
+ (<= err 5.2d-17))
+ t)
+
;;; Tests of atan where we know the analytical result
(rt:deftest oct.atan.1
(let* ((arg (/ (sqrt #q3)))
@@ -1731,6 +1743,6 @@
nil)
(rt:deftest erfc
- (check-accuracy 210 (erfc #q-4)
+ (check-accuracy 198 (erfc #q-4)
#q1.9999999845827420997199811478403265131159514278547464108088316570950057869589732)
nil)
-----------------------------------------------------------------------
Summary of changes:
qd-fun.lisp | 73 ++++++++++++++++++++++++++++++++++-----------------------
rt-tests.lisp | 14 ++++++++++-
2 files changed, 57 insertions(+), 30 deletions(-)
hooks/post-receive
--
OCT: A portable Lisp implementation for quad-double precision floats
1
0
[oct-git]OCT: A portable Lisp implementation for quad-double precision floats branch master updated. bcb0aded33f57a2ea901fdcc43fdfd88e8dff17b
by rtoy＠common-lisp.net 08 Apr '15
by rtoy＠common-lisp.net 08 Apr '15
08 Apr '15
This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "OCT: A portable Lisp implementation for quad-double precision floats".
The branch, master has been updated
via bcb0aded33f57a2ea901fdcc43fdfd88e8dff17b (commit)
from 0a607f3a6a6297597ae2a6c9896844803d42a6d9 (commit)
Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we list those
revisions in full, below.
- Log -----------------------------------------------------------------
commit bcb0aded33f57a2ea901fdcc43fdfd88e8dff17b
Author: Raymond Toy <toy.raymond(a)gmail.com>
Date: Tue Nov 26 11:54:59 2013 -0800
Update the versions.
diff --git a/oct.asd b/oct.asd
index 1611fa8..aa430ae 100644
--- a/oct.asd
+++ b/oct.asd
@@ -36,7 +36,7 @@
:author "Raymond Toy"
:maintainer "See <http://www.common-lisp.net/project/oct>"
:licence "MIT"
- :version "2013.11.24" ; Just use the date
+ :version "2013.11.26" ; Just use the date
:components
((:file "qd-package")
(:file "qd-rep" :depends-on ("qd-package"))
@@ -76,7 +76,7 @@
(asdf:defsystem oct-tests
:depends-on (oct)
- :version "2011.12.05" ; Just use the date
+ :version "2013.11.26" ; Just use the date
:in-order-to ((compile-op (load-op :rt))
(test-op (load-op :rt :oct)))
:components
-----------------------------------------------------------------------
Summary of changes:
oct.asd | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
hooks/post-receive
--
OCT: A portable Lisp implementation for quad-double precision floats
1
0
[oct-git]OCT: A portable Lisp implementation for quad-double precision floats branch master updated. 3c136f7ca5106ab99c95ffbc18a2b8c70d007342
by rtoy＠common-lisp.net 08 Apr '15
by rtoy＠common-lisp.net 08 Apr '15
08 Apr '15
This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "OCT: A portable Lisp implementation for quad-double precision floats".
The branch, master has been updated
via 3c136f7ca5106ab99c95ffbc18a2b8c70d007342 (commit)
from 6e6d810e0e1e9064dba180f758cad56a31877f1f (commit)
Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we list those
revisions in full, below.
- Log -----------------------------------------------------------------
commit 3c136f7ca5106ab99c95ffbc18a2b8c70d007342
Author: Raymond Toy <rtoy(a)google.com>
Date: Sun Nov 24 20:53:22 2013 -0800
Clean up rem-pi/2.
o Remove old version
o Update new version to skip reduction if the arg <= pi/4.
diff --git a/qd-fun.lisp b/qd-fun.lisp
index 91c0b32..b3ae7b6 100644
--- a/qd-fun.lisp
+++ b/qd-fun.lisp
@@ -783,23 +783,12 @@ is the cosine of A"
(sub-qd f +qd-pi/2+))))))
(defun rem-pi/2 (a)
- ;; If the number is small enough, we don't need to use the full
- ;; precision algorithm to compute the remainder. The value of 1024
- ;; here is rather arbitrary. We should do an analysis to figure
- ;; where the breakpoint should be.
- (cond ((<= (abs (qd-0 a)) 256)
- (let ((quot (truncate (qd-0 (nint-qd (div-qd a +qd-pi/2+))))))
- (values (mod quot 4)
- (sub-qd a (mul-qd-d +qd-pi/2+ (float quot 1d0))))))
+ "Compute qd rem pi/2 = k + f, where k is an integer and |f| <
+ pi/4. Two values are returned: k mod 4 and f."
+ (cond ((qd-<= (abs-qd a) +qd-pi/4+)
+ (values 0 a))
(t
(rem-pi/2-int a))))
-
-(defun rem-pi/2 (a)
- ;; If the number is small enough, we don't need to use the full
- ;; precision algorithm to compute the remainder. The value of 1024
- ;; here is rather arbitrary. We should do an analysis to figure
- ;; where the breakpoint should be.
- (rem-pi/2-int a))
(defun sin-qd (a)
-----------------------------------------------------------------------
Summary of changes:
qd-fun.lisp | 19 ++++---------------
1 file changed, 4 insertions(+), 15 deletions(-)
hooks/post-receive
--
OCT: A portable Lisp implementation for quad-double precision floats
1
0
[oct-scm] [oct-git]OCT: A portable Lisp implementation for quad-double precision floats branch master updated. de65a54b545af76b6df16f3de36e54763ce97235
by Raymond Toy 17 Apr '12
by Raymond Toy 17 Apr '12
17 Apr '12
This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "OCT: A portable Lisp implementation for quad-double precision floats".
The branch, master has been updated
via de65a54b545af76b6df16f3de36e54763ce97235 (commit)
via fb7212315ca5f592ef768c2636e7b3cd745473e4 (commit)
via 581a0a08f04a985424c09b6a7b3661d2eb58c3e9 (commit)
via 76ea9b133d74861db511d7c3e3a29653ce4ebda7 (commit)
via 25129063aaa6168763b447db6f033359a19b60e0 (commit)
via 22db89aa72af64360ed2d0f97709fc26ca01368b (commit)
via fd281d5fcf9fcddb459b4fb12e6922ff2a2121a8 (commit)
from e6a3f286122ea99d65a6448c3c41d0bdc411b2d7 (commit)
Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we list those
revisions in full, below.
- Log -----------------------------------------------------------------
commit de65a54b545af76b6df16f3de36e54763ce97235
Merge: fb72123 e6a3f28
Author: Raymond Toy <rtoy(a)google.com>
Date: Tue Apr 17 16:16:07 2012 -0700
Merge branch 'master' of ssh://common-lisp.net/var/git/projects/oct/oct
commit fb7212315ca5f592ef768c2636e7b3cd745473e4
Author: Raymond Toy <rtoy(a)google.com>
Date: Tue Apr 17 16:15:37 2012 -0700
Add function to compute J(1/2,z) and use it in the tests.
diff --git a/rt-tests.lisp b/rt-tests.lisp
index 5b9f5ad..af1d00c 100644
--- a/rt-tests.lisp
+++ b/rt-tests.lisp
@@ -1617,6 +1617,11 @@
(check-accuracy 51.89 b true))
nil)
+(defun bessel-j-1/2 (z)
+ ;; bessel_j(1/2,z) = sin(x)/sqrt(x)*sqrt(2/pi)
+ (* (/ (sin z) (sqrt z))
+ (sqrt (/ 2 (float-pi z)))))
+
;; Bessel J for half integer order and real args
(rt:deftest bessel-j-1/2.d.1
(loop for k from 0 below 100
@@ -1625,7 +1630,7 @@
;; = 0, where we will lose accuracy.
for x = (+ 1 (random (/ pi 2)))
for b = (bessel-j 0.5d0 x)
- for true = (* (/ (sin x) (sqrt x)) (sqrt (/ 2 pi)))
+ for true = (bessel-j-1/2 x)
for result = (check-accuracy 48.42 b true)
when result
append (list (list (list k x) result)))
@@ -1634,7 +1639,7 @@
(rt:deftest bessel-j-1/2.d.1.a
(let* ((x 2.3831631289164497d0)
(b (bessel-j 0.5d0 x))
- (true (* (/ (sin x) (sqrt x)) (sqrt (/ 2 pi)))))
+ (true (bessel-j-1/2 x)))
(check-accuracy 48.42 b true))
nil)
@@ -1645,7 +1650,7 @@
;; = 0, where we will lose accuracy.
for x = (+ 1 (random (/ (float-pi #q1) 2)))
for b = (bessel-j #q0.5 x)
- for true = (* (/ (sin x) (sqrt x)) (sqrt (/ 2 (float-pi #q1))))
+ for true = (bessel-j-1/2 x)
for result = (check-accuracy 169.45 b true)
when result
append (list (list (list k x) result)))
@@ -1654,21 +1659,21 @@
(rt:deftest bessel-j-1/2.q.1.a
(let* ((x #q1.1288834862545916200627583005758663687705443417892789067029865493882q0)
(b (bessel-j #q0.5 x))
- (true (* (/ (sin x) (sqrt x)) (sqrt (/ 2 (float-pi #q1))))))
+ (true (bessel-j-1/2 x)))
(check-accuracy 182.92 b true))
nil)
(rt:deftest bessel-j-1/2.q.1.b
(let* ((x #q1.1288834862545916200627583005758663687705443417892789067029865493882q0)
(b (bessel-j #q0.5 x))
- (true (* (/ (sin x) (sqrt x)) (sqrt (/ 2 (float-pi #q1))))))
+ (true (bessel-j-1/2 x)))
(check-accuracy 173.28 b true))
nil)
(rt:deftest bessel-j-1/2.q.1.c
(let* ((x #q1.0360263937639582798798376485114581552570020473846457752365459851056q0)
(b (bessel-j #q0.5 x))
- (true (* (/ (sin x) (sqrt x)) (sqrt (/ 2 (float-pi #q1))))))
+ (true (bessel-j-1/2 x)))
(check-accuracy 169.45 b true))
nil)
@@ -1708,7 +1713,7 @@
for x = (complex (random (/ pi 2))
(random (/ pi 2)))
for b = (bessel-j 0.5d0 x)
- for true = (* (/ (sin x) (sqrt x)) (sqrt (/ 2 pi)))
+ for true = (bessel-j-1/2 x)
for result = (check-accuracy 49.8 b true)
when result
append (list (list (list k x) result)))
@@ -1719,7 +1724,7 @@
for x = (complex (random (/ (float-pi #q1) 2))
(random (/ (float-pi #q1) 2)))
for b = (bessel-j #q0.5 x)
- for true = (* (/ (sin x) (sqrt x)) (sqrt (/ 2 (float-pi #q1))))
+ for true = (bessel-j-1/2 x)
for result = (check-accuracy 212 b true)
when result
append (list (list (list k x) result)))
commit 581a0a08f04a985424c09b6a7b3661d2eb58c3e9
Merge: 76ea9b1 78801d6
Author: Raymond Toy <rtoy(a)google.com>
Date: Mon Apr 16 10:05:21 2012 -0700
Merge branch 'master' of ssh://common-lisp.net/var/git/projects/oct/oct
commit 76ea9b133d74861db511d7c3e3a29653ce4ebda7
Merge: 2512906 5daefcc
Author: Raymond Toy <rtoy(a)google.com>
Date: Thu Apr 12 15:32:00 2012 -0700
Merge branch 'master' of ssh://common-lisp.net/var/git/projects/oct/oct
commit 25129063aaa6168763b447db6f033359a19b60e0
Merge: 22db89a 7c5a318
Author: Raymond Toy <rtoy(a)google.com>
Date: Wed Apr 11 13:53:07 2012 -0700
Merge branch 'master' of ssh://common-lisp.net/var/git/projects/oct/oct
commit 22db89aa72af64360ed2d0f97709fc26ca01368b
Merge: fd281d5 f8943af
Author: Raymond Toy <rtoy(a)google.com>
Date: Mon Apr 9 11:14:16 2012 -0700
Merge branch 'master' of ssh://common-lisp.net/var/git/projects/oct/oct
diff --cc oct.asd
index ccabbb1,0ca30e5..10cf0f9
--- a/oct.asd
+++ b/oct.asd
@@@ -66,9 -66,10 +66,11 @@@
(:file "qd-theta"
:depends-on ("qd-methods" "qd-reader"))
(:file "qd-gamma"
- :depends-on ("qd-methods" "qd-reader"))
+ :depends-on ("qd-complex" "qd-methods" "qd-reader"))
- ))
+ (:file "qd-bessel"
+ :depends-on ("qd-methods"))))
+
+
(defmethod perform ((op test-op) (c (eql (asdf:find-system :oct))))
(oos 'test-op 'oct-tests))
commit fd281d5fcf9fcddb459b4fb12e6922ff2a2121a8
Author: Raymond Toy <rtoy(a)google.com>
Date: Fri Mar 23 20:48:40 2012 -0700
qd-gamma depends on qd-complex.
diff --git a/oct.asd b/oct.asd
index 3f8d70c..ccabbb1 100644
--- a/oct.asd
+++ b/oct.asd
@@ -66,7 +66,7 @@
(:file "qd-theta"
:depends-on ("qd-methods" "qd-reader"))
(:file "qd-gamma"
- :depends-on ("qd-methods" "qd-reader"))
+ :depends-on ("qd-complex" "qd-methods" "qd-reader"))
))
(defmethod perform ((op test-op) (c (eql (asdf:find-system :oct))))
-----------------------------------------------------------------------
Summary of changes:
oct.asd | 3 ++-
rt-tests.lisp | 21 +++++++++++++--------
2 files changed, 15 insertions(+), 9 deletions(-)
hooks/post-receive
--
OCT: A portable Lisp implementation for quad-double precision floats
1
0
[oct-scm] [oct-git]OCT: A portable Lisp implementation for quad-double precision floats branch master updated. e6a3f286122ea99d65a6448c3c41d0bdc411b2d7
by Raymond Toy 17 Apr '12
by Raymond Toy 17 Apr '12
17 Apr '12
This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "OCT: A portable Lisp implementation for quad-double precision floats".
The branch, master has been updated
via e6a3f286122ea99d65a6448c3c41d0bdc411b2d7 (commit)
from 64c424b7f41413424bbab93d4f5dd4f8461b784d (commit)
Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we list those
revisions in full, below.
- Log -----------------------------------------------------------------
commit e6a3f286122ea99d65a6448c3c41d0bdc411b2d7
Author: Raymond Toy <toy.raymond(a)gmail.com>
Date: Tue Apr 17 09:32:27 2012 -0700
sum-an was summing one too many terms.
diff --git a/qd-bessel.lisp b/qd-bessel.lisp
index 37a4c8e..bf3ca04 100644
--- a/qd-bessel.lisp
+++ b/qd-bessel.lisp
@@ -350,7 +350,7 @@
(an n k v)))
(sum term (+ sum term)))
((or (<= (abs term) (* eps (abs sum)))
- (> k big-n))
+ (>= k big-n))
sum))))
;; SUM-AB computes the series
-----------------------------------------------------------------------
Summary of changes:
qd-bessel.lisp | 2 +-
1 files changed, 1 insertions(+), 1 deletions(-)
hooks/post-receive
--
OCT: A portable Lisp implementation for quad-double precision floats
1
0
[oct-scm] [oct-git]OCT: A portable Lisp implementation for quad-double precision floats branch master updated. 64c424b7f41413424bbab93d4f5dd4f8461b784d
by Raymond Toy 16 Apr '12
by Raymond Toy 16 Apr '12
16 Apr '12
This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "OCT: A portable Lisp implementation for quad-double precision floats".
The branch, master has been updated
via 64c424b7f41413424bbab93d4f5dd4f8461b784d (commit)
via 8c5195a87137fd61952a175a5dae676c70b480ef (commit)
from 78801d6381aaaf4f21967582680f26889582db60 (commit)
Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we list those
revisions in full, below.
- Log -----------------------------------------------------------------
commit 64c424b7f41413424bbab93d4f5dd4f8461b784d
Author: Raymond Toy <toy.raymond(a)gmail.com>
Date: Mon Apr 16 20:45:12 2012 -0700
Add iterative versions for some functions.
diff --git a/qd-bessel.lisp b/qd-bessel.lisp
index 14743af..37a4c8e 100644
--- a/qd-bessel.lisp
+++ b/qd-bessel.lisp
@@ -78,6 +78,21 @@
(* (ash n -1) p)
(- (* (+ a (ash n -1)) p))))))))
+;; Use the recursion
+(defun bk-iter (k p old-bk)
+ (with-floating-point-contagion (p old-bk)
+ (if (zerop k)
+ (* (sqrt (/ (float-pi p) 8))
+ (let ((rp (sqrt p)))
+ (/ (erf rp)
+ rp)))
+ (- (* (- k 1/2)
+ (/ old-bk (* 2 p)))
+ (/ (exp (- p))
+ p
+ (ash 1 (+ k 1))
+ (sqrt (float 2 (realpart p))))))))
+
;; exp-arc I function, as given in the Laguerre paper
;;
;; I(p, q) = 4*exp(p) * sum(g[k](-2*%i*q)/(2*k)!*B[k](p), k, 0, inf)
@@ -178,6 +193,35 @@
(format t " term = ~S~%" term)
(format t " sum - ~S~%" sum)))))
+(defun exp-arc-i-3 (p q)
+ (let* ((v (* #c(0 -2) q))
+ (v2 (expt v 2))
+ (eps (epsilon (realpart p))))
+ (do* ((k 0 (1+ k))
+ (bk (bk 0 p)
+ (bk-iter k p bk))
+ ;; Compute g[k](p)/(2*k)!, not r[2*k+1](p)/(2*k)!
+ (ratio 1
+ (* ratio (/ (+ v2 (expt (1- (* 2 k)) 2))
+ (* 2 k (1- (* 2 k))))))
+ (term (* ratio bk)
+ (* ratio bk))
+ (sum term (+ sum term)))
+ ((< (abs term) (* (abs sum) eps))
+ (when *debug-exparc*
+ (format t "Final k= ~D~%" k)
+ (format t " bk = ~S~%" bk)
+ (format t " ratio = ~S~%" ratio)
+ (format t " term = ~S~%" term)
+ (format t " sum - ~S~%" sum))
+ (* sum 4 (exp p)))
+ (when *debug-exparc*
+ (format t "k = ~D~%" k)
+ (format t " bk = ~S~%" bk)
+ (format t " ratio = ~S~%" ratio)
+ (format t " term = ~S~%" term)
+ (format t " sum - ~S~%" sum)))))
+
;; Not really just for Bessel J for integer orders, but in that case,
;; this is all that's needed to compute Bessel J. For other values,
@@ -212,6 +256,7 @@
;;
;; alpha[n](z) = - exp(-z/2)/2^n/z + n/z*alpha[n-1](z)
;; beta[n]z) = ((-1)^n*exp(z/2)-exp(-z/2))/2^n/z + n/z*beta[n-1](z)
+;; = (-1)^n/(2^n)*2*sinh(z/2)/z + n/z*beta[n-1](z)
;;
;; We also note that
;;
@@ -223,12 +268,34 @@
(/ (incomplete-gamma (1+ n) (/ z 2))
(expt z (1+ n)))))
+(defun alpha-iter (n z alpha-old)
+ (if (zerop n)
+ ;; (1- exp(-z/2))/z.
+ (/ (- 1 (exp (* z -1/2)))
+ z)
+ (- (* (/ n z) alpha-old)
+ (/ (exp (- (* z 1/2)))
+ z
+ (ash 1 n)))))
+
(defun beta (n z)
(let ((n (float n (realpart z))))
(/ (- (incomplete-gamma (1+ n) (/ z 2))
(incomplete-gamma (1+ n) (/ z -2)))
(expt z (1+ n)))))
+(defun beta-iter (n z old-beta)
+ (if (zerop n)
+ ;; integrate(exp(-z*s),s,-1/2,1/2)
+ ;; = (exp(z/2)-exp(-z/2)/z
+ ;; = 2*sinh(z/2)/z
+ ;; = sinh(z/2)/(z/2)
+ (* 2 (/ (sinh (* 1/2 z)) z))
+ (+ (* n (/ old-beta z))
+ (* (/ (sinh (* 1/2 z)) (* 1/2 z))
+ (scale-float (float (if (evenp n) 1 -1) (realpart z)) (- n))))))
+
+
;; a[0](k,v) := (k+sqrt(k^2+1))^(-v);
;; a[1](k,v) := -v*a[0](k,v)/sqrt(k^2+1);
;; a[n](k,v) := 1/(k^2+1)/(n-1)/n*((v^2-(n-2)^2)*a[n-2](k,v)-k*(n-1)*(2*n-3)*a[n-1](k,v));
@@ -305,6 +372,26 @@
(format t " term = ~S~%" term)
(format t " sum = ~S~%" sum)))))
+(defun sum-ab-2 (big-n v z)
+ (let ((eps (epsilon (realpart z))))
+ (an-clrhash)
+ (do* ((n 0 (+ 1 n))
+ (alphan (alpha-iter 0 z 0)
+ (alpha-iter n z alphan))
+ (betan (beta-iter 0 z 0)
+ (beta-iter n z betan))
+ (term (+ (* alphan (an n 0 v))
+ (* betan (sum-an big-n n v z)))
+ (+ (* alphan (an n 0 v))
+ (* betan (sum-an big-n n v z))))
+ (sum term (+ sum term)))
+ ((<= (abs term) (* eps (abs sum)))
+ sum)
+ (when nil
+ (format t "n = ~D~%" n)
+ (format t " term = ~S~%" term)
+ (format t " sum = ~S~%" sum)))))
+
;; Convert to iteration instead of this quick-and-dirty memoization?
(let ((hash (make-hash-table :test 'equal)))
(defun %big-a-clrhash ()
commit 8c5195a87137fd61952a175a5dae676c70b480ef
Author: Raymond Toy <toy.raymond(a)gmail.com>
Date: Mon Apr 16 19:30:12 2012 -0700
Make big-n a defvar so we can change it easily.
diff --git a/qd-bessel.lisp b/qd-bessel.lisp
index 48a0dac..14743af 100644
--- a/qd-bessel.lisp
+++ b/qd-bessel.lisp
@@ -410,6 +410,7 @@
;; bessel_i(v,z) = exp(-v*%pi*%i/2)*bessel_j(v, %i*z)
;; when Im(z) >> Re(z)
;;
+(defvar *big-n* 100)
(defun bessel-j (v z)
(let ((vv (ftruncate v)))
;; Clear the caches for now.
@@ -420,7 +421,7 @@
(integer-bessel-j-exp-arc v z))
(t
;; Need to fine-tune the value of big-n.
- (let ((big-n 10)
+ (let ((big-n *big-n*)
(vpi (* v (float-pi (realpart z)))))
(+ (integer-bessel-j-exp-arc v z)
(if (= vv v)
-----------------------------------------------------------------------
Summary of changes:
qd-bessel.lisp | 90 +++++++++++++++++++++++++++++++++++++++++++++++++++++++-
1 files changed, 89 insertions(+), 1 deletions(-)
hooks/post-receive
--
OCT: A portable Lisp implementation for quad-double precision floats
1
0