Searched refs:jn1 (Results 1 – 2 of 2) sorted by relevance
| /petsc/src/mat/impls/baij/seq/ |
| H A D | dgefa.c | 17 PetscInt i__2, i__3, kp1, nm1, j, k, l, ll, kn, knp1, jn1; in PetscLINPACKgefa() local
73 jn1 = j * n; in PetscLINPACKgefa()
74 t = a[l + jn1]; in PetscLINPACKgefa()
76 a[l + jn1] = a[k + jn1]; in PetscLINPACKgefa()
77 a[k + jn1] = t; in PetscLINPACKgefa()
81 ay = &a[1 + k + jn1]; in PetscLINPACKgefa()
|
| H A D | dgedi.c | 19 PetscInt i__2, kb, kp1, nm1, i, j, k, l, ll, kn, knp1, jn1; in PetscLINPACKgedi() local
42 jn1 = j * n; in PetscLINPACKgedi()
43 t = a[k + jn1]; in PetscLINPACKgedi()
44 a[k + jn1] = 0.; in PetscLINPACKgedi()
45 ay = &a[1 + jn1]; in PetscLINPACKgedi()
|