mirror of
https://github.com/byteworksinc/ORCA-C.git
synced 2024-12-22 07:30:54 +00:00
1 line
220 B
Plaintext
1 line
220 B
Plaintext
|
/* Other file needed to run Special Conformance Test 4.4.1.1 */
#include <math.h>
extern float y;
double G1 (x)
int x;
{
if ( (fabs (y - 8.7)) > 0.0001 )
return 0.0;
else
return (double) x;
}
|