22 June 2007 1:08:01.606 PM CORDIC_PRB: FORTRAN90 version Test the routines in the CORDIC library. TEST001: COSSIN_CORDIC computes the cosine and sine using the CORDIC algorithm. A N Cos(A) Cos(A) Difference Tabulated CORDIC 0.0000 0 1.0000000 1.0000000 0.0000E+00 0.0000 5 1.0000000 .99988995 0.1100E-03 0.0000 10 1.0000000 .99999931 0.6875E-06 0.0000 15 1.0000000 1.0000000 0.8350E-10 0.0000 20 1.0000000 1.0000000 0.9204E-13 0.0000 25 1.0000000 1.0000000 0.4441E-15 0.2618 0 .96592583 1.0000000 -0.3407E-01 0.2618 5 .96592583 .96547238 0.4535E-03 0.2618 10 .96592583 .96597708 -0.5125E-04 0.2618 15 .96592583 .96592971 -0.3882E-05 0.2618 20 .96592583 .96592625 -0.4261E-06 0.2618 25 .96592583 .96592584 -0.9607E-08 0.5000 0 .87758256 1.0000000 -0.1224E+00 0.5000 5 .87758256 .87527459 0.2308E-02 0.5000 10 .87758256 .87808912 -0.5066E-03 0.5000 15 .87758256 .87759216 -0.9601E-05 0.5000 20 .87758256 .87758210 0.4578E-06 0.5000 25 .87758256 .87758259 -0.2795E-07 0.5236 0 .86602540 1.0000000 -0.1340E+00 0.5236 5 .86602540 .87527459 -0.9249E-02 0.5236 10 .86602540 .86664307 -0.6177E-03 0.5236 15 .86602540 .86600286 0.2255E-04 0.5236 20 .86602540 .86602479 0.6098E-06 0.5236 25 .86602540 .86602542 -0.1609E-07 0.7854 0 .70710678 1.0000000 -0.2929E+00 0.7854 5 .70710678 .68419769 0.2291E-01 0.7854 10 .70710678 .70802311 -0.9163E-03 0.7854 15 .70710678 .70711738 -0.1060E-04 0.7854 20 .70710678 .70710794 -0.1158E-05 0.7854 25 .70710678 .70710680 -0.2002E-07 1.0000 0 .54030231 1.0000000 -0.4597E+00 1.0000 5 .54030231 .58806584 -0.4776E-01 1.0000 10 .54030231 .54134537 -0.1043E-02 1.0000 15 .54030231 .54026724 0.3507E-04 1.0000 20 .54030231 .54030094 0.1362E-05 1.0000 25 .54030231 .54030230 0.8193E-08 1.0472 0 .50000000 1.0000000 -0.5000E+00 1.0472 5 .50000000 .48362630 0.1637E-01 1.0472 10 .50000000 .49892865 0.1071E-02 1.0472 15 .50000000 .50003905 -0.3905E-04 1.0472 20 .50000000 .50000106 -0.1056E-05 1.0472 25 .50000000 .49999997 0.2787E-07 1.5708 0 .00000000 1.0000000 -0.1000E+01 1.5708 5 .00000000 0.14835163E-01 -0.1484E-01 1.5708 10 .00000000 0.11725901E-02 -0.1173E-02 1.5708 15 .00000000 0.12922696E-04 -0.1292E-04 1.5708 20 .00000000 -0.42874447E-06 0.4287E-06 1.5708 25 .00000000 -0.11511956E-07 0.1151E-07 2.0000 0 -.41614684 -1.0000000 0.5839E+00 2.0000 5 -.41614684 -.37087906 -0.4527E-01 2.0000 10 -.41614684 -.41575425 -0.3926E-03 2.0000 15 -.41614684 -.41614278 -0.4059E-05 2.0000 20 -.41614684 -.41614798 0.1144E-05 2.0000 25 -.41614684 -.41614684 0.5831E-08 3.0000 0 -.98999250 -1.0000000 0.1001E-01 3.0000 5 -.98999250 -.99039545 0.4030E-03 3.0000 10 -.98999250 -.99012474 0.1322E-03 3.0000 15 -.98999250 -.98999597 0.3477E-05 3.0000 20 -.98999250 -.98999247 -0.2200E-07 3.0000 25 -.98999250 -.98999250 0.3229E-08 3.1416 0 -1.0000000 -1.0000000 0.0000E+00 3.1416 5 -1.0000000 -.99988995 -0.1100E-03 3.1416 10 -1.0000000 -.99999931 -0.6875E-06 3.1416 15 -1.0000000 -1.0000000 -0.8350E-10 3.1416 20 -1.0000000 -1.0000000 -0.9204E-13 3.1416 25 -1.0000000 -1.0000000 -0.4441E-15 4.0000 0 -.65364362 -1.0000000 0.3464E+00 4.0000 5 -.65364362 -.68419769 0.3055E-01 4.0000 10 -.65364362 -.65372665 0.8303E-04 4.0000 15 -.65364362 -.65368046 0.3684E-04 4.0000 20 -.65364362 -.65364437 0.7526E-06 4.0000 25 -.65364362 -.65364361 -0.1424E-07 5.0000 0 .28366219 1.0000000 -0.7163E+00 5.0000 5 .28366219 .26050545 0.2316E-01 5.0000 10 .28366219 .28492410 -0.1262E-02 5.0000 15 .28366219 .28369526 -0.3307E-04 5.0000 20 .28366219 .28366051 0.1676E-05 5.0000 25 .28366219 .28366217 0.1855E-07 TEST002: COSSIN_CORDIC computes the cosine and sine using the CORDIC algorithm. A N Sin(A) Sin(A) Difference Tabulated CORDIC 0.0000 0 .00000000 .00000000 0.0000E+00 0.0000 5 .00000000 0.14835163E-01 -0.1484E-01 0.0000 10 .00000000 0.11725901E-02 -0.1173E-02 0.0000 15 .00000000 0.12922696E-04 -0.1292E-04 0.0000 20 .00000000 -0.42874447E-06 0.4287E-06 0.0000 25 .00000000 -0.11511956E-07 0.1151E-07 0.2618 0 .25881905 .00000000 0.2588E+00 0.2618 5 .25881905 .26050545 -0.1686E-02 0.2618 10 .25881905 .25862769 0.1914E-03 0.2618 15 .25881905 .25880456 0.1449E-04 0.2618 20 .25881905 .25881745 0.1590E-05 0.2618 25 .25881905 .25881901 0.3585E-07 0.5000 0 .47942554 .00000000 0.4794E+00 0.5000 5 .47942554 .48362630 -0.4201E-02 0.5000 10 .47942554 .47849712 0.9284E-03 0.5000 15 .47942554 .47940796 0.1757E-04 0.5000 20 .47942554 .47942638 -0.8381E-06 0.5000 25 .47942554 .47942549 0.5116E-07 0.5236 0 .50000000 .00000000 0.5000E+00 0.5236 5 .50000000 .48362630 0.1637E-01 0.5236 10 .50000000 .49892865 0.1071E-02 0.5236 15 .50000000 .50003905 -0.3905E-04 0.5236 20 .50000000 .50000106 -0.1056E-05 0.5236 25 .50000000 .49999997 0.2787E-07 0.7854 0 .70710678 .00000000 0.7071E+00 0.7854 5 .70710678 .72929659 -0.2219E-01 0.7854 10 .70710678 .70618926 0.9175E-03 0.7854 15 .70710678 .70709618 0.1060E-04 0.7854 20 .70710678 .70710562 0.1158E-05 0.7854 25 .70710678 .70710676 0.2002E-07 1.0000 0 .84147098 .00000000 0.8415E+00 1.0000 5 .84147098 .80881306 0.3266E-01 1.0000 10 .84147098 .84080033 0.6707E-03 1.0000 15 .84147098 .84149350 -0.2252E-04 1.0000 20 .84147098 .84147186 -0.8748E-06 1.0000 25 .84147098 .84147099 -0.5261E-08 1.0472 0 .86602540 .00000000 0.8660E+00 1.0472 5 .86602540 .87527459 -0.9249E-02 1.0472 10 .86602540 .86664307 -0.6177E-03 1.0472 15 .86602540 .86600286 0.2255E-04 1.0472 20 .86602540 .86602479 0.6098E-06 1.0472 25 .86602540 .86602542 -0.1609E-07 1.5708 0 1.0000000 .00000000 0.1000E+01 1.5708 5 1.0000000 .99988995 0.1100E-03 1.5708 10 1.0000000 .99999931 0.6875E-06 1.5708 15 1.0000000 1.0000000 0.8350E-10 1.5708 20 1.0000000 1.0000000 0.9204E-13 1.5708 25 1.0000000 1.0000000 0.4441E-15 2.0000 0 .90929743 -.00000000 0.9093E+00 2.0000 5 .90929743 .92868117 -0.1938E-01 2.0000 10 .90929743 .90947700 -0.1796E-03 2.0000 15 .90929743 .90929928 -0.1858E-05 2.0000 20 .90929743 .90929690 0.5236E-06 2.0000 25 .90929743 .90929742 0.2669E-08 3.0000 0 .14112001 -.00000000 0.1411E+00 3.0000 5 .14112001 .13826371 0.2856E-02 3.0000 10 .14112001 .14018919 0.9308E-03 3.0000 15 .14112001 .14109561 0.2439E-04 3.0000 20 .14112001 .14112016 -0.1544E-06 3.0000 25 .14112001 .14111999 0.2265E-07 3.1416 0 .00000000 -.00000000 0.0000E+00 3.1416 5 .00000000 -0.14835163E-01 0.1484E-01 3.1416 10 .00000000 -0.11725901E-02 0.1173E-02 3.1416 15 .00000000 -0.12922696E-04 0.1292E-04 3.1416 20 .00000000 0.42874447E-06 -0.4287E-06 3.1416 25 .00000000 0.11511956E-07 -0.1151E-07 4.0000 0 -.75680250 -.00000000 -0.7568E+00 4.0000 5 -.75680250 -.72929659 -0.2751E-01 4.0000 10 -.75680250 -.75673078 -0.7172E-04 4.0000 15 -.75680250 -.75677068 -0.3182E-04 4.0000 20 -.75680250 -.75680185 -0.6500E-06 4.0000 25 -.75680250 -.75680251 0.1229E-07 5.0000 0 -.95892427 .00000000 -0.9589E+00 5.0000 5 -.95892427 -.96547238 0.6548E-02 5.0000 10 -.95892427 -.95855008 -0.3742E-03 5.0000 15 -.95892427 -.95891449 -0.9785E-05 5.0000 20 -.95892427 -.95892477 0.4958E-06 5.0000 25 -.95892427 -.95892428 0.5487E-08 TEST003: ARCTAN_CORDIC computes the arctangent of Y/X using the CORDIC algorithm. X Y N ArcTan(Y/X) ArcTan(Y/X) Difference Tabulated CORDIC 0.2184 0.0000 0 .00000000 .00000000 0.0000E+00 0.2184 0.0000 5 .00000000 -0.14835707E-01 0.1484E-01 0.2184 0.0000 10 .00000000 -0.11725903E-02 0.1173E-02 0.2184 0.0000 15 .00000000 -0.12922696E-04 0.1292E-04 0.2184 0.0000 20 .00000000 0.42874447E-06 -0.4287E-06 0.2184 0.0000 25 .00000000 0.11511956E-07 -0.1151E-07 0.8295 0.2074 0 .24497866 .00000000 0.2450E+00 0.8295 0.2074 5 .24497866 .26354570 -0.1857E-01 0.8295 0.2074 10 .24497866 .24597660 -0.9979E-03 0.8295 0.2074 15 .24497866 .24493901 0.3966E-04 0.8295 0.2074 20 .24497866 .24497906 -0.3965E-06 0.8295 0.2074 25 .24497866 .24497864 0.2076E-07 -0.4153 -0.1384 0 .32175055 .00000000 0.3218E+00 -0.4153 -0.1384 5 .32175055 .26354570 0.5820E-01 -0.4153 -0.1384 10 .32175055 .32017471 0.1576E-02 -0.4153 -0.1384 15 .32175055 .32170059 0.4997E-04 -0.4153 -0.1384 20 .32175055 .32175208 -0.1529E-05 -0.4153 -0.1384 25 .32175055 .32175059 -0.3899E-07 -0.2576 -0.1288 0 .46364761 .00000000 0.4636E+00 -0.2576 -0.1288 5 .46364761 .50479303 -0.4115E-01 -0.2576 -0.1288 10 .46364761 .46378870 -0.1411E-03 -0.2576 -0.1288 15 .46364761 .46360560 0.4201E-04 -0.2576 -0.1288 20 .46364761 .46364947 -0.1859E-05 -0.2576 -0.1288 25 .46364761 .46364762 -0.1144E-07 0.0438 0.0438 0 .78539816 .00000000 0.7854E+00 0.0438 0.0438 5 .78539816 .75350302 0.3190E-01 0.0438 0.0438 10 .78539816 .78669489 -0.1297E-02 0.0438 0.0438 15 .78539816 .78541315 -0.1499E-04 0.0438 0.0438 20 .78539816 .78539980 -0.1638E-05 0.0438 0.0438 25 .78539816 .78539819 -0.2831E-07 -0.0617 -0.1235 0 1.1071487 .00000000 0.1107E+01 -0.0617 -0.1235 5 1.1071487 1.0660033 0.4115E-01 -0.0617 -0.1235 10 1.1071487 1.1070076 0.1411E-03 -0.0617 -0.1235 15 1.1071487 1.1071907 -0.4201E-04 -0.0617 -0.1235 20 1.1071487 1.1071469 0.1859E-05 -0.0617 -0.1235 25 1.1071487 1.1071487 0.1144E-07 0.4013 1.2039 0 1.2490458 .00000000 0.1249E+01 0.4013 1.2039 5 1.2490458 1.1908409 0.5820E-01 0.4013 1.2039 10 1.2490458 1.2474699 0.1576E-02 0.4013 1.2039 15 1.2490458 1.2489958 0.4997E-04 0.4013 1.2039 20 1.2490458 1.2490473 -0.1529E-05 0.4013 1.2039 25 1.2490458 1.2490458 -0.3899E-07 -0.7973 -3.1891 0 1.3258177 .00000000 0.1326E+01 -0.7973 -3.1891 5 1.3258177 1.3072506 0.1857E-01 -0.7973 -3.1891 10 1.3258177 1.3248197 0.9979E-03 -0.7973 -3.1891 15 1.3258177 1.3258573 -0.3966E-04 -0.7973 -3.1891 20 1.3258177 1.3258173 0.3965E-06 -0.7973 -3.1891 25 1.3258177 1.3258177 -0.2076E-07 -0.8975 -4.4875 0 1.3734008 .00000000 0.1373E+01 -0.8975 -4.4875 5 1.3734008 1.4320883 -0.5869E-01 -0.8975 -4.4875 10 1.3734008 1.3715530 0.1848E-02 -0.8975 -4.4875 15 1.3734008 1.3734451 -0.4432E-04 -0.8975 -4.4875 20 1.3734008 1.3734012 -0.4487E-06 -0.8975 -4.4875 25 1.3734008 1.3734008 -0.3151E-07 -0.0945 -0.9454 0 1.4711277 .00000000 0.1471E+01 -0.0945 -0.9454 5 1.4711277 1.4320883 0.3904E-01 -0.0945 -0.9454 10 1.4711277 1.4691864 0.1941E-02 -0.0945 -0.9454 15 1.4711277 1.4710785 0.4922E-04 -0.0945 -0.9454 20 1.4711277 1.4711261 0.1537E-05 -0.0945 -0.9454 25 1.4711277 1.4711276 0.4663E-07 0.8591 17.1819 0 1.5208379 .00000000 0.1521E+01 0.8591 17.1819 5 1.5208379 1.5559606 -0.3512E-01 0.8591 17.1819 10 1.5208379 1.5227688 -0.1931E-02 0.8591 17.1819 15 1.5208379 1.5208767 -0.3873E-04 0.8591 17.1819 20 1.5208379 1.5208366 0.1323E-05 0.8591 17.1819 25 1.5208379 1.5208380 -0.4776E-07 TEST004: ARCCOS_CORDIC computes the arccosine of T using the CORDIC algorithm. T N ArcCos(T) ArcCos(T) Difference Tabulated CORDIC -0.1000 0 1.6709637 .00000000 0.1671E+01 -0.1000 5 1.6709637 1.6345866 0.3638E-01 -0.1000 10 1.6709637 1.6697248 0.1239E-02 -0.1000 15 1.6709637 1.6710676 -0.1038E-03 -0.1000 20 1.6709637 1.6709646 -0.8240E-06 -0.1000 25 1.6709637 1.6709637 0.1046E-07 0.0000 0 1.5707963 .00000000 0.1571E+01 0.0000 5 1.5707963 1.6345866 -0.6379E-01 0.0000 10 1.5707963 1.5682029 0.2593E-02 0.0000 15 1.5707963 1.5707663 0.2998E-04 0.0000 20 1.5707963 1.5707931 0.3275E-05 0.0000 25 1.5707963 1.5707963 0.5662E-07 0.1000 0 1.4706289 .00000000 0.1471E+01 0.1000 5 1.4706289 1.5070060 -0.3638E-01 0.1000 10 1.4706289 1.4718679 -0.1239E-02 0.1000 15 1.4706289 1.4705251 0.1038E-03 0.1000 20 1.4706289 1.4706281 0.8240E-06 0.1000 25 1.4706289 1.4706289 -0.1046E-07 0.2000 0 1.3694384 .00000000 0.1369E+01 0.2000 5 1.3694384 1.2573308 0.1121E+00 0.2000 10 1.3694384 1.3705888 -0.1150E-02 0.2000 15 1.3694384 1.3694902 -0.5179E-04 0.2000 20 1.3694384 1.3694406 -0.2196E-05 0.2000 25 1.3694384 1.3694383 0.6871E-07 0.3000 0 1.2661037 .00000000 0.1266E+01 0.3000 5 1.2661037 1.2573308 0.8773E-02 0.3000 10 1.2661037 1.2690321 -0.2928E-02 0.3000 15 1.2661037 1.2662245 -0.1208E-03 0.3000 20 1.2661037 1.2661062 -0.2572E-05 0.3000 25 1.2661037 1.2661037 -0.6813E-07 0.4000 0 1.1592795 .00000000 0.1159E+01 0.4000 5 1.1592795 1.2573308 -0.9805E-01 0.4000 10 1.1592795 1.1596977 -0.4182E-03 0.4000 15 1.1592795 1.1593315 -0.5201E-04 0.4000 20 1.1592795 1.1592819 -0.2421E-05 0.4000 25 1.1592795 1.1592794 0.8237E-07 0.5000 0 1.0471976 .00000000 0.1047E+01 0.5000 5 1.0471976 1.0095861 0.3761E-01 0.5000 10 1.0471976 1.0447243 0.2473E-02 0.5000 15 1.0471976 1.0472877 -0.9018E-04 0.5000 20 1.0471976 1.0472000 -0.2439E-05 0.5000 25 1.0471976 1.0471975 0.6437E-07 0.6000 0 .92729522 .00000000 0.9273E+00 0.6000 5 .92729522 1.0095861 -0.8229E-01 0.6000 10 .92729522 .92757741 -0.2822E-03 0.6000 15 .92729522 .92721120 0.8402E-04 0.6000 20 .92729522 .92729894 -0.3718E-05 0.6000 25 .92729522 .92729524 -0.2288E-07 0.7000 0 .79539883 .00000000 0.7954E+00 0.7000 5 .79539883 .75991083 0.3549E-01 0.7000 10 .79539883 .79504901 0.3498E-03 0.7000 15 .79539883 .79541522 -0.1639E-04 0.7000 20 .79539883 .79539615 0.2681E-05 0.7000 25 .79539883 .79539889 -0.6095E-07 0.8000 0 .64350111 .00000000 0.6435E+00 0.8000 5 .64350111 .75991083 -0.1164E+00 0.8000 10 .64350111 .64665280 -0.3152E-02 0.8000 15 .64350111 .64360105 -0.9994E-04 0.8000 20 .64350111 .64349805 0.3058E-05 0.8000 25 .64350111 .64350103 0.7798E-07 0.9000 0 .45102681 .00000000 0.4510E+00 0.9000 5 .45102681 .52709139 -0.7606E-01 0.9000 10 .45102681 .45289516 -0.1868E-02 0.9000 15 .45102681 .45106411 -0.3730E-04 0.9000 20 .45102681 .45102978 -0.2967E-05 0.9000 25 .45102681 .45102680 0.1356E-07 1.0000 0 .00000000 .00000000 0.0000E+00 1.0000 5 .00000000 0.29671413E-01 -0.2967E-01 1.0000 10 .00000000 0.23451806E-02 -0.2345E-02 1.0000 15 .00000000 0.25845392E-04 -0.2585E-04 1.0000 20 .00000000 -0.85748894E-06 0.8575E-06 1.0000 25 .00000000 -0.23023911E-07 0.2302E-07 TEST005: ARCSIN_CORDIC computes the arcsine of T using the CORDIC algorithm. T N ArcSin(T) ArcSin(T) Difference Tabulated CORDIC -0.1000 0 -.10016742 .00000000 -0.1002E+00 -0.1000 5 -.10016742 -0.29671413E-01 -0.7050E-01 -0.1000 10 -.10016742 -.10386764 0.3700E-02 -0.1000 15 -.10016742 -.10008346 -0.8396E-04 -0.1000 20 -.10016742 -.10017120 0.3778E-05 -0.1000 25 -.10016742 -.10016750 0.8260E-07 0.0000 0 .00000000 .00000000 0.0000E+00 0.0000 5 .00000000 0.29671413E-01 -0.2967E-01 0.0000 10 .00000000 0.23451806E-02 -0.2345E-02 0.0000 15 .00000000 0.25845392E-04 -0.2585E-04 0.0000 20 .00000000 -0.85748894E-06 0.8575E-06 0.0000 25 .00000000 -0.23023911E-07 0.2302E-07 0.1000 0 .10016742 .00000000 0.1002E+00 0.1000 5 .10016742 0.29671413E-01 0.7050E-01 0.1000 10 .10016742 .10386764 -0.3700E-02 0.1000 15 .10016742 .10008346 0.8396E-04 0.1000 20 .10016742 .10017120 -0.3778E-05 0.1000 25 .10016742 .10016750 -0.8260E-07 0.2000 0 .20135792 .00000000 0.2014E+00 0.2000 5 .20135792 .27741615 -0.7606E-01 0.2000 10 .20135792 .20321992 -0.1862E-02 0.2000 15 .20135792 .20138887 -0.3095E-04 0.2000 20 .20135792 .20135454 0.3382E-05 0.2000 25 .20135792 .20135800 -0.7476E-07 0.3000 0 .30469265 .00000000 0.3047E+00 0.3000 5 .30469265 .27741615 0.2728E-01 0.3000 10 .30469265 .30474238 -0.4973E-04 0.3000 15 .30469265 .30462031 0.7234E-04 0.3000 20 .30469265 .30469279 -0.1399E-06 0.3000 25 .30469265 .30469267 -0.2068E-07 0.4000 0 .41151685 .00000000 0.4115E+00 0.4000 5 .41151685 .52709139 -0.1156E+00 0.4000 10 .41151685 .41383337 -0.2317E-02 0.4000 15 .41151685 .41151403 0.2811E-05 0.4000 20 .41151685 .41151785 -0.1004E-05 0.4000 25 .41151685 .41151678 0.6933E-07 0.5000 0 .52359878 .00000000 0.5236E+00 0.5000 5 .52359878 .52709139 -0.3493E-02 0.5000 10 .52359878 .52320257 0.3962E-03 0.5000 15 .52359878 .52356878 0.3000E-04 0.5000 20 .52359878 .52359548 0.3293E-05 0.5000 25 .52359878 .52359870 0.7424E-07 0.6000 0 .64350111 .00000000 0.6435E+00 0.6000 5 .64350111 .75991083 -0.1164E+00 0.6000 10 .64350111 .64665280 -0.3152E-02 0.6000 15 .64350111 .64360105 -0.9994E-04 0.6000 20 .64350111 .64349805 0.3058E-05 0.6000 25 .64350111 .64350103 0.7798E-07 0.7000 0 .77539750 .00000000 0.7754E+00 0.7000 5 .77539750 .75991083 0.1549E-01 0.7000 10 .77539750 .77161214 0.3785E-02 0.7000 15 .77539750 .77539632 0.1179E-05 0.7000 20 .77539750 .77540013 -0.2635E-05 0.7000 25 .77539750 .77539739 0.1065E-06 0.8000 0 .92729522 .00000000 0.9273E+00 0.8000 5 .92729522 1.0095861 -0.8229E-01 0.8000 10 .92729522 .92757741 -0.2822E-03 0.8000 15 .92729522 .92721120 0.8402E-04 0.8000 20 .92729522 .92729894 -0.3718E-05 0.8000 25 .92729522 .92729524 -0.2288E-07 0.9000 0 1.1197695 .00000000 0.1120E+01 0.9000 5 1.1197695 1.0095861 0.1102E+00 0.9000 10 1.1197695 1.1228441 -0.3075E-02 0.9000 15 1.1197695 1.1197923 -0.2282E-04 0.9000 20 1.1197695 1.1197733 -0.3742E-05 0.9000 25 1.1197695 1.1197696 -0.4632E-07 1.0000 0 1.5707963 .00000000 0.1571E+01 1.0000 5 1.5707963 1.6345866 -0.6379E-01 1.0000 10 1.5707963 1.5682029 0.2593E-02 1.0000 15 1.5707963 1.5707663 0.2998E-04 1.0000 20 1.5707963 1.5707931 0.3275E-05 1.0000 25 1.5707963 1.5707963 0.5662E-07 TEST006: TAN_CORDIC computes the tangent of THETA using the CORDIC algorithm. THETA N Tan(THETA) Tan(THETA) Difference Tabulated CORDIC 0.0000 0 .00000000 .00000000 0.0000E+00 0.0000 5 .00000000 0.14836795E-01 -0.1484E-01 0.0000 10 .00000000 0.11725909E-02 -0.1173E-02 0.0000 15 .00000000 0.12922696E-04 -0.1292E-04 0.0000 20 .00000000 -0.42874447E-06 0.4287E-06 0.0000 25 .00000000 -0.11511956E-07 0.1151E-07 0.2618 0 .26794919 .00000000 0.2679E+00 0.2618 5 .26794919 .26982176 -0.1873E-02 0.2618 10 .26794919 .26773688 0.2123E-03 0.2618 15 .26794919 .26793312 0.1607E-04 0.2618 20 .26794919 .26794743 0.1765E-05 0.2618 25 .26794919 .26794915 0.3978E-07 0.5000 0 .54630249 .00000000 0.5463E+00 0.5000 5 .54630249 .55254237 -0.6240E-02 0.5000 10 .54630249 .54493002 0.1372E-02 0.5000 15 .54630249 .54627649 0.2600E-04 0.5000 20 .54630249 .54630373 -0.1240E-05 0.5000 25 .54630249 .54630241 0.7569E-07 0.5236 0 .57735027 .00000000 0.5774E+00 0.5236 5 .57735027 .55254237 0.2481E-01 0.5236 10 .57735027 .57570258 0.1648E-02 0.5236 15 .57735027 .57741039 -0.6012E-04 0.5236 20 .57735027 .57735190 -0.1626E-05 0.5236 25 .57735027 .57735023 0.4291E-07 0.7854 0 1.0000000 .00000000 0.1000E+01 0.7854 5 1.0000000 1.0659150 -0.6592E-01 0.7854 10 1.0000000 .99740990 0.2590E-02 0.7854 15 1.0000000 .99997002 0.2998E-04 0.7854 20 1.0000000 .99999672 0.3275E-05 0.7854 25 1.0000000 .99999994 0.5662E-07 1.0000 0 1.5574077 .00000000 0.1557E+01 1.0000 5 1.5574077 1.3753784 0.1820E+00 1.0000 10 1.5574077 1.5531680 0.4240E-02 1.0000 15 1.5574077 1.5575505 -0.1428E-03 1.0000 20 1.5574077 1.5574133 -0.5546E-05 1.0000 25 1.5574077 1.5574078 -0.3335E-07 1.0472 0 1.7320508 .00000000 0.1732E+01 1.0472 5 1.7320508 1.8098160 -0.7777E-01 1.0472 10 1.7320508 1.7370080 -0.4957E-02 1.0472 15 1.7320508 1.7318705 0.1803E-03 1.0472 20 1.7320508 1.7320459 0.4878E-05 1.0472 25 1.7320508 1.7320509 -0.1287E-06 1.3090 0 3.7320508 .00000000 0.3732E+01 1.3090 5 3.7320508 3.7061503 0.2590E-01 1.3090 10 3.7320508 3.7350103 -0.2960E-02 1.3090 15 3.7320508 3.7322747 -0.2239E-03 1.3090 20 3.7320508 3.7320754 -0.2458E-04 1.3090 25 3.7320508 3.7320514 -0.5541E-06 1.4399 0 7.5957541 .00000000 0.7596E+01 1.4399 5 7.5957541 7.1630901 0.4327E+00 1.4399 10 7.5957541 7.7118399 -0.1161E+00 1.4399 15 7.5957541 7.5990660 -0.3312E-02 1.4399 20 7.5957541 7.5958179 -0.6379E-04 1.4399 25 7.5957541 7.5957514 0.2679E-05 1.5053 0 15.257052 .00000000 0.1526E+02 1.5053 5 15.257052 67.400000 -0.5214E+02 1.5053 10 15.257052 15.689139 -0.4321E+00 1.5053 15 15.257052 15.263500 -0.6448E-02 1.5053 20 15.257052 15.256809 0.2430E-03 1.5053 25 15.257052 15.257046 0.6162E-05 2.0000 0 -2.1850399 .00000000 -0.2185E+01 2.0000 5 -2.1850399 -2.5040000 0.3190E+00 2.0000 10 -2.1850399 -2.1875351 0.2495E-02 2.0000 15 -2.1850399 -2.1850656 0.2578E-04 2.0000 20 -2.1850399 -2.1850326 -0.7265E-05 2.0000 25 -2.1850399 -2.1850398 -0.3703E-07 3.0000 0 -.14254654 .00000000 -0.1425E+00 3.0000 5 -.14254654 -.13960455 -0.2942E-02 3.0000 10 -.14254654 -.14158740 -0.9591E-03 3.0000 15 -.14254654 -.14252140 -0.2514E-04 3.0000 20 -.14254654 -.14254670 0.1591E-06 3.0000 25 -.14254654 -.14254652 -0.2335E-07 3.1416 0 .00000000 .00000000 0.0000E+00 3.1416 5 .00000000 0.14836795E-01 -0.1484E-01 3.1416 10 .00000000 0.11725909E-02 -0.1173E-02 3.1416 15 .00000000 0.12922696E-04 -0.1292E-04 3.1416 20 .00000000 -0.42874447E-06 0.4287E-06 3.1416 25 .00000000 -0.11511956E-07 0.1151E-07 4.0000 0 1.1578213 .00000000 0.1158E+01 4.0000 5 1.1578213 1.0659150 0.9191E-01 4.0000 10 1.1578213 1.1575645 0.2568E-03 4.0000 15 1.1578213 1.1577074 0.1139E-03 4.0000 20 1.1578213 1.1578190 0.2328E-05 4.0000 25 1.1578213 1.1578213 -0.4402E-07 5.0000 0 -3.3805150 .00000000 -0.3381E+01 5.0000 5 -3.3805150 -3.7061503 0.3256E+00 5.0000 10 -3.3805150 -3.3642295 -0.1629E-01 5.0000 15 -3.3805150 -3.3800864 -0.4286E-03 5.0000 20 -3.3805150 -3.3805367 0.2172E-04 5.0000 25 -3.3805150 -3.3805152 0.2404E-06 TEST007: EXP_CORDIC computes the exponential function using the CORDIC algorithm. X N Exp(X) Exp(X) Difference Tabulated CORDIC -10.0000 0 0.45399930E-04 0.45399930E-04 -0.2711E-19 -10.0000 5 0.45399930E-04 0.45399930E-04 -0.2711E-19 -10.0000 10 0.45399930E-04 0.45399930E-04 -0.2711E-19 -10.0000 15 0.45399930E-04 0.45399930E-04 -0.2711E-19 -10.0000 20 0.45399930E-04 0.45399930E-04 -0.2711E-19 -10.0000 25 0.45399930E-04 0.45399930E-04 -0.2711E-19 -5.0000 0 0.67379470E-02 0.67379470E-02 -0.2602E-17 -5.0000 5 0.67379470E-02 0.67379470E-02 -0.2602E-17 -5.0000 10 0.67379470E-02 0.67379470E-02 -0.2602E-17 -5.0000 15 0.67379470E-02 0.67379470E-02 -0.2602E-17 -5.0000 20 0.67379470E-02 0.67379470E-02 -0.2602E-17 -5.0000 25 0.67379470E-02 0.67379470E-02 -0.2602E-17 -1.0000 0 .36787944 .36787944 0.0000E+00 -1.0000 5 .36787944 .36787944 0.0000E+00 -1.0000 10 .36787944 .36787944 0.0000E+00 -1.0000 15 .36787944 .36787944 0.0000E+00 -1.0000 20 .36787944 .36787944 0.0000E+00 -1.0000 25 .36787944 .36787944 0.0000E+00 0.0000 0 1.0000000 1.0000000 0.0000E+00 0.0000 5 1.0000000 1.0000000 0.0000E+00 0.0000 10 1.0000000 1.0000000 0.0000E+00 0.0000 15 1.0000000 1.0000000 0.0000E+00 0.0000 20 1.0000000 1.0000000 0.0000E+00 0.0000 25 1.0000000 1.0000000 0.0000E+00 0.1000 0 1.1051709 1.1051708 0.8474E-07 0.1000 5 1.1051709 1.1051709 0.8749E-13 0.1000 10 1.1051709 1.1051709 -0.4441E-15 0.1000 15 1.1051709 1.1051709 -0.8882E-15 0.1000 20 1.1051709 1.1051709 -0.1110E-14 0.1000 25 1.1051709 1.1051709 -0.1332E-14 0.2000 0 1.2214028 1.2214000 0.2758E-05 0.2000 5 1.2214028 1.2214028 0.3075E-11 0.2000 10 1.2214028 1.2214028 -0.4841E-13 0.2000 15 1.2214028 1.2214028 -0.4796E-13 0.2000 20 1.2214028 1.2214028 -0.4774E-13 0.2000 25 1.2214028 1.2214028 -0.4796E-13 0.3000 0 1.3498588 1.3498375 0.2131E-04 0.3000 5 1.3498588 1.3498588 0.2566E-10 0.3000 10 1.3498588 1.3498588 -0.1998E-14 0.3000 15 1.3498588 1.3498588 -0.1998E-14 0.3000 20 1.3498588 1.3498588 -0.1776E-14 0.3000 25 1.3498588 1.3498588 -0.1776E-14 0.4000 0 1.4918247 1.4917333 0.9136E-04 0.4000 5 1.4918247 1.4918247 0.1189E-09 0.4000 10 1.4918247 1.4918247 -0.6062E-13 0.4000 15 1.4918247 1.4918247 -0.5951E-13 0.4000 20 1.4918247 1.4918247 -0.5929E-13 0.4000 25 1.4918247 1.4918247 -0.5951E-13 0.5000 0 1.6487213 1.6484375 0.2838E-03 0.5000 5 1.6487213 1.6487213 0.3989E-09 0.5000 10 1.6487213 1.6487213 -0.6750E-13 0.5000 15 1.6487213 1.6487213 -0.6661E-13 0.5000 20 1.6487213 1.6487213 -0.6661E-13 0.5000 25 1.6487213 1.6487213 -0.6684E-13 0.6000 0 1.8221188 1.8214000 0.7188E-03 0.6000 5 1.8221188 1.8221188 0.1441E-12 0.6000 10 1.8221188 1.8221188 -0.8882E-15 0.6000 15 1.8221188 1.8221188 -0.1332E-14 0.6000 20 1.8221188 1.8221188 -0.1110E-14 0.6000 25 1.8221188 1.8221188 -0.1110E-14 0.7000 0 2.0137527 2.0121708 0.1582E-02 0.7000 5 2.0137527 2.0137527 0.5070E-11 0.7000 10 2.0137527 2.0137527 -0.7905E-13 0.7000 15 2.0137527 2.0137527 -0.7816E-13 0.7000 20 2.0137527 2.0137527 -0.7816E-13 0.7000 25 2.0137527 2.0137527 -0.7816E-13 0.8000 0 2.2255409 2.2224000 0.3141E-02 0.8000 5 2.2255409 2.2255409 0.4231E-10 0.8000 10 2.2255409 2.2255409 -0.3553E-14 0.8000 15 2.2255409 2.2255409 -0.3997E-14 0.8000 20 2.2255409 2.2255409 -0.3553E-14 0.8000 25 2.2255409 2.2255409 -0.3997E-14 0.9000 0 2.4596031 2.4538375 0.5766E-02 0.9000 5 2.4596031 2.4596031 0.1960E-09 0.9000 10 2.4596031 2.4596031 -0.9948E-13 0.9000 15 2.4596031 2.4596031 -0.9814E-13 0.9000 20 2.4596031 2.4596031 -0.9770E-13 0.9000 25 2.4596031 2.4596031 -0.9770E-13 1.0000 0 2.7182818 2.7182818 0.0000E+00 1.0000 5 2.7182818 2.7182818 0.0000E+00 1.0000 10 2.7182818 2.7182818 0.0000E+00 1.0000 15 2.7182818 2.7182818 0.0000E+00 1.0000 20 2.7182818 2.7182818 0.0000E+00 1.0000 25 2.7182818 2.7182818 0.0000E+00 2.0000 0 7.3890561 7.3890561 0.8882E-15 2.0000 5 7.3890561 7.3890561 0.8882E-15 2.0000 10 7.3890561 7.3890561 0.8882E-15 2.0000 15 7.3890561 7.3890561 0.8882E-15 2.0000 20 7.3890561 7.3890561 0.8882E-15 2.0000 25 7.3890561 7.3890561 0.8882E-15 3.1416 0 23.140693 23.140683 0.9755E-05 3.1416 5 23.140693 23.140693 0.2392E-09 3.1416 10 23.140693 23.140693 0.7105E-14 3.1416 15 23.140693 23.140693 0.1421E-13 3.1416 20 23.140693 23.140693 0.1421E-13 3.1416 25 23.140693 23.140693 0.2842E-13 5.0000 0 148.41316 148.41316 0.2842E-13 5.0000 5 148.41316 148.41316 0.2842E-13 5.0000 10 148.41316 148.41316 0.2842E-13 5.0000 15 148.41316 148.41316 0.2842E-13 5.0000 20 148.41316 148.41316 0.2842E-13 5.0000 25 148.41316 148.41316 0.2842E-13 10.0000 0 22026.466 22026.466 0.1091E-10 10.0000 5 22026.466 22026.466 0.1091E-10 10.0000 10 22026.466 22026.466 0.1091E-10 10.0000 15 22026.466 22026.466 0.1091E-10 10.0000 20 22026.466 22026.466 0.1091E-10 10.0000 25 22026.466 22026.466 0.1091E-10 20.0000 0 0.48516520E+09 0.48516520E+09 0.4768E-06 20.0000 5 0.48516520E+09 0.48516520E+09 0.4768E-06 20.0000 10 0.48516520E+09 0.48516520E+09 0.4768E-06 20.0000 15 0.48516520E+09 0.48516520E+09 0.4768E-06 20.0000 20 0.48516520E+09 0.48516520E+09 0.4768E-06 20.0000 25 0.48516520E+09 0.48516520E+09 0.4768E-06 TEST008: LN_CORDIC computes the natural logarithm function using the CORDIC algorithm. X N Ln(X) Ln(X) Difference Tabulated CORDIC 0.100000E-04 0 -11.512925 -11.604088 0.9116E-01 0.100000E-04 5 -11.512925 -11.512929 0.3129E-05 0.100000E-04 10 -11.512925 -11.512925 0.2081E-09 0.100000E-04 15 -11.512925 -11.512925 0.1776E-14 0.100000E-04 20 -11.512925 -11.512925 0.0000E+00 0.100000E-04 25 -11.512925 -11.512925 0.0000E+00 0.100000E-01 0 -4.6051702 -4.6496832 0.4451E-01 0.100000E-01 5 -4.6051702 -4.6051742 0.3970E-05 0.100000E-01 10 -4.6051702 -4.6051702 0.1331E-10 0.100000E-01 15 -4.6051702 -4.6051702 0.7105E-14 0.100000E-01 20 -4.6051702 -4.6051702 0.8882E-15 0.100000E-01 25 -4.6051702 -4.6051702 0.0000E+00 .100000 0 -2.3025851 -2.6279061 0.3253E+00 .100000 5 -2.3025851 -2.3025856 0.4918E-06 .100000 10 -2.3025851 -2.3025851 0.1703E-11 .100000 15 -2.3025851 -2.3025851 0.4885E-13 .100000 20 -2.3025851 -2.3025851 0.3908E-13 .100000 25 -2.3025851 -2.3025851 0.3908E-13 .200000 0 -1.6094379 -1.6523498 0.4291E-01 .200000 5 -1.6094379 -1.6094398 0.1912E-05 .200000 10 -1.6094379 -1.6094379 0.3817E-09 .200000 15 -1.6094379 -1.6094379 0.5240E-13 .200000 20 -1.6094379 -1.6094379 0.4086E-13 .200000 25 -1.6094379 -1.6094379 0.4086E-13 .300000 0 -1.2039728 -1.7323717 0.5284E+00 .300000 5 -1.2039728 -1.2039744 0.1635E-05 .300000 10 -1.2039728 -1.2039728 0.1109E-11 .300000 15 -1.2039728 -1.2039728 0.4174E-13 .300000 20 -1.2039728 -1.2039728 0.4174E-13 .300000 25 -1.2039728 -1.2039728 0.4174E-13 .400000 0 -.91629073 -.91660754 0.3168E-03 .400000 5 -.91629073 -.91629560 0.4864E-05 .400000 10 -.91629073 -.91629073 0.1727E-09 .400000 15 -.91629073 -.91629073 0.1377E-13 .400000 20 -.91629073 -.91629073 0.2220E-15 .400000 25 -.91629073 -.91629073 0.2220E-15 .500000 0 -.69314718 -.71237746 0.1923E-01 .500000 5 -.69314718 -.69315577 0.8591E-05 .500000 10 -.69314718 -.69314718 0.4819E-11 .500000 15 -.69314718 -.69314718 0.5351E-13 .500000 20 -.69314718 -.69314718 0.4119E-13 .500000 25 -.69314718 -.69314718 0.4119E-13 .600000 0 -.51082562 -.60335480 0.9253E-01 .600000 5 -.51082562 -.51082996 0.4341E-05 .600000 10 -.51082562 -.51082562 0.3565E-09 .600000 15 -.51082562 -.51082562 0.5551E-15 .600000 20 -.51082562 -.51082562 0.2220E-15 .600000 25 -.51082562 -.51082562 0.2220E-15 .700000 0 -.35667494 -.59968165 0.2430E+00 .700000 5 -.35667494 -.35667807 0.3129E-05 .700000 10 -.35667494 -.35667494 0.2085E-09 .700000 15 -.35667494 -.35667494 0.1388E-14 .700000 20 -.35667494 -.35667494 -0.1665E-15 .700000 25 -.35667494 -.35667494 -0.5551E-16 .800000 0 -.22314355 -.70604028 0.4829E+00 .800000 5 -.22314355 -.22315348 0.9927E-05 .800000 10 -.22314355 -.22314355 0.5863E-10 .800000 15 -.22314355 -.22314355 0.4047E-13 .800000 20 -.22314355 -.22314355 0.4047E-13 .800000 25 -.22314355 -.22314355 0.4047E-13 .900000 0 -.10536052 -.92165316 0.8163E+00 .900000 5 -.10536052 -.10536437 0.3856E-05 .900000 10 -.10536052 -.10536052 0.6346E-12 .900000 15 -.10536052 -.10536052 0.2928E-14 .900000 20 -.10536052 -.10536052 0.5967E-15 .900000 25 -.10536052 -.10536052 0.7078E-15 1.00000 0 .00000000 .00000000 0.0000E+00 1.00000 5 .00000000 .00000000 0.0000E+00 1.00000 10 .00000000 .00000000 0.0000E+00 1.00000 15 .00000000 .00000000 0.0000E+00 1.00000 20 .00000000 .00000000 0.0000E+00 1.00000 25 .00000000 .00000000 0.0000E+00 2.00000 0 .69314718 .37500000 0.3181E+00 2.00000 5 .69314718 .69314709 0.9051E-07 2.00000 10 .69314718 .69314718 0.2235E-09 2.00000 15 .69314718 .69314718 -0.4441E-15 2.00000 20 .69314718 .69314718 -0.3331E-15 2.00000 25 .69314718 .69314718 -0.3331E-15 3.00000 0 1.0986123 1.0980872 0.5251E-03 3.00000 5 1.0986123 1.0986122 0.5773E-07 3.00000 10 1.0986123 1.0986123 0.4373E-09 3.00000 15 1.0986123 1.0986123 0.4441E-15 3.00000 20 1.0986123 1.0986123 0.0000E+00 3.00000 25 1.0986123 1.0986123 0.0000E+00 3.14159 0 1.1447299 1.1429969 0.1733E-02 3.14159 5 1.1447299 1.1447260 0.3910E-05 3.14159 10 1.1447299 1.1447299 0.3920E-11 3.14159 15 1.1447299 1.1447299 0.2220E-14 3.14159 20 1.1447299 1.1447299 0.4441E-15 3.14159 25 1.1447299 1.1447299 0.4441E-15 5.00000 0 1.6094379 1.4092170 0.2002E+00 5.00000 5 1.6094379 1.6094360 0.1958E-05 5.00000 10 1.6094379 1.6094379 0.1241E-12 5.00000 15 1.6094379 1.6094379 -0.4441E-15 5.00000 20 1.6094379 1.6094379 -0.4441E-15 5.00000 25 1.6094379 1.6094379 -0.4441E-15 10.0000 0 2.3025851 2.2842201 0.1836E-01 10.0000 5 2.3025851 2.3025801 0.4952E-05 10.0000 10 2.3025851 2.3025851 0.2833E-09 10.0000 15 2.3025851 2.3025851 0.1332E-14 10.0000 20 2.3025851 2.3025851 0.1332E-14 10.0000 25 2.3025851 2.3025851 0.1332E-14 20.0000 0 2.9957323 1.7752498 0.1220E+01 20.0000 5 2.9957323 2.9957222 0.1007E-04 20.0000 10 2.9957323 2.9957323 0.1165E-09 20.0000 15 2.9957323 2.9957323 0.3997E-13 20.0000 20 2.9957323 2.9957323 0.3952E-13 20.0000 25 2.9957323 2.9957323 0.3997E-13 100.000 0 4.6051702 4.4099009 0.1953E+00 100.000 5 4.6051702 4.6051694 0.7526E-06 100.000 10 4.6051702 4.6051702 0.1560E-09 100.000 15 4.6051702 4.6051702 0.3997E-13 100.000 20 4.6051702 4.6051702 0.3997E-13 100.000 25 4.6051702 4.6051702 0.3997E-13 0.123457E+09 0 18.631402 18.404171 0.2272E+00 0.123457E+09 5 18.631402 18.631402 0.1320E-06 0.123457E+09 10 18.631402 18.631402 0.7982E-10 0.123457E+09 15 18.631402 18.631402 0.7105E-14 0.123457E+09 20 18.631402 18.631402 0.0000E+00 0.123457E+09 25 18.631402 18.631402 0.0000E+00 TEST009: SQRT_CORDIC computes the square root function using the CORDIC algorithm. X N Sqrt(X) Sqrt(X) Difference Tabulated CORDIC .000000 0 .00000000 .00000000 0.0000E+00 .000000 5 .00000000 .00000000 0.0000E+00 .000000 10 .00000000 .00000000 0.0000E+00 .000000 15 .00000000 .00000000 0.0000E+00 .000000 20 .00000000 .00000000 0.0000E+00 .000000 25 .00000000 .00000000 0.0000E+00 0.810000E-08 0 0.90000000E-04 0.61035156E-04 0.2896E-04 0.810000E-08 5 0.90000000E-04 0.89645386E-04 0.3546E-06 0.810000E-08 10 0.90000000E-04 0.89943409E-04 0.5659E-07 0.810000E-08 15 0.90000000E-04 0.89999288E-04 0.7121E-09 0.810000E-08 20 0.90000000E-04 0.89999987E-04 0.1360E-10 0.810000E-08 25 0.90000000E-04 0.90000000E-04 0.8641E-12 0.900000E-01 0 .30000000 .25000000 0.5000E-01 0.900000E-01 5 .30000000 .29687500 0.3125E-02 0.900000E-01 10 .30000000 .29980469 0.1953E-03 0.900000E-01 15 .30000000 .29999542 0.4578E-05 0.900000E-01 20 .30000000 .29999995 0.4768E-07 0.900000E-01 25 .30000000 .30000000 0.2980E-08 .100000 0 .31622777 .25000000 0.6623E-01 .100000 5 .31622777 .31250000 0.3728E-02 .100000 10 .31622777 .31616211 0.6566E-04 .100000 15 .31622777 .31622314 0.4621E-05 .100000 20 .31622777 .31622767 0.9153E-07 .100000 25 .31622777 .31622776 0.2126E-08 .400000 0 .63245553 .50000000 0.1325E+00 .400000 5 .63245553 .62500000 0.7456E-02 .400000 10 .63245553 .63232422 0.1313E-03 .400000 15 .63245553 .63244629 0.9243E-05 .400000 20 .63245553 .63245535 0.1831E-06 .400000 25 .63245553 .63245553 0.4251E-08 1.00000 0 1.0000000 1.0000000 0.0000E+00 1.00000 5 1.0000000 1.0000000 0.0000E+00 1.00000 10 1.0000000 1.0000000 0.0000E+00 1.00000 15 1.0000000 1.0000000 0.0000E+00 1.00000 20 1.0000000 1.0000000 0.0000E+00 1.00000 25 1.0000000 1.0000000 0.0000E+00 2.00000 0 1.4142136 1.0000000 0.4142E+00 2.00000 5 1.4142136 1.3750000 0.3921E-01 2.00000 10 1.4142136 1.4140625 0.1511E-03 2.00000 15 1.4142136 1.4141846 0.2899E-04 2.00000 20 1.4142136 1.4142132 0.3818E-06 2.00000 25 1.4142136 1.4142135 0.2420E-07 3.00000 0 1.7320508 1.0000000 0.7321E+00 3.00000 5 1.7320508 1.6875000 0.4455E-01 3.00000 10 1.7320508 1.7304688 0.1582E-02 3.00000 15 1.7320508 1.7319946 0.5618E-04 3.00000 20 1.7320508 1.7320499 0.8656E-06 3.00000 25 1.7320508 1.7320508 0.3109E-07 3.14159 0 1.7724539 1.0000000 0.7725E+00 3.14159 5 1.7724539 1.7500000 0.2245E-01 3.14159 10 1.7724539 1.7714844 0.9695E-03 3.14159 15 1.7724539 1.7723999 0.5395E-04 3.14159 20 1.7724539 1.7724533 0.5428E-06 3.14159 25 1.7724539 1.7724538 0.6358E-08 19.0000 0 4.3588989 4.0000000 0.3589E+00 19.0000 5 4.3588989 4.2500000 0.1089E+00 19.0000 10 4.3588989 4.3515625 0.7336E-02 19.0000 15 4.3588989 4.3588867 0.1222E-04 19.0000 20 4.3588989 4.3588943 0.4595E-05 19.0000 25 4.3588989 4.3588989 0.6544E-07 29.0000 0 5.3851648 4.0000000 0.1385E+01 29.0000 5 5.3851648 5.2500000 0.1352E+00 29.0000 10 5.3851648 5.3828125 0.2352E-02 29.0000 15 5.3851648 5.3850098 0.1550E-03 29.0000 20 5.3851648 5.3851624 0.2454E-05 29.0000 25 5.3851648 5.3851647 0.6943E-07 71.0000 0 8.4261498 8.0000000 0.4261E+00 71.0000 5 8.4261498 8.0000000 0.4261E+00 71.0000 10 8.4261498 8.4218750 0.4275E-02 71.0000 15 8.4261498 8.4257812 0.3685E-03 71.0000 20 8.4261498 8.4261475 0.2312E-05 71.0000 25 8.4261498 8.4261494 0.4049E-06 97.0000 0 9.8488578 8.0000000 0.1849E+01 97.0000 5 9.8488578 9.5000000 0.3489E+00 97.0000 10 9.8488578 9.8437500 0.5108E-02 97.0000 15 9.8488578 9.8486328 0.2250E-03 97.0000 20 9.8488578 9.8488464 0.1137E-04 97.0000 25 9.8488578 9.8488574 0.3990E-06 0.123457E+09 0 11111.111 8192.0000 0.2919E+04 0.123457E+09 5 11111.111 10752.000 0.3591E+03 0.123457E+09 10 11111.111 11104.000 0.7111E+01 0.123457E+09 15 11111.111 11111.000 0.1111E+00 0.123457E+09 20 11111.111 11111.109 0.1686E-02 0.123457E+09 25 11111.111 11111.111 0.2207E-03 TEST010: CBRT_CORDIC computes the cube root function using the CORDIC algorithm. X N Cbrt(X) Cbrt(X) Difference Tabulated CORDIC .000000 0 .00000000 .00000000 0.0000E+00 .000000 5 .00000000 .00000000 0.0000E+00 .000000 10 .00000000 .00000000 0.0000E+00 .000000 15 .00000000 .00000000 0.0000E+00 .000000 20 .00000000 .00000000 0.0000E+00 .000000 25 .00000000 .00000000 0.0000E+00 -0.810000E-08 0 -0.20082989E-02 -0.19531250E-02 -0.5517E-04 -0.810000E-08 5 -0.20082989E-02 -0.19531250E-02 -0.5517E-04 -0.810000E-08 10 -0.20082989E-02 -0.20065308E-02 -0.1768E-05 -0.810000E-08 15 -0.20082989E-02 -0.20082593E-02 -0.3956E-07 -0.810000E-08 20 -0.20082989E-02 -0.20082984E-02 -0.4444E-09 -0.810000E-08 25 -0.20082989E-02 -0.20082988E-02 -0.3692E-10 0.900000E-01 0 .44814047 .25000000 0.1981E+00 0.900000E-01 5 .44814047 .44531250 0.2828E-02 0.900000E-01 10 .44814047 .44799805 0.1424E-03 0.900000E-01 15 .44814047 .44813538 0.5099E-05 0.900000E-01 20 .44814047 .44814038 0.9189E-07 0.900000E-01 25 .44814047 .44814047 0.2482E-08 -.100000 0 -.46415888 -.25000000 -0.2142E+00 -.100000 5 -.46415888 -.46093750 -0.3221E-02 -.100000 10 -.46415888 -.46411133 -0.4756E-04 -.100000 15 -.46415888 -.46415710 -0.1779E-05 -.100000 20 -.46415888 -.46415877 -0.1099E-06 -.100000 25 -.46415888 -.46415888 -0.5631E-08 .400000 0 .73680630 .50000000 0.2368E+00 .400000 5 .73680630 .73437500 0.2431E-02 .400000 10 .73680630 .73632812 0.4782E-03 .400000 15 .73680630 .73680115 0.5152E-05 .400000 20 .73680630 .73680592 0.3839E-06 .400000 25 .73680630 .73680629 0.1137E-07 -1.00000 0 -1.0000000 -1.0000000 0.0000E+00 -1.00000 5 -1.0000000 -1.0000000 0.0000E+00 -1.00000 10 -1.0000000 -1.0000000 0.0000E+00 -1.00000 15 -1.0000000 -1.0000000 0.0000E+00 -1.00000 20 -1.0000000 -1.0000000 0.0000E+00 -1.00000 25 -1.0000000 -1.0000000 0.0000E+00 2.00000 0 1.2599210 1.0000000 0.2599E+00 2.00000 5 1.2599210 1.2500000 0.9921E-02 2.00000 10 1.2599210 1.2597656 0.1554E-03 2.00000 15 1.2599210 1.2598877 0.3335E-04 2.00000 20 1.2599210 1.2599201 0.9297E-06 2.00000 25 1.2599210 1.2599210 0.3559E-07 -3.00000 0 -1.4422496 -1.0000000 -0.4422E+00 -3.00000 5 -1.4422496 -1.4375000 -0.4750E-02 -3.00000 10 -1.4422496 -1.4414062 -0.8433E-03 -3.00000 15 -1.4422496 -1.4421997 -0.4986E-04 -3.00000 20 -1.4422496 -1.4422493 -0.2722E-06 -3.00000 25 -1.4422496 -1.4422495 -0.3379E-07 3.14159 0 1.4645919 1.0000000 0.4646E+00 3.14159 5 1.4645919 1.4375000 0.2709E-01 3.14159 10 1.4645919 1.4628906 0.1701E-02 3.14159 15 1.4645919 1.4645386 0.5331E-04 3.14159 20 1.4645919 1.4645901 0.1815E-05 3.14159 25 1.4645919 1.4645919 0.2679E-07 -19.0000 0 -2.6684016 -2.0000000 -0.6684E+00 -19.0000 5 -2.6684016 -2.6250000 -0.4340E-01 -19.0000 10 -2.6684016 -2.6679688 -0.4329E-03 -19.0000 15 -2.6684016 -2.6683350 -0.6669E-04 -19.0000 20 -2.6684016 -2.6683998 -0.1838E-05 -19.0000 25 -2.6684016 -2.6684016 -0.4979E-07 29.0000 0 3.0723168 2.0000000 0.1072E+01 29.0000 5 3.0723168 3.0000000 0.7232E-01 29.0000 10 3.0723168 3.0703125 0.2004E-02 29.0000 15 3.0723168 3.0722656 0.5120E-04 29.0000 20 3.0723168 3.0723152 0.1610E-05 29.0000 25 3.0723168 3.0723168 0.5990E-07 -71.0000 0 -4.1408177 -4.0000000 -0.1408E+00 -71.0000 5 -4.1408177 -4.0000000 -0.1408E+00 -71.0000 10 -4.1408177 -4.1406250 -0.1927E-03 -71.0000 15 -4.1408177 -4.1406250 -0.1927E-03 -71.0000 20 -4.1408177 -4.1408157 -0.2015E-05 -71.0000 25 -4.1408177 -4.1408176 -0.1072E-06 97.0000 0 4.5947009 4.0000000 0.5947E+00 97.0000 5 4.5947009 4.5000000 0.9470E-01 97.0000 10 4.5947009 4.5937500 0.9509E-03 97.0000 15 4.5947009 4.5944824 0.2185E-03 97.0000 20 4.5947009 4.5946960 0.4847E-05 97.0000 25 4.5947009 4.5947008 0.7891E-07 -0.123457E+09 0 -497.93386 -256.00000 -0.2419E+03 -0.123457E+09 5 -497.93386 -496.00000 -0.1934E+01 -0.123457E+09 10 -497.93386 -497.50000 -0.4339E+00 -0.123457E+09 15 -497.93386 -497.92188 -0.1198E-01 -0.123457E+09 20 -497.93386 -497.93359 -0.2655E-03 -0.123457E+09 25 -497.93386 -497.93385 -0.6069E-05 CORDIC_PRB: Normal end of execution. 22 June 2007 1:08:01.628 PM