Lines Matching refs:retval
705 spbas_matrix retval; in spbas_pattern_only() local
710 retval.nrows = nrows; in spbas_pattern_only()
711 retval.ncols = ncols; in spbas_pattern_only()
712 retval.nnz = ai[nrows]; in spbas_pattern_only()
714 retval.block_data = PETSC_TRUE; in spbas_pattern_only()
715 retval.col_idx_type = SPBAS_DIAGONAL_OFFSETS; in spbas_pattern_only()
718 PetscCall(spbas_allocate_pattern(&retval, PETSC_FALSE)); in spbas_pattern_only()
719 for (i = 0; i < nrows; i++) retval.row_nnz[i] = ai[i + 1] - ai[i]; in spbas_pattern_only()
720 PetscCall(spbas_allocate_data(&retval)); in spbas_pattern_only()
722 for (i = 0; i < retval.nrows; i++) { in spbas_pattern_only()
726 for (j = 0; j < r_nnz; j++) retval.icols[i][j] = aj[i0 + j] - i; in spbas_pattern_only()
728 *result = retval; in spbas_pattern_only()
777 spbas_matrix retval; in spbas_power() local
793 retval.nrows = ncols; in spbas_power()
794 retval.ncols = nrows; in spbas_power()
795 retval.nnz = 0; in spbas_power()
796 retval.col_idx_type = SPBAS_DIAGONAL_OFFSETS; in spbas_power()
797 retval.block_data = PETSC_FALSE; in spbas_power()
800 PetscCall(spbas_allocate_pattern(&retval, in_matrix.values ? PETSC_TRUE : PETSC_FALSE)); in spbas_power()
822 retval.row_nnz[i] = nnz; in spbas_power()
823 PetscCall(PetscMalloc1(nnz, &retval.icols[i])); in spbas_power()
829 retval.icols[i][inz] = j - i; in spbas_power()
834 retval.nnz += nnz; in spbas_power()
837 *result = retval; in spbas_power()