mirror of
https://github.com/adulau/aha.git
synced 2024-12-29 12:16:20 +00:00
1da177e4c3
Initial git repository build. I'm not bothering with the full history, even though we have it. We can create a separate "historical" git archive of that later if we want to, and in the meantime it's about 3.2GB when imported into git - space that would just make the early git days unnecessarily complicated, when we don't have a lot of good infrastructure for it. Let it rip!
183 lines
2.7 KiB
C
183 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;
|
|
}
|