Lines Matching refs:ia
8 PetscInt *ia, *ja; in MatCreateFromMTX() local
28 PetscCall(PetscMalloc4(nz, &ia, nz, &ja, nz, &val, M, &rownz)); in MatCreateFromMTX()
35 ninput = fscanf(file, "%d %d %lg\n", &ia[i], &ja[i], &val[i]); in MatCreateFromMTX()
37 ia[i]--; in MatCreateFromMTX()
40 rownz[ia[i]]++; in MatCreateFromMTX()
41 if (ja[i] != ia[i]) rownz[ja[i]]++; in MatCreateFromMTX()
44 else rownz[ia[i]]++; in MatCreateFromMTX()
68 …for (j = 0; j < nz; j++) PetscCall(MatSetValues(*A, 1, &ia[j], 1, &ja[j], &val[j], INSERT_VALUES)); in MatCreateFromMTX()
73 …for (j = 0; j < nz; j++) PetscCall(MatSetValues(*A, 1, &ja[j], 1, &ia[j], &val[j], INSERT_VALUES)); in MatCreateFromMTX()
78 PetscCall(MatSetValues(*A, 1, &ja[j], 1, &ia[j], &val[j], INSERT_VALUES)); in MatCreateFromMTX()
83 PetscCall(PetscFree4(ia, ja, val, rownz)); in MatCreateFromMTX()