18c2ecf20Sopenharmony_ci/* 28c2ecf20Sopenharmony_ci 38c2ecf20Sopenharmony_ci fp_trig.c: floating-point math routines for the Linux-m68k 48c2ecf20Sopenharmony_ci floating point emulator. 58c2ecf20Sopenharmony_ci 68c2ecf20Sopenharmony_ci Copyright (c) 1998-1999 David Huggins-Daines / Roman Zippel. 78c2ecf20Sopenharmony_ci 88c2ecf20Sopenharmony_ci I hereby give permission, free of charge, to copy, modify, and 98c2ecf20Sopenharmony_ci redistribute this software, in source or binary form, provided that 108c2ecf20Sopenharmony_ci the above copyright notice and the following disclaimer are included 118c2ecf20Sopenharmony_ci in all such copies. 128c2ecf20Sopenharmony_ci 138c2ecf20Sopenharmony_ci THIS SOFTWARE IS PROVIDED "AS IS", WITH ABSOLUTELY NO WARRANTY, REAL 148c2ecf20Sopenharmony_ci OR IMPLIED. 158c2ecf20Sopenharmony_ci 168c2ecf20Sopenharmony_ci*/ 178c2ecf20Sopenharmony_ci 188c2ecf20Sopenharmony_ci#include "fp_emu.h" 198c2ecf20Sopenharmony_ci#include "fp_trig.h" 208c2ecf20Sopenharmony_ci 218c2ecf20Sopenharmony_cistruct fp_ext * 228c2ecf20Sopenharmony_cifp_fsin(struct fp_ext *dest, struct fp_ext *src) 238c2ecf20Sopenharmony_ci{ 248c2ecf20Sopenharmony_ci uprint("fsin\n"); 258c2ecf20Sopenharmony_ci 268c2ecf20Sopenharmony_ci fp_monadic_check(dest, src); 278c2ecf20Sopenharmony_ci 288c2ecf20Sopenharmony_ci return dest; 298c2ecf20Sopenharmony_ci} 308c2ecf20Sopenharmony_ci 318c2ecf20Sopenharmony_cistruct fp_ext * 328c2ecf20Sopenharmony_cifp_fcos(struct fp_ext *dest, struct fp_ext *src) 338c2ecf20Sopenharmony_ci{ 348c2ecf20Sopenharmony_ci uprint("fcos\n"); 358c2ecf20Sopenharmony_ci 368c2ecf20Sopenharmony_ci fp_monadic_check(dest, src); 378c2ecf20Sopenharmony_ci 388c2ecf20Sopenharmony_ci return dest; 398c2ecf20Sopenharmony_ci} 408c2ecf20Sopenharmony_ci 418c2ecf20Sopenharmony_cistruct fp_ext * 428c2ecf20Sopenharmony_cifp_ftan(struct fp_ext *dest, struct fp_ext *src) 438c2ecf20Sopenharmony_ci{ 448c2ecf20Sopenharmony_ci uprint("ftan\n"); 458c2ecf20Sopenharmony_ci 468c2ecf20Sopenharmony_ci fp_monadic_check(dest, src); 478c2ecf20Sopenharmony_ci 488c2ecf20Sopenharmony_ci return dest; 498c2ecf20Sopenharmony_ci} 508c2ecf20Sopenharmony_ci 518c2ecf20Sopenharmony_cistruct fp_ext * 528c2ecf20Sopenharmony_cifp_fasin(struct fp_ext *dest, struct fp_ext *src) 538c2ecf20Sopenharmony_ci{ 548c2ecf20Sopenharmony_ci uprint("fasin\n"); 558c2ecf20Sopenharmony_ci 568c2ecf20Sopenharmony_ci fp_monadic_check(dest, src); 578c2ecf20Sopenharmony_ci 588c2ecf20Sopenharmony_ci return dest; 598c2ecf20Sopenharmony_ci} 608c2ecf20Sopenharmony_ci 618c2ecf20Sopenharmony_cistruct fp_ext * 628c2ecf20Sopenharmony_cifp_facos(struct fp_ext *dest, struct fp_ext *src) 638c2ecf20Sopenharmony_ci{ 648c2ecf20Sopenharmony_ci uprint("facos\n"); 658c2ecf20Sopenharmony_ci 668c2ecf20Sopenharmony_ci fp_monadic_check(dest, src); 678c2ecf20Sopenharmony_ci 688c2ecf20Sopenharmony_ci return dest; 698c2ecf20Sopenharmony_ci} 708c2ecf20Sopenharmony_ci 718c2ecf20Sopenharmony_cistruct fp_ext * 728c2ecf20Sopenharmony_cifp_fatan(struct fp_ext *dest, struct fp_ext *src) 738c2ecf20Sopenharmony_ci{ 748c2ecf20Sopenharmony_ci uprint("fatan\n"); 758c2ecf20Sopenharmony_ci 768c2ecf20Sopenharmony_ci fp_monadic_check(dest, src); 778c2ecf20Sopenharmony_ci 788c2ecf20Sopenharmony_ci return dest; 798c2ecf20Sopenharmony_ci} 808c2ecf20Sopenharmony_ci 818c2ecf20Sopenharmony_cistruct fp_ext * 828c2ecf20Sopenharmony_cifp_fsinh(struct fp_ext *dest, struct fp_ext *src) 838c2ecf20Sopenharmony_ci{ 848c2ecf20Sopenharmony_ci uprint("fsinh\n"); 858c2ecf20Sopenharmony_ci 868c2ecf20Sopenharmony_ci fp_monadic_check(dest, src); 878c2ecf20Sopenharmony_ci 888c2ecf20Sopenharmony_ci return dest; 898c2ecf20Sopenharmony_ci} 908c2ecf20Sopenharmony_ci 918c2ecf20Sopenharmony_cistruct fp_ext * 928c2ecf20Sopenharmony_cifp_fcosh(struct fp_ext *dest, struct fp_ext *src) 938c2ecf20Sopenharmony_ci{ 948c2ecf20Sopenharmony_ci uprint("fcosh\n"); 958c2ecf20Sopenharmony_ci 968c2ecf20Sopenharmony_ci fp_monadic_check(dest, src); 978c2ecf20Sopenharmony_ci 988c2ecf20Sopenharmony_ci return dest; 998c2ecf20Sopenharmony_ci} 1008c2ecf20Sopenharmony_ci 1018c2ecf20Sopenharmony_cistruct fp_ext * 1028c2ecf20Sopenharmony_cifp_ftanh(struct fp_ext *dest, struct fp_ext *src) 1038c2ecf20Sopenharmony_ci{ 1048c2ecf20Sopenharmony_ci uprint("ftanh\n"); 1058c2ecf20Sopenharmony_ci 1068c2ecf20Sopenharmony_ci fp_monadic_check(dest, src); 1078c2ecf20Sopenharmony_ci 1088c2ecf20Sopenharmony_ci return dest; 1098c2ecf20Sopenharmony_ci} 1108c2ecf20Sopenharmony_ci 1118c2ecf20Sopenharmony_cistruct fp_ext * 1128c2ecf20Sopenharmony_cifp_fatanh(struct fp_ext *dest, struct fp_ext *src) 1138c2ecf20Sopenharmony_ci{ 1148c2ecf20Sopenharmony_ci uprint("fatanh\n"); 1158c2ecf20Sopenharmony_ci 1168c2ecf20Sopenharmony_ci fp_monadic_check(dest, src); 1178c2ecf20Sopenharmony_ci 1188c2ecf20Sopenharmony_ci return dest; 1198c2ecf20Sopenharmony_ci} 1208c2ecf20Sopenharmony_ci 1218c2ecf20Sopenharmony_cistruct fp_ext * 1228c2ecf20Sopenharmony_cifp_fsincos0(struct fp_ext *dest, struct fp_ext *src) 1238c2ecf20Sopenharmony_ci{ 1248c2ecf20Sopenharmony_ci uprint("fsincos0\n"); 1258c2ecf20Sopenharmony_ci 1268c2ecf20Sopenharmony_ci return dest; 1278c2ecf20Sopenharmony_ci} 1288c2ecf20Sopenharmony_ci 1298c2ecf20Sopenharmony_cistruct fp_ext * 1308c2ecf20Sopenharmony_cifp_fsincos1(struct fp_ext *dest, struct fp_ext *src) 1318c2ecf20Sopenharmony_ci{ 1328c2ecf20Sopenharmony_ci uprint("fsincos1\n"); 1338c2ecf20Sopenharmony_ci 1348c2ecf20Sopenharmony_ci return dest; 1358c2ecf20Sopenharmony_ci} 1368c2ecf20Sopenharmony_ci 1378c2ecf20Sopenharmony_cistruct fp_ext * 1388c2ecf20Sopenharmony_cifp_fsincos2(struct fp_ext *dest, struct fp_ext *src) 1398c2ecf20Sopenharmony_ci{ 1408c2ecf20Sopenharmony_ci uprint("fsincos2\n"); 1418c2ecf20Sopenharmony_ci 1428c2ecf20Sopenharmony_ci return dest; 1438c2ecf20Sopenharmony_ci} 1448c2ecf20Sopenharmony_ci 1458c2ecf20Sopenharmony_cistruct fp_ext * 1468c2ecf20Sopenharmony_cifp_fsincos3(struct fp_ext *dest, struct fp_ext *src) 1478c2ecf20Sopenharmony_ci{ 1488c2ecf20Sopenharmony_ci uprint("fsincos3\n"); 1498c2ecf20Sopenharmony_ci 1508c2ecf20Sopenharmony_ci return dest; 1518c2ecf20Sopenharmony_ci} 1528c2ecf20Sopenharmony_ci 1538c2ecf20Sopenharmony_cistruct fp_ext * 1548c2ecf20Sopenharmony_cifp_fsincos4(struct fp_ext *dest, struct fp_ext *src) 1558c2ecf20Sopenharmony_ci{ 1568c2ecf20Sopenharmony_ci uprint("fsincos4\n"); 1578c2ecf20Sopenharmony_ci 1588c2ecf20Sopenharmony_ci return dest; 1598c2ecf20Sopenharmony_ci} 1608c2ecf20Sopenharmony_ci 1618c2ecf20Sopenharmony_cistruct fp_ext * 1628c2ecf20Sopenharmony_cifp_fsincos5(struct fp_ext *dest, struct fp_ext *src) 1638c2ecf20Sopenharmony_ci{ 1648c2ecf20Sopenharmony_ci uprint("fsincos5\n"); 1658c2ecf20Sopenharmony_ci 1668c2ecf20Sopenharmony_ci return dest; 1678c2ecf20Sopenharmony_ci} 1688c2ecf20Sopenharmony_ci 1698c2ecf20Sopenharmony_cistruct fp_ext * 1708c2ecf20Sopenharmony_cifp_fsincos6(struct fp_ext *dest, struct fp_ext *src) 1718c2ecf20Sopenharmony_ci{ 1728c2ecf20Sopenharmony_ci uprint("fsincos6\n"); 1738c2ecf20Sopenharmony_ci 1748c2ecf20Sopenharmony_ci return dest; 1758c2ecf20Sopenharmony_ci} 1768c2ecf20Sopenharmony_ci 1778c2ecf20Sopenharmony_cistruct fp_ext * 1788c2ecf20Sopenharmony_cifp_fsincos7(struct fp_ext *dest, struct fp_ext *src) 1798c2ecf20Sopenharmony_ci{ 1808c2ecf20Sopenharmony_ci uprint("fsincos7\n"); 1818c2ecf20Sopenharmony_ci 1828c2ecf20Sopenharmony_ci return dest; 1838c2ecf20Sopenharmony_ci} 184