cloptions.c (9e3fb82be6e39ca60257599ff1be2b423bc49429) cloptions.c (5d28dccaccae4dbbdfc8aa7c8439b84e1bbb591b)
1// Copyright (c) 2017-2022, Lawrence Livermore National Security, LLC and other CEED contributors.
2// All Rights Reserved. See the top-level LICENSE and NOTICE files for details.
3//
4// SPDX-License-Identifier: BSD-2-Clause
5//
6// This file is part of CEED: http://github.com/ceed
7
8/// @file

--- 129 unchanged lines hidden (view full) ---

138 if (flg) bc->user_bc = PETSC_TRUE;
139 }
140
141 // Error if wall and slip BCs are set on the same face
142 if (bc->user_bc) {
143 for (PetscInt c = 0; c < 3; c++) {
144 for (PetscInt s = 0; s < bc->num_slip[c]; s++) {
145 for (PetscInt w = 0; w < bc->num_wall; w++) {
1// Copyright (c) 2017-2022, Lawrence Livermore National Security, LLC and other CEED contributors.
2// All Rights Reserved. See the top-level LICENSE and NOTICE files for details.
3//
4// SPDX-License-Identifier: BSD-2-Clause
5//
6// This file is part of CEED: http://github.com/ceed
7
8/// @file

--- 129 unchanged lines hidden (view full) ---

138 if (flg) bc->user_bc = PETSC_TRUE;
139 }
140
141 // Error if wall and slip BCs are set on the same face
142 if (bc->user_bc) {
143 for (PetscInt c = 0; c < 3; c++) {
144 for (PetscInt s = 0; s < bc->num_slip[c]; s++) {
145 for (PetscInt w = 0; w < bc->num_wall; w++) {
146 if (bc->slips[c][s] == bc->walls[w]) {
147 SETERRQ(PETSC_COMM_SELF, PETSC_ERR_ARG_WRONG, "Boundary condition already set on face %" PetscInt_FMT "!\n", bc->walls[w]);
148 }
146 PetscCheck(bc->slips[c][s] != bc->walls[w], PETSC_COMM_SELF, PETSC_ERR_ARG_WRONG,
147 "Boundary condition already set on face %" PetscInt_FMT "!\n", bc->walls[w]);
149 }
150 }
151 }
152 }
153
154 // Inflow BCs
155 bc->num_inflow = 16;
156 PetscCall(PetscOptionsIntArray("-bc_inflow", "Face IDs to apply inflow BC", NULL, bc->inflows, &bc->num_inflow, NULL));

--- 31 unchanged lines hidden --- 		148 }
149 }
150 }
151 }
152
153 // Inflow BCs
154 bc->num_inflow = 16;
155 PetscCall(PetscOptionsIntArray("-bc_inflow", "Face IDs to apply inflow BC", NULL, bc->inflows, &bc->num_inflow, NULL));

--- 31 unchanged lines hidden ---