Lines Matching refs:vwork
1336 PetscScalar *vwork; in MatView_Dense_Binary() local
1367 PetscCall(PetscMalloc1(m * N, &vwork)); in MatView_Dense_Binary()
1371 for (j = 0; j < N; j++, k++) vwork[k] = v[i + (size_t)lda * j]; in MatView_Dense_Binary()
1373 …PetscCall(PetscViewerBinaryWriteAll(viewer, vwork, m * N, PETSC_DETERMINE, PETSC_DETERMINE, PETSC_… in MatView_Dense_Binary()
1374 PetscCall(PetscFree(vwork)); in MatView_Dense_Binary()
1383 PetscScalar *v, *vwork; in MatLoad_Dense_Binary() local
1419 PetscCall(PetscMalloc1(nnz, &vwork)); in MatLoad_Dense_Binary()
1420 …PetscCall(PetscViewerBinaryReadAll(viewer, vwork, nnz, PETSC_DETERMINE, PETSC_DETERMINE, PETSC_SCA… in MatLoad_Dense_Binary()
1423 for (i = 0; i < m; i++) v[i + (size_t)lda * j] = vwork[(size_t)i * N + j]; in MatLoad_Dense_Binary()
1424 PetscCall(PetscFree(vwork)); in MatLoad_Dense_Binary()
1432 PetscCall(PetscMalloc2(nnz, &icols, nnz, &vwork)); in MatLoad_Dense_Binary()
1434 …PetscCall(PetscViewerBinaryReadAll(viewer, vwork, nnz, PETSC_DETERMINE, PETSC_DETERMINE, PETSC_SCA… in MatLoad_Dense_Binary()
1437 for (j = 0; j < rlens[i]; j++, k++) v[i + lda * icols[k]] = vwork[k]; in MatLoad_Dense_Binary()
1439 PetscCall(PetscFree2(icols, vwork)); in MatLoad_Dense_Binary()