@@ -343,6 +343,42 @@ int CeedBasisReference(CeedBasis basis) {
343
343
return CEED_ERROR_SUCCESS ;
344
344
}
345
345
346
+ /**
347
+ @brief Get number of Q-vector components for given CeedBasis
348
+
349
+ @param[in] basis CeedBasis
350
+ @param[in] eval_mode \ref CEED_EVAL_INTERP to use interpolated values,
351
+ \ref CEED_EVAL_GRAD to use gradients,
352
+ \ref CEED_EVAL_DIV to use divergence,
353
+ \ref CEED_EVAL_CURL to use curl.
354
+ @param[out] q_comp Variable to store number of Q-vector components of basis
355
+
356
+ @return An error code: 0 - success, otherwise - failure
357
+
358
+ @ref Backend
359
+ **/
360
+ int CeedBasisGetNumQuadratureComponents (CeedBasis basis , CeedEvalMode eval_mode , CeedInt * q_comp ) {
361
+ switch (eval_mode ) {
362
+ case CEED_EVAL_INTERP :
363
+ * q_comp = (basis -> fe_space == CEED_FE_SPACE_H1 ) ? 1 : basis -> dim ;
364
+ break ;
365
+ case CEED_EVAL_GRAD :
366
+ * q_comp = basis -> dim ;
367
+ break ;
368
+ case CEED_EVAL_DIV :
369
+ * q_comp = 1 ;
370
+ break ;
371
+ case CEED_EVAL_CURL :
372
+ * q_comp = (basis -> dim < 3 ) ? 1 : basis -> dim ;
373
+ break ;
374
+ case CEED_EVAL_NONE :
375
+ case CEED_EVAL_WEIGHT :
376
+ * q_comp = 0 ;
377
+ break ;
378
+ }
379
+ return CEED_ERROR_SUCCESS ;
380
+ }
381
+
346
382
/**
347
383
@brief Estimate number of FLOPs required to apply CeedBasis in t_mode and eval_mode
348
384
@@ -526,7 +562,7 @@ int CeedMatrixMatrixMultiply(Ceed ceed, const CeedScalar *mat_A, const CeedScala
526
562
527
563
@return An error code: 0 - success, otherwise - failure
528
564
529
- @ref Developer
565
+ @ref Utility
530
566
**/
531
567
int CeedHouseholderApplyQ (CeedScalar * A , const CeedScalar * Q , const CeedScalar * tau , CeedTransposeMode t_mode , CeedInt m , CeedInt n , CeedInt k ,
532
568
CeedInt row , CeedInt col ) {
@@ -1235,42 +1271,6 @@ int CeedBasisGetNumComponents(CeedBasis basis, CeedInt *num_comp) {
1235
1271
return CEED_ERROR_SUCCESS ;
1236
1272
}
1237
1273
1238
- /**
1239
- @brief Get number of Q-vector components for given CeedBasis
1240
-
1241
- @param[in] basis CeedBasis
1242
- @param[in] eval_mode \ref CEED_EVAL_INTERP to use interpolated values,
1243
- \ref CEED_EVAL_GRAD to use gradients,
1244
- \ref CEED_EVAL_DIV to use divergence,
1245
- \ref CEED_EVAL_CURL to use curl.
1246
- @param[out] q_comp Variable to store number of Q-vector components of basis
1247
-
1248
- @return An error code: 0 - success, otherwise - failure
1249
-
1250
- @ref Advanced
1251
- **/
1252
- int CeedBasisGetNumQuadratureComponents (CeedBasis basis , CeedEvalMode eval_mode , CeedInt * q_comp ) {
1253
- switch (eval_mode ) {
1254
- case CEED_EVAL_INTERP :
1255
- * q_comp = (basis -> fe_space == CEED_FE_SPACE_H1 ) ? 1 : basis -> dim ;
1256
- break ;
1257
- case CEED_EVAL_GRAD :
1258
- * q_comp = basis -> dim ;
1259
- break ;
1260
- case CEED_EVAL_DIV :
1261
- * q_comp = 1 ;
1262
- break ;
1263
- case CEED_EVAL_CURL :
1264
- * q_comp = (basis -> dim < 3 ) ? 1 : basis -> dim ;
1265
- break ;
1266
- case CEED_EVAL_NONE :
1267
- case CEED_EVAL_WEIGHT :
1268
- * q_comp = 0 ;
1269
- break ;
1270
- }
1271
- return CEED_ERROR_SUCCESS ;
1272
- }
1273
-
1274
1274
/**
1275
1275
@brief Get total number of nodes (in dim dimensions) of a CeedBasis
1276
1276
0 commit comments