Lines Matching refs:k4
17 PetscInt k4, j3; in PetscKernel_A_gets_inverse_A_3() local
31 k4 = k3 + k; in PetscKernel_A_gets_inverse_A_3()
35 aa = &a[k4]; in PetscKernel_A_gets_inverse_A_3()
62 a[l + k3] = a[k4]; in PetscKernel_A_gets_inverse_A_3()
63 a[k4] = stmp; in PetscKernel_A_gets_inverse_A_3()
67 stmp = -1. / a[k4]; in PetscKernel_A_gets_inverse_A_3()
69 aa = &a[1 + k4]; in PetscKernel_A_gets_inverse_A_3()
73 ax = &a[k4 + 1]; in PetscKernel_A_gets_inverse_A_3()
98 k4 = k3 + k; in PetscKernel_A_gets_inverse_A_3()
99 a[k4] = 1.0 / a[k4]; in PetscKernel_A_gets_inverse_A_3()
100 stmp = -a[k4]; in PetscKernel_A_gets_inverse_A_3()