sources/classes/sox-hoaencode.lisp | ●●●●● patch | view | raw | blame | history |
sources/classes/sox-hoaencode.lisp
@@ -154,8 +154,8 @@ )) (2 (ecase (abs degree) (0 (- (/ (* 3 (expt (sin phi) 2)) 2) (/ 1 2))) (1 (/ (* 3 (* (sin phi) 2)) 2)) (0 (- 1 (/ (* 3 (expt (cos phi) 2)) 2))) (1 (/ (* 3 (sin (* 2 phi))) 2)) (2 (* 3 (expt (cos phi) 2))) )) (3