14 PetscErrorCode PetscKernel_A_gets_inverse_A_5(MatScalar *a, PetscInt *ipvt, MatScalar *work, PetscR…  in PetscKernel_A_gets_inverse_A_5()  argument
23 …t * (1.e-12 + PetscAbsScalar(a[0]) + PetscAbsScalar(a[6]) + PetscAbsScalar(a[12]) + PetscAbsScalar…  in PetscKernel_A_gets_inverse_A_5()
26   a -= 6;  in PetscKernel_A_gets_inverse_A_5()
35     aa   = &a[k4];  in PetscKernel_A_gets_inverse_A_5()
48     if (a[l + k3] == 0.0) {  in PetscKernel_A_gets_inverse_A_5()
55         a[l + k3] = shift;  in PetscKernel_A_gets_inverse_A_5()
61       stmp      = a[l + k3];  in PetscKernel_A_gets_inverse_A_5()
62       a[l + k3] = a[k4];  in PetscKernel_A_gets_inverse_A_5()
63       a[k4]     = stmp;  in PetscKernel_A_gets_inverse_A_5()
67     stmp = -1. / a[k4];  in PetscKernel_A_gets_inverse_A_5()
69     aa   = &a[1 + k4];  in PetscKernel_A_gets_inverse_A_5()
73     ax = &a[k4 + 1];  in PetscKernel_A_gets_inverse_A_5()
76       stmp = a[l + j3];  in PetscKernel_A_gets_inverse_A_5()
78         a[l + j3] = a[k + j3];  in PetscKernel_A_gets_inverse_A_5()
79         a[k + j3] = stmp;  in PetscKernel_A_gets_inverse_A_5()
83       ay   = &a[1 + k + j3];  in PetscKernel_A_gets_inverse_A_5()
88   if (a[30] == 0.0) {  in PetscKernel_A_gets_inverse_A_5()
99     a[k4] = 1.0 / a[k4];  in PetscKernel_A_gets_inverse_A_5()
100     stmp  = -a[k4];  in PetscKernel_A_gets_inverse_A_5()
102     aa    = &a[k3 + 1];  in PetscKernel_A_gets_inverse_A_5()
109       stmp      = a[k + j3];  in PetscKernel_A_gets_inverse_A_5()
110       a[k + j3] = 0.0;  in PetscKernel_A_gets_inverse_A_5()
111       ay        = &a[j3 + 1];  in PetscKernel_A_gets_inverse_A_5()
121     aa  = a + k3;  in PetscKernel_A_gets_inverse_A_5()
128       ax   = &a[5 * j + 1];  in PetscKernel_A_gets_inverse_A_5()
129       ay   = &a[k3 + 1];  in PetscKernel_A_gets_inverse_A_5()
138       ax    = &a[k3 + 1];  in PetscKernel_A_gets_inverse_A_5()
139       ay    = &a[5 * l + 1];  in PetscKernel_A_gets_inverse_A_5()