Searched refs:ir (Results 1 – 1 of 1) sorted by relevance
407 int8 ir, in fEigenCompute4() local417 for (ir = 0; ir < n; ir++) in fEigenCompute4()423 eigvec[ir][ic] = 0.0F; in fEigenCompute4()427 eigvec[ir][ir] = 1.0F; in fEigenCompute4()430 eigval[ir] = A[ir][ir]; in fEigenCompute4()441 for (ir = 0; ir < n - 1; ir++) in fEigenCompute4()444 for (ic = ir + 1; ic < n; ic++) in fEigenCompute4()447 residue += fabsf(A[ir][ic]); in fEigenCompute4()455 for (ir = 0; ir < n - 1; ir++) in fEigenCompute4()458 for (ic = ir + 1; ic < n; ic++) in fEigenCompute4()[all …]
