blob: 2d778759e13cff1aca476f2b110537b717d23a87 [file] [log] [blame]
/* { dg-add-options stack_size } */
/* { dg-require-stack-size "75*75*4" } */
#if defined(STACK_SIZE) && STACK_SIZE < 65536
# define GITT_SIZE 75
#endif
#ifndef GITT_SIZE
# define GITT_SIZE 150
#endif
typedef struct {
double x, y;
} vector_t;
double sqrt();
f(int count,vector_t*pos,double r,double *rho)
{
int i, j, miny, maxy, hy;
float help, d;
int gitt[GITT_SIZE][GITT_SIZE];
int *data = (int *)malloc(count*sizeof(int));
for (i = 0; i < count; i++)
rho[i] = 0;
for (i = 1; i < count; i++)
for (hy = miny; hy<= maxy; hy++)
while(j >=0) {
d = pos[i].y - pos[j].y;
if ( d <= r) {
d = sqrt(d);
rho[i] += help;
}
}
}