Help for this page
Z = sin (angle/2) Y = 0.0 X = 0.0 Q = cos (angle/2)
use strict; use warnings; use Math::Complex; ... print "Quaternion first value(in degrees): \t$quat1_deg\n"; print "Quaternion fourth value: \t$quat2\n"; print "Quaternion fourth value(in degrees): \t$quat2_deg\n";