ohtorii https://blog.hatena.ne.jp/ohtorii/ とりあえず日記 https://ohtorii.hatenadiary.jp/ 数学 wxMaxima version /* quaternion qmul(quaternion l, quaternion r); */ qmul(l,r) := [ l[1]*r[4] + l[4]*r[1] + l[2]*r[3] - l[3]*r[2] , l[2]*r[4] + l[4]*r[2] + l[3]*r[1] - l[1]*r[3] , l[3]*r[4] + l[4]*r[3] + l[1]*r[2] - l[2]*r[1] , l[4]*r[4] - l[1]*r[1] - l[2]*r[2] - l[3]*r[3] ]; q1:[x,y,z,w]; q2:[0,0,0,… 190 <iframe src="https://hatenablog-parts.com/embed?url=https%3A%2F%2Fohtorii.hatenadiary.jp%2Fentry%2F20150324%2Fp1" title="wxMaximaでクォータニオンの積を計算する。 - とりあえず日記" class="embed-card embed-blogcard" scrolling="no" frameborder="0" style="display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;"></iframe> https://cdn-ak.f.st-hatena.com/images/fotolife/o/ohtorii/20150524/20150524135025.png Hatena Blog https://hatena.blog 2015-03-24 00:00:00 rich https://ohtorii.hatenadiary.jp/entry/20150324/p1 1.0 100%