mirror of
https://sourceware.org/git/glibc.git
synced 2024-11-11 07:40:05 +00:00
Format mptan.c
This commit is contained in:
parent
11d6e2f237
commit
b8de22026d
@ -1,5 +1,7 @@
|
||||
2013-02-27 Siddhesh Poyarekar <siddhesh@redhat.com>
|
||||
|
||||
* sysdeps/ieee754/dbl-64/mptan.c: Reformat.
|
||||
|
||||
* sysdeps/ieee754/dbl-64/mplog.c: Reformat.
|
||||
|
||||
2013-02-26 Roland McGrath <roland@hack.frob.com>
|
||||
|
@ -40,23 +40,25 @@
|
||||
# define SECTION
|
||||
#endif
|
||||
|
||||
int __mpranred(double, mp_no *, int);
|
||||
void __c32(mp_no *, mp_no *, mp_no *, int);
|
||||
|
||||
void
|
||||
SECTION
|
||||
__mptan(double x, mp_no *mpy, int p) {
|
||||
__mptan (double x, mp_no *mpy, int p)
|
||||
{
|
||||
|
||||
int n;
|
||||
mp_no mpw, mpc, mps;
|
||||
|
||||
n = __mpranred(x, &mpw, p) & 0x00000001; /* negative or positive result */
|
||||
__c32(&mpw, &mpc, &mps, p); /* computing sin(x) and cos(x) */
|
||||
if (n) /* second or fourth quarter of unit circle */
|
||||
{ __dvd(&mpc,&mps,mpy,p);
|
||||
mpy->d[0] *= MONE;
|
||||
} /* tan is negative in this area */
|
||||
else __dvd(&mps,&mpc,mpy,p);
|
||||
|
||||
return;
|
||||
/* Negative or positive result. */
|
||||
n = __mpranred (x, &mpw, p) & 0x00000001;
|
||||
/* Computing sin(x) and cos(x). */
|
||||
__c32 (&mpw, &mpc, &mps, p);
|
||||
/* Second or fourth quarter of unit circle. */
|
||||
if (n)
|
||||
{
|
||||
__dvd (&mpc, &mps, mpy, p);
|
||||
mpy->d[0] *= MONE;
|
||||
}
|
||||
/* tan is negative in this area. */
|
||||
else
|
||||
__dvd (&mps, &mpc, mpy, p);
|
||||
}
|
||||
|
Loading…
Reference in New Issue
Block a user