Searched refs:bc_global_ids (Results 1 – 3 of 3) sorted by relevance
| /petsc/src/ksp/ksp/tutorials/ |
| H A D | ex70.c | 1293 PetscInt *bc_global_ids; in BCApplyZero_EAST() local 1309 PetscCall(PetscMalloc1(ny * n_dofs, &bc_global_ids)); in BCApplyZero_EAST() 1313 for (i = 0; i < ny * n_dofs; i++) bc_global_ids[i] = -1; in BCApplyZero_EAST() 1321 bc_global_ids[j] = g_idx[n_dofs * local_id + d_idx]; in BCApplyZero_EAST() 1330 PetscCall(VecSetValues(b, nbcs, bc_global_ids, bc_vals, INSERT_VALUES)); in BCApplyZero_EAST() 1334 if (A) PetscCall(MatZeroRowsColumns(A, nbcs, bc_global_ids, 1.0, 0, 0)); in BCApplyZero_EAST() 1337 PetscCall(PetscFree(bc_global_ids)); in BCApplyZero_EAST() 1351 PetscInt *bc_global_ids; in BCApplyZero_WEST() local 1367 PetscCall(PetscMalloc1(ny * n_dofs, &bc_global_ids)); in BCApplyZero_WEST() 1371 for (i = 0; i < ny * n_dofs; i++) bc_global_ids[i] = -1; in BCApplyZero_WEST() [all …]
|
| H A D | ex43.c | 1639 PetscInt *bc_global_ids; in BCApplyZero_EAST() local 1655 PetscCall(PetscMalloc1(ny * n_dofs, &bc_global_ids)); in BCApplyZero_EAST() 1659 for (i = 0; i < ny * n_dofs; i++) bc_global_ids[i] = -1; in BCApplyZero_EAST() 1667 bc_global_ids[j] = g_idx[n_dofs * local_id + d_idx]; in BCApplyZero_EAST() 1676 PetscCall(VecSetValues(b, nbcs, bc_global_ids, bc_vals, INSERT_VALUES)); in BCApplyZero_EAST() 1680 if (A) PetscCall(MatZeroRowsColumns(A, nbcs, bc_global_ids, 1.0, 0, 0)); in BCApplyZero_EAST() 1683 PetscCall(PetscFree(bc_global_ids)); in BCApplyZero_EAST() 1697 PetscInt *bc_global_ids; in BCApplyZero_WEST() local 1713 PetscCall(PetscMalloc1(ny * n_dofs, &bc_global_ids)); in BCApplyZero_WEST() 1717 for (i = 0; i < ny * n_dofs; i++) bc_global_ids[i] = -1; in BCApplyZero_WEST() [all …]
|
| H A D | ex49.c | 1057 PetscInt *bc_global_ids; in BCApply_EAST() local 1076 PetscCall(PetscMalloc1(ny * n_dofs, &bc_global_ids)); in BCApply_EAST() 1080 for (i = 0; i < ny * n_dofs; i++) bc_global_ids[i] = -1; in BCApply_EAST() 1089 bc_global_ids[j] = g_idx[n_dofs * local_id + d_idx]; in BCApply_EAST() 1101 PetscCall(VecSetValues(b, nbcs, bc_global_ids, bc_vals, INSERT_VALUES)); in BCApply_EAST() 1105 if (A) PetscCall(MatZeroRows(A, nbcs, bc_global_ids, 1.0, 0, 0)); in BCApply_EAST() 1108 PetscCall(PetscFree(bc_global_ids)); in BCApply_EAST() 1122 PetscInt *bc_global_ids; in BCApply_WEST() local 1141 PetscCall(PetscMalloc1(ny * n_dofs, &bc_global_ids)); in BCApply_WEST() 1145 for (i = 0; i < ny * n_dofs; i++) bc_global_ids[i] = -1; in BCApply_WEST() [all …]
|