Lines Matching refs:col
33 PetscInt *work, *ia, *ja, *j, i, nz, row, col; in MatToSymmetricIJ_SeqAIJ() local
47 col = *j++ + shiftin; in MatToSymmetricIJ_SeqAIJ()
49 if (col > row) break; in MatToSymmetricIJ_SeqAIJ()
51 if (col < row) break; in MatToSymmetricIJ_SeqAIJ()
53 if (col != row) ia[row + 1]++; in MatToSymmetricIJ_SeqAIJ()
54 ia[col + 1]++; in MatToSymmetricIJ_SeqAIJ()
75 col = *j++ + shiftin; in MatToSymmetricIJ_SeqAIJ()
77 if (col > row) break; in MatToSymmetricIJ_SeqAIJ()
79 if (col < row) break; in MatToSymmetricIJ_SeqAIJ()
81 if (col != row) ja[work[col]++] = row + shiftout; in MatToSymmetricIJ_SeqAIJ()
82 ja[work[row]++] = col + shiftout; in MatToSymmetricIJ_SeqAIJ()