mirror of
https://github.com/nArnoSNES/tcc-65816.git
synced 2024-05-31 22:41:28 +00:00
16 lines
249 B
C
16 lines
249 B
C
double test (const double le, const double ri)
|
|
{
|
|
double val = ( ri - le ) / ( ri * ( le + 1.0 ) );
|
|
return val;
|
|
}
|
|
|
|
int main ()
|
|
{
|
|
double retval;
|
|
|
|
retval = test(1.0,2.0);
|
|
if (retval < 0.24 || retval > 0.26)
|
|
abort ();
|
|
exit (0);
|
|
}
|