|
|
DataMuseum.dkPresents historical artifacts from the history of: DKUUG/EUUG Conference tapes |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about DKUUG/EUUG Conference tapes Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 400 (0x190)
Types: TextFile
Names: »float.c«
└─⟦db229ac7e⟧ Bits:30007240 EUUGD20: SSBA 1.2 / AFW Benchmarks
└─⟦this⟧ »EUUGD20/AFUU-ssba1.21/ssba1.21E/utah/float.c«
└─⟦this⟧ »EUUGD20/AFUU-ssba1.21/ssba1.21F/utah/float.c«
#define CONST1 3.141597E0
#define CONST2 1.7839032E4
#define COUNT 10000
#define REG
main()
{
double a, b, c;
REG int i;
a = CONST1;
b = CONST2;
for (i = 0; i < COUNT; ++i)
{
c = a * b;
c = c / a;
c = a * b;
c = c / a;
c = a * b;
c = c / a;
c = a * b;
c = c / a;
c = a * b;
c = c / a;
c = a * b;
c = c / a;
c = a * b;
c = c / a;
}
printf("Done\n");
exit(0);
}