diff options
author | Thomas White <taw@physics.org> | 2009-11-26 12:20:41 +0100 |
---|---|---|
committer | Thomas White <taw@physics.org> | 2009-11-26 12:20:41 +0100 |
commit | 844947d19261a2c71280b9f638ad7f5e88e16c73 (patch) | |
tree | 9f0e24499843267b8fd731639d73274b7c97cdab /src/utils.c | |
parent | 3d22f28223ee6dcef7e8d0cba247ac112942e344 (diff) |
Add more options, including random orientations
Diffstat (limited to 'src/utils.c')
-rw-r--r-- | src/utils.c | 50 |
1 files changed, 50 insertions, 0 deletions
diff --git a/src/utils.c b/src/utils.c index 4f5f7da3..90720510 100644 --- a/src/utils.c +++ b/src/utils.c @@ -94,3 +94,53 @@ double poisson_noise(double expected) return k - 1; } + + +double quaternion_modulus(struct quaternion q) +{ + return sqrt(q.w*q.w + q.x*q.x + q.y*q.y + q.z*q.z); +} + + +struct quaternion normalise_quaternion(struct quaternion q) +{ + double mod; + struct quaternion r; + + mod = quaternion_modulus(q); + + r.w = q.w / mod; + r.x = q.x / mod; + r.y = q.y / mod; + r.z = q.z / mod; + + return r; +} + + +struct quaternion random_quaternion() +{ + struct quaternion q; + + q.w = (double)random()/RAND_MAX; + q.x = (double)random()/RAND_MAX; + q.y = (double)random()/RAND_MAX; + q.z = (double)random()/RAND_MAX; + normalise_quaternion(q); + + return q; +} + + +int quaternion_valid(struct quaternion q) +{ + double qmod; + + qmod = quaternion_modulus(q); + + /* Modulus = 1 to within some tolerance? + * Nasty allowance for floating-point accuracy follows... */ + if ( (qmod > 0.999) && (qmod < 1.001) ) return 1; + + return 0; +} |