Lines Matching refs:kN
936 int iterations, error = 0, jN, iN, kN, lN = 0;
986 for( kN = iN; kN < MN; kN += N )
987 scale += fabs( U[kN + i] );
992 for( kN = iN; kN < MN; kN += N )
995 U[kN + i] /= scale;
996 s += U[kN + i] * U[kN + i];
1009 for( kN = iN; kN < MN; kN += N )
1012 s += U[kN + i] * U[kN + j];
1017 for( kN = iN; kN < MN; kN += N )
1020 U[kN + j] += f * U[kN + i];
1024 for( kN = iN; kN < MN; kN += N )
1025 U[kN + i] *= scale;
1104 for( k = l, kN = lN; k < N; k++, kN += N )
1105 s += U[iN + k] * V[kN + j];
1107 for( kN = lN; kN < NN; kN += N )
1108 V[kN + j] += s * V[kN + i];
1150 for( kN = lN; kN < MN; kN += N )
1151 s += U[kN + i] * U[kN + j];
1155 for( kN = iN; kN < MN; kN += N )
1156 U[kN + j] += f * U[kN + i];
