10SN/Adouble test (const double le, const double ri) 29998SN/A{ 30SN/A double val = ( ri - le ) / ( ri * ( le + 1.0 ) ); 40SN/A return val; 50SN/A} 60SN/A 72362SN/Aint main () 80SN/A{ 92362SN/A double retval; 100SN/A 110SN/A retval = test(1.0,2.0); 120SN/A if (retval < 0.24 || retval > 0.26) 130SN/A abort (); 140SN/A exit (0); 150SN/A} 160SN/A