184 lines
2.7 KiB
C
184 lines
2.7 KiB
C
|
/*
|
||
|
|
||
|
fp_trig.c: floating-point math routines for the Linux-m68k
|
||
|
floating point emulator.
|
||
|
|
||
|
Copyright (c) 1998-1999 David Huggins-Daines / Roman Zippel.
|
||
|
|
||
|
I hereby give permission, free of charge, to copy, modify, and
|
||
|
redistribute this software, in source or binary form, provided that
|
||
|
the above copyright notice and the following disclaimer are included
|
||
|
in all such copies.
|
||
|
|
||
|
THIS SOFTWARE IS PROVIDED "AS IS", WITH ABSOLUTELY NO WARRANTY, REAL
|
||
|
OR IMPLIED.
|
||
|
|
||
|
*/
|
||
|
|
||
|
#include "fp_emu.h"
|
||
|
#include "fp_trig.h"
|
||
|
|
||
|
struct fp_ext *
|
||
|
fp_fsin(struct fp_ext *dest, struct fp_ext *src)
|
||
|
{
|
||
|
uprint("fsin\n");
|
||
|
|
||
|
fp_monadic_check(dest, src);
|
||
|
|
||
|
return dest;
|
||
|
}
|
||
|
|
||
|
struct fp_ext *
|
||
|
fp_fcos(struct fp_ext *dest, struct fp_ext *src)
|
||
|
{
|
||
|
uprint("fcos\n");
|
||
|
|
||
|
fp_monadic_check(dest, src);
|
||
|
|
||
|
return dest;
|
||
|
}
|
||
|
|
||
|
struct fp_ext *
|
||
|
fp_ftan(struct fp_ext *dest, struct fp_ext *src)
|
||
|
{
|
||
|
uprint("ftan\n");
|
||
|
|
||
|
fp_monadic_check(dest, src);
|
||
|
|
||
|
return dest;
|
||
|
}
|
||
|
|
||
|
struct fp_ext *
|
||
|
fp_fasin(struct fp_ext *dest, struct fp_ext *src)
|
||
|
{
|
||
|
uprint("fasin\n");
|
||
|
|
||
|
fp_monadic_check(dest, src);
|
||
|
|
||
|
return dest;
|
||
|
}
|
||
|
|
||
|
struct fp_ext *
|
||
|
fp_facos(struct fp_ext *dest, struct fp_ext *src)
|
||
|
{
|
||
|
uprint("facos\n");
|
||
|
|
||
|
fp_monadic_check(dest, src);
|
||
|
|
||
|
return dest;
|
||
|
}
|
||
|
|
||
|
struct fp_ext *
|
||
|
fp_fatan(struct fp_ext *dest, struct fp_ext *src)
|
||
|
{
|
||
|
uprint("fatan\n");
|
||
|
|
||
|
fp_monadic_check(dest, src);
|
||
|
|
||
|
return dest;
|
||
|
}
|
||
|
|
||
|
struct fp_ext *
|
||
|
fp_fsinh(struct fp_ext *dest, struct fp_ext *src)
|
||
|
{
|
||
|
uprint("fsinh\n");
|
||
|
|
||
|
fp_monadic_check(dest, src);
|
||
|
|
||
|
return dest;
|
||
|
}
|
||
|
|
||
|
struct fp_ext *
|
||
|
fp_fcosh(struct fp_ext *dest, struct fp_ext *src)
|
||
|
{
|
||
|
uprint("fcosh\n");
|
||
|
|
||
|
fp_monadic_check(dest, src);
|
||
|
|
||
|
return dest;
|
||
|
}
|
||
|
|
||
|
struct fp_ext *
|
||
|
fp_ftanh(struct fp_ext *dest, struct fp_ext *src)
|
||
|
{
|
||
|
uprint("ftanh\n");
|
||
|
|
||
|
fp_monadic_check(dest, src);
|
||
|
|
||
|
return dest;
|
||
|
}
|
||
|
|
||
|
struct fp_ext *
|
||
|
fp_fatanh(struct fp_ext *dest, struct fp_ext *src)
|
||
|
{
|
||
|
uprint("fatanh\n");
|
||
|
|
||
|
fp_monadic_check(dest, src);
|
||
|
|
||
|
return dest;
|
||
|
}
|
||
|
|
||
|
struct fp_ext *
|
||
|
fp_fsincos0(struct fp_ext *dest, struct fp_ext *src)
|
||
|
{
|
||
|
uprint("fsincos0\n");
|
||
|
|
||
|
return dest;
|
||
|
}
|
||
|
|
||
|
struct fp_ext *
|
||
|
fp_fsincos1(struct fp_ext *dest, struct fp_ext *src)
|
||
|
{
|
||
|
uprint("fsincos1\n");
|
||
|
|
||
|
return dest;
|
||
|
}
|
||
|
|
||
|
struct fp_ext *
|
||
|
fp_fsincos2(struct fp_ext *dest, struct fp_ext *src)
|
||
|
{
|
||
|
uprint("fsincos2\n");
|
||
|
|
||
|
return dest;
|
||
|
}
|
||
|
|
||
|
struct fp_ext *
|
||
|
fp_fsincos3(struct fp_ext *dest, struct fp_ext *src)
|
||
|
{
|
||
|
uprint("fsincos3\n");
|
||
|
|
||
|
return dest;
|
||
|
}
|
||
|
|
||
|
struct fp_ext *
|
||
|
fp_fsincos4(struct fp_ext *dest, struct fp_ext *src)
|
||
|
{
|
||
|
uprint("fsincos4\n");
|
||
|
|
||
|
return dest;
|
||
|
}
|
||
|
|
||
|
struct fp_ext *
|
||
|
fp_fsincos5(struct fp_ext *dest, struct fp_ext *src)
|
||
|
{
|
||
|
uprint("fsincos5\n");
|
||
|
|
||
|
return dest;
|
||
|
}
|
||
|
|
||
|
struct fp_ext *
|
||
|
fp_fsincos6(struct fp_ext *dest, struct fp_ext *src)
|
||
|
{
|
||
|
uprint("fsincos6\n");
|
||
|
|
||
|
return dest;
|
||
|
}
|
||
|
|
||
|
struct fp_ext *
|
||
|
fp_fsincos7(struct fp_ext *dest, struct fp_ext *src)
|
||
|
{
|
||
|
uprint("fsincos7\n");
|
||
|
|
||
|
return dest;
|
||
|
}
|