URL
https://opencores.org/ocsvn/openrisc_2011-10-31/openrisc_2011-10-31/trunk
Only display areas with differences |
Details |
Blame |
View Log
Rev 297 |
Rev 384 |
typedef union
|
typedef union
|
{
|
{
|
double value;
|
double value;
|
struct
|
struct
|
{
|
{
|
unsigned long msw;
|
unsigned long msw;
|
unsigned long lsw;
|
unsigned long lsw;
|
} parts;
|
} parts;
|
} ieee_double_shape_type;
|
} ieee_double_shape_type;
|
|
|
double f (int iy)
|
double f (int iy)
|
{
|
{
|
double z, t;
|
double z, t;
|
ieee_double_shape_type u, v;
|
ieee_double_shape_type u, v;
|
|
|
if (iy == 1)
|
if (iy == 1)
|
return 0;
|
return 0;
|
|
|
u.parts.msw = iy;
|
u.parts.msw = iy;
|
u.parts.lsw = 0;
|
u.parts.lsw = 0;
|
z = u.value;
|
z = u.value;
|
v.parts.msw = iy;
|
v.parts.msw = iy;
|
v.parts.lsw = 0;
|
v.parts.lsw = 0;
|
t = v.value;
|
t = v.value;
|
return 1.0+z+t+t;
|
return 1.0+z+t+t;
|
}
|
}
|
|
|
© copyright 1999-2024
OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.