ceed-operator.c (cb03979f09f11f2f58ca1dff8031348aa48729d3) ceed-operator.c (41bdf1c9f3b677ca0cd3704eec13319d41b7356c)
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#include <ceed/ceed.h>

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

59 }
60 // Basis
61 if (b != CEED_BASIS_COLLOCATED) {
62 if (eval_mode == CEED_EVAL_NONE)
63 // LCOV_EXCL_START
64 return CeedError(ceed, CEED_ERROR_INCOMPATIBLE,
65 "Field '%s' configured with CEED_EVAL_NONE must "
66 "be used with CEED_BASIS_COLLOCATED",
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#include <ceed/ceed.h>

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

59 }
60 // Basis
61 if (b != CEED_BASIS_COLLOCATED) {
62 if (eval_mode == CEED_EVAL_NONE)
63 // LCOV_EXCL_START
64 return CeedError(ceed, CEED_ERROR_INCOMPATIBLE,
65 "Field '%s' configured with CEED_EVAL_NONE must "
66 "be used with CEED_BASIS_COLLOCATED",
67 // LCOV_EXCL_STOP
68 qf_field->field_name);
67 qf_field->field_name);
68 // LCOV_EXCL_STOP
69 ierr = CeedBasisGetDimension(b, &dim); CeedChk(ierr);
70 ierr = CeedBasisGetNumComponents(b, &num_comp); CeedChk(ierr);
71 if (r != CEED_ELEMRESTRICTION_NONE && restr_num_comp != num_comp) {
72 // LCOV_EXCL_START
73 return CeedError(ceed, CEED_ERROR_DIMENSION,
74 "Field '%s' of size %" CeedInt_FMT " and EvalMode %s: ElemRestriction "
75 "has %" CeedInt_FMT " components, but Basis has %" CeedInt_FMT " components",
76 qf_field->field_name, qf_field->size, CeedEvalModes[qf_field->eval_mode],
77 restr_num_comp,
78 num_comp);
79 // LCOV_EXCL_STOP
80 }
69 ierr = CeedBasisGetDimension(b, &dim); CeedChk(ierr);
70 ierr = CeedBasisGetNumComponents(b, &num_comp); CeedChk(ierr);
71 if (r != CEED_ELEMRESTRICTION_NONE && restr_num_comp != num_comp) {
72 // LCOV_EXCL_START
73 return CeedError(ceed, CEED_ERROR_DIMENSION,
74 "Field '%s' of size %" CeedInt_FMT " and EvalMode %s: ElemRestriction "
75 "has %" CeedInt_FMT " components, but Basis has %" CeedInt_FMT " components",
76 qf_field->field_name, qf_field->size, CeedEvalModes[qf_field->eval_mode],
77 restr_num_comp,
78 num_comp);
79 // LCOV_EXCL_STOP
80 }
81 } else if (eval_mode != CEED_EVAL_NONE) {
82 // LCOV_EXCL_START
83 return CeedError(ceed, CEED_ERROR_INCOMPATIBLE,
84 "Field '%s' configured with %s cannot "
85 "be used with CEED_BASIS_COLLOCATED",
86 qf_field->field_name, CeedEvalModes[eval_mode]);
87 // LCOV_EXCL_STOP
88
81 }
82 // Field size
83 switch(eval_mode) {
84 case CEED_EVAL_NONE:
85 if (size != restr_num_comp)
86 // LCOV_EXCL_START
87 return CeedError(ceed, CEED_ERROR_DIMENSION,
88 "Field '%s' of size %" CeedInt_FMT " and EvalMode %s: ElemRestriction has "

--- 1635 unchanged lines hidden --- 		89 }
90 // Field size
91 switch(eval_mode) {
92 case CEED_EVAL_NONE:
93 if (size != restr_num_comp)
94 // LCOV_EXCL_START
95 return CeedError(ceed, CEED_ERROR_DIMENSION,
96 "Field '%s' of size %" CeedInt_FMT " and EvalMode %s: ElemRestriction has "

--- 1635 unchanged lines hidden ---