Quaternion type: Difference between revisions
→{{header|Ol}}
Line 5,964:
(and (= a1 a2) (= b1 b2)
(= c1 c2) (= d1 d2))))))))))
(
(let loop ((q
(
(
(define q (quaternion 1 2 3 4))
| |||