WELCOME TO MOSES Rev devlop ============================ This Program is licensed for the exclusive use of Ultramarine inc. Copying of this program or use by anyone other than an employee of the above firm without written consent of Ultramarine is strictly prohibited. +++ M A I N +++ =============== >&device -g_default device >&dimen -dimen feet kips >&default -depth 100 >&insert sfun.mac Testing Inverse Trig ==================== atan 1 = 0.7853982 radians atan 1/2 = 0.4636476 radians atan -1/2 = -0.4636476 radians atan2 1 2 = 0.4636476 radians atan2 -1 2 = 5.819538 radians atan2d 1 2 = 26.56505 degrees atan2d -1 2 = 333.435 degrees acos .999 = 4.47248E-2 radians acos 1/2 = 1.047198 radians acos -1/2 = 2.094395 radians asin .999 = 1.526072 radians asin 1/2 = 0.5235988 radians asin -1/2 = -0.5235988 radians Testing sin =========== sin 0 = 0 sin 1 = 0.841471 sin pi/2 = 1 Testing cos =========== cos 0 = 1 cos 1 = 0.5403023 cos pi/2 = -4.371139E-8 Testing tan =========== tan 0 = 0 tan 1 = 1.557408 tan pi/2 = -2.287733E7 Testing sind ============ sind 0 = 0 sind 45 = 0.7071067 sind 90 = 1 Testing cosd ============ cosd 0 = 1 cosd 45 = 0.7071068 cosd 90 = 1.947072E-7 Testing tand ============ tand 0 = 0 tand 45 = 1 tand 90 = 5.135917E6 Misc Functions ============== sqrt 2 = 1.414214 log 10 = 2.302585 ln 10 = 2.302585 exp 1 = 2.718282 Testing Misc ============ max 300 2 10 -1 90 30 150) = 300 min 300 2 10 -1 90 30 150) = -1 sort 300 2 10 -1 90 30 150) = -1 2 10 30 90 150 300 interpolate .5 0 1 2 3 = 2.5 interpolate .5 0 1 2 3 = 2.5 ? cow = .FALSE. integer 2.5 = 2 real 2.5+1 = 3.5 mean 0 1 2 3 = 1.5 increment 0 10 1 = 0 1 2 3 4 5 6 7 8 9 10 Testing Vectors =============== abs -1 1 -2 -3 -4 = 1 1 2 3 4 unit_vector 1 1 = 0.7071068 0.7071068 cross -1 -1 0 2 2 0 = 0 0 0 dot -1 -1 2 2 = -4 addv .5 1 1 2 2 = 2.5 2.5 scale .5 1 1 2 2 = 0.5 0.5 1 1 norm 1 1 1 = 1.732051 >&set q = 0.7071068 0.7071068 0 -0.7071068 0.7071068 0 0 0 1 3pts2q = 0.7071068 0.7071068 0 -0.7071068 0.7071068 0 \ 0 0 1 veclg = 0.7071068 0.7071068 0 vecg2l = 0.7071068 -0.7071068 0 MOSES Finished Normally ========================= CP Time 0.04 ======================== Total Units 0.04 ========================