flaw-math/Flaw/Math/Transform.hs from quyse/flaw

flaw-math/Flaw/Math/Transform.hs

    k = sqrt (1 + m11 + m22 + m33)

Found

k = sqrt (1 + m11 + m22 + m33)
kk = 0.5 / k
x = (m32 - m23) * kk
y = (m13 - m31) * kk
z = (m21 - m12) * kk
w = k * 0.5

Perhaps

Combine with flaw-math/Flaw/Math/Transform.hs:201:5

quyse/flaw