Lines Matching refs:P1
1018 float P1 [MAX] [2];
1069 P1 [i][0] = tmp1;
1071 P1 [i][1] = 0.;
1075 fft (P1, MAX);
1079 double a0 = P1 [i][0];
1080 double a1 = P1 [i][1];
1083 P1 [i][0] = a0*b0 - a1*b1;
1084 P1 [i][1] = a0*b1 + a1*b0;
1087 fft (P1, MAX);
1089 max = P1 [maxindex = 0][0];
1091 if ( P1[i][0] > max )
1092 max = P1 [maxindex = i][0];
1094 y2 = P1 [ maxindex ][0];
1095 y1 = P1 [(maxindex-1)&(MAX-1)][0] - y2;
1096 y3 = P1 [(maxindex+1)&(MAX-1)][0] - y2;