blob: cd60238fff2b6f07bda184ac8b36906184496f37 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
|
/* { dg-do compile { target { powerpc*-*-* } } } */
/* { dg-skip-if "" { powerpc*-*-darwin* } { "*" } { "" } } */
/* { dg-require-effective-target powerpc_vsx_ok } */
/* { dg-skip-if "do not override -mcpu" { powerpc*-*-* } { "-mcpu=*" } { "-mcpu=power7" } } */
/* { dg-options "-O3 -mcpu=power7 -misel -ffast-math" } */
struct phylo_s {
int left;
};
void Free2DArray (void **, int);
int Cluster(float **dmx, int N, struct phylo_s *tree)
{
float **mx;
int *coord;
int i;
int Np;
int row, col;
float min;
for (col = 0; col < N; Np--)
{
for (row = 0; row < Np; row++)
for (col = row+1; col < Np; col++)
if (mx[row][col] < min)
i = row;
tree[Np-2].left = coord[i];
}
Free2DArray((void **) mx, N);
}
|