Lines Matching refs:a
14 PetscErrorCode PetscKernel_A_gets_inverse_A_7(MatScalar *a, PetscReal shift, PetscBool allowzeropiv… in PetscKernel_A_gets_inverse_A_7() argument
23 …alar(a[0]) + PetscAbsScalar(a[8]) + PetscAbsScalar(a[16]) + PetscAbsScalar(a[24]) + PetscAbsScalar… in PetscKernel_A_gets_inverse_A_7()
26 a -= 8; in PetscKernel_A_gets_inverse_A_7()
35 aa = &a[k4]; in PetscKernel_A_gets_inverse_A_7()
48 if (a[l + k3] == 0.0) { in PetscKernel_A_gets_inverse_A_7()
55 a[l + k3] = shift; in PetscKernel_A_gets_inverse_A_7()
61 stmp = a[l + k3]; in PetscKernel_A_gets_inverse_A_7()
62 a[l + k3] = a[k4]; in PetscKernel_A_gets_inverse_A_7()
63 a[k4] = stmp; in PetscKernel_A_gets_inverse_A_7()
67 stmp = -1. / a[k4]; in PetscKernel_A_gets_inverse_A_7()
69 aa = &a[1 + k4]; in PetscKernel_A_gets_inverse_A_7()
73 ax = &a[k4 + 1]; in PetscKernel_A_gets_inverse_A_7()
76 stmp = a[l + j3]; in PetscKernel_A_gets_inverse_A_7()
78 a[l + j3] = a[k + j3]; in PetscKernel_A_gets_inverse_A_7()
79 a[k + j3] = stmp; in PetscKernel_A_gets_inverse_A_7()
83 ay = &a[1 + k + j3]; in PetscKernel_A_gets_inverse_A_7()
88 if (a[56] == 0.0) { in PetscKernel_A_gets_inverse_A_7()
99 a[k4] = 1.0 / a[k4]; in PetscKernel_A_gets_inverse_A_7()
100 stmp = -a[k4]; in PetscKernel_A_gets_inverse_A_7()
102 aa = &a[k3 + 1]; in PetscKernel_A_gets_inverse_A_7()
109 stmp = a[k + j3]; in PetscKernel_A_gets_inverse_A_7()
110 a[k + j3] = 0.0; in PetscKernel_A_gets_inverse_A_7()
111 ay = &a[j3 + 1]; in PetscKernel_A_gets_inverse_A_7()
121 aa = a + k3; in PetscKernel_A_gets_inverse_A_7()
128 ax = &a[7 * j + 1]; in PetscKernel_A_gets_inverse_A_7()
129 ay = &a[k3 + 1]; in PetscKernel_A_gets_inverse_A_7()
140 ax = &a[k3 + 1]; in PetscKernel_A_gets_inverse_A_7()
141 ay = &a[7 * l + 1]; in PetscKernel_A_gets_inverse_A_7()