source code
/* The Computer Language Benchmarks Game
https://salsa.debian.org/benchmarksgame-team/benchmarksgame/
contributed by Greg Buchholz
*/
#include<stdio.h>
#include <stdlib.h>
int main (int argc, char **argv)
{
int w, h, x, y, bit_num = 0;
char byte_acc = 0;
int i, iter = 50;
double limit = 2.0;
double Zr, Zi, Cr, Ci, Tr, Ti;
w = atoi(argv[1]);
h = w;
printf("P4\n%d %d\n",w,h);
for(y=0;y<h;y++)
{
for(x=0;x<w;x++)
{
Zr = 0.0; Zi = 0.0;
Cr = (2*(double)x/w - 1.5); Ci=(2*(double)y/h - 1);
for (i=0;i<iter;i++)
{
Tr = Zr*Zr - Zi*Zi + Cr;
Ti = 2*Zr*Zi + Ci;
Zr = Tr; Zi = Ti;
if (Zr*Zr+Zi*Zi > limit*limit)
break;
}
if(Zr*Zr+Zi*Zi > limit*limit)
byte_acc = (byte_acc << 1) | 0x00;
else
byte_acc = (byte_acc << 1) | 0x01;
bit_num++;
if(bit_num == 8)
{
putc(byte_acc,stdout);
byte_acc = 0;
bit_num = 0;
}
else if(x == w-1)
{
byte_acc = byte_acc << (8-w%8);
putc(byte_acc,stdout);
byte_acc = 0;
bit_num = 0;
}
}
}
return(0);
}
notes, command-line, and program output
NOTES:
64-bit Ubuntu quad core
Intel(R) oneAPI DPC++/C++ Compiler
2024.1.0.20240308
Thu, 06 Jun 2024 22:30:18 GMT
MAKE:
~/intel/oneapi/compiler/latest/bin/icx -pipe -Wall -O3 -fomit-frame-pointer -march=ivybridge simple.c -o simple.icx_run
rm simple.c
4.72s to complete and log all make actions
COMMAND LINE:
./simple.icx_run 16000
(BINARY) PROGRAM OUTPUT NOT SHOWN