Lines Matching refs:A3
116 float *A3, Apq = A1[q], App, Aqq, Aip, Aiq, Vpi, Vqi;
137 A3 = A;
138 for( i = 0; i < p; i++, A3 += n )
140 Aip = A3[p];
141 Aiq = A3[q];
144 A3[p] = (float) (Aip * c - Aiq * s);
145 A3[q] = (float) (Aiq * c + Aip * s);
149 for( ; i < q; i++, A3 += n )
152 Aiq = A3[q];
156 A3[q] = (float) (Aiq * c + Aip * s);
266 double *A3, Apq, App, Aqq, App2, Aqq2, Aip, Aiq, Vpi, Vqi;
288 A3 = A;
289 for( i = 0; i < p; i++, A3 += n )
291 Aip = A3[p];
292 Aiq = A3[q];
295 A3[p] = Aip * c - Aiq * s;
296 A3[q] = Aiq * c + Aip * s;
300 for( ; i < q; i++, A3 += n )
303 Aiq = A3[q];
307 A3[q] = Aiq * c + Aip * s;
