1 // Copyright (c) 2017-2024, 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 9 /// Public header for backend components of libCEED 10 #pragma once 11 12 #include <ceed.h> 13 #include <limits.h> 14 #include <stdbool.h> 15 16 #if defined(__clang_analyzer__) 17 #define CEED_INTERN 18 #elif defined(__cplusplus) 19 #define CEED_INTERN extern "C" CEED_VISIBILITY(hidden) 20 #else 21 #define CEED_INTERN extern CEED_VISIBILITY(hidden) 22 #endif 23 24 #define CEED_UNUSED __attribute__((unused)) 25 26 #define CEED_MAX_RESOURCE_LEN 1024 27 #define CEED_MAX_BACKEND_PRIORITY UINT_MAX 28 #define CEED_ALIGN 64 29 #define CEED_COMPOSITE_MAX 16 30 #define CEED_FIELD_MAX 16 31 32 #ifndef CeedPragmaOptimizeOff 33 #if defined(__clang__) 34 /// This macro provides the ability to disable optimization flags for functions that are sensitive to floating point optimizations. 35 /// @ingroup Ceed 36 #define CeedPragmaOptimizeOff _Pragma("clang optimize off") 37 #elif defined(__GNUC__) 38 #define CeedPragmaOptimizeOff _Pragma("GCC push_options") _Pragma("GCC optimize 0") 39 #elif defined(__INTEL_COMPILER) || defined(__INTEL_LLVM_COMPILER) 40 #define CeedPragmaOptimizeOff _Pragma("optimize('', off)") 41 #else 42 #define CeedPragmaOptimizeOff 43 #endif 44 #endif 45 46 #ifndef CeedPragmaOptimizeOn 47 #if defined(__clang__) 48 /// This macro restores previously set optimization flags after CeedPragmaOptimizeOff. 49 /// @ingroup Ceed 50 #define CeedPragmaOptimizeOn _Pragma("clang optimize on") 51 #elif defined(__GNUC__) 52 #define CeedPragmaOptimizeOn _Pragma("GCC pop_options") 53 #elif defined(__INTEL_COMPILER) || defined(__INTEL_LLVM_COMPILER) 54 #define CeedPragmaOptimizeOn _Pragma("optimize('', on)") 55 #else 56 #define CeedPragmaOptimizeOn 57 #endif 58 #endif 59 60 /// This macro provides the appropriate OpenMP Pragmas for the compilation environment. 61 /// @ingroup Ceed 62 #ifndef CeedPragmaOMP 63 #ifdef _OPENMP 64 #define CeedPragmaOMPHelper(x) _Pragma(#x) 65 #define CeedPragmaOMP(x) CeedPragmaOMPHelper(omp x) 66 #else 67 #define CeedPragmaOMP(x) 68 #endif 69 #endif 70 #ifndef CeedPragmaAtomic 71 #define CeedPragmaAtomic CeedPragmaOMP(atomic update) 72 #endif 73 #ifndef CeedPragmaCritical 74 #define CeedPragmaCritical(x) CeedPragmaOMP(critical(x)) 75 #endif 76 77 /** 78 This enum supples common colors for CeedDebug256 debugging output. 79 Set the environment variable `CEED_DEBUG = 1` to activate debugging output. 80 81 @ingroup Ceed 82 @ref Backend 83 **/ 84 typedef enum { 85 /// Success color 86 CEED_DEBUG_COLOR_SUCCESS = 108, 87 /// Warning color 88 CEED_DEBUG_COLOR_WARNING = 208, 89 /// Error color 90 CEED_DEBUG_COLOR_ERROR = 196, 91 /// Use native terminal coloring 92 CEED_DEBUG_COLOR_NONE = 255, 93 } CeedDebugColor; 94 95 CEED_EXTERN void CeedDebugImpl256(const unsigned char, const char *, ...); 96 CEED_EXTERN bool CeedDebugFlag(const Ceed ceed); 97 CEED_EXTERN bool CeedDebugFlagEnv(void); 98 /** 99 Print debugging information in color 100 101 @param[in] ceed Ceed 102 @param[in] color Color to print with 103 104 @ingroup Ceed 105 @ref Backend 106 **/ 107 #define CeedDebug256(ceed, color, ...) \ 108 { \ 109 if (CeedDebugFlag(ceed)) CeedDebugImpl256(color, ##__VA_ARGS__); \ 110 } 111 /** 112 Print debugging information to terminal 113 114 @param[in] ceed Ceed 115 116 @ingroup Ceed 117 @ref Backend 118 **/ 119 #define CeedDebug(ceed, ...) CeedDebug256(ceed, (unsigned char)CEED_DEBUG_COLOR_NONE, ##__VA_ARGS__) 120 /** 121 Print debugging information in color without Ceed to reference 122 123 @param[in] color Color to print with 124 125 @ingroup Ceed 126 @ref Backend 127 **/ 128 #define CeedDebugEnv256(color, ...) \ 129 { \ 130 if (CeedDebugFlagEnv()) CeedDebugImpl256(color, ##__VA_ARGS__); \ 131 } 132 /** 133 Print debugging information to terminal without Ceed to reference 134 135 @ingroup Ceed 136 @ref Backend 137 **/ 138 #define CeedDebugEnv(...) CeedDebugEnv256((unsigned char)CEED_DEBUG_COLOR_NONE, ##__VA_ARGS__) 139 /** 140 Print warning information in color 141 142 @ingroup Ceed 143 @ref Backend 144 **/ 145 #define CeedWarn(...) \ 146 { CeedDebugImpl256(CEED_DEBUG_COLOR_WARNING, ##__VA_ARGS__); } 147 148 /** 149 Swap the values of two CeedScalars 150 151 @param[in,out] a First CeedScalar 152 @param[in,out] b Second CeedScalar 153 154 @ingroup Ceed 155 @ref Backend 156 **/ 157 #define CeedScalarSwap(a, b) \ 158 { \ 159 const CeedScalar temp_ = a; \ 160 a = b; \ 161 b = temp_; \ 162 } 163 164 /// Handle for object handling TensorContraction 165 /// @ingroup CeedBasis 166 typedef struct CeedTensorContract_private *CeedTensorContract; 167 168 /// Handle for object handling assembled QFunction data 169 /// @ingroup CeedOperator 170 typedef struct CeedQFunctionAssemblyData_private *CeedQFunctionAssemblyData; 171 172 /// Handle for object handling assembled Operator data 173 /// @ingroup CeedOperator 174 typedef struct CeedOperatorAssemblyData_private *CeedOperatorAssemblyData; 175 176 /* In the next 3 functions, p has to be the address of a pointer type, i.e. p has to be a pointer to a pointer. */ 177 CEED_INTERN int CeedMallocArray(size_t n, size_t unit, void *p); 178 CEED_INTERN int CeedCallocArray(size_t n, size_t unit, void *p); 179 CEED_INTERN int CeedReallocArray(size_t n, size_t unit, void *p); 180 CEED_INTERN int CeedStringAllocCopy(const char *source, char **copy); 181 CEED_INTERN int CeedFree(void *p); 182 183 CEED_INTERN int CeedSetHostBoolArray(const bool *source_array, CeedCopyMode copy_mode, CeedSize num_values, const bool **target_array_owned, 184 const bool **target_array_borrowed, const bool **target_array); 185 CEED_INTERN int CeedSetHostCeedInt8Array(const CeedInt8 *source_array, CeedCopyMode copy_mode, CeedSize num_values, 186 const CeedInt8 **target_array_owned, const CeedInt8 **target_array_borrowed, const CeedInt8 **target_array); 187 CEED_INTERN int CeedSetHostCeedIntArray(const CeedInt *source_array, CeedCopyMode copy_mode, CeedSize num_values, const CeedInt **target_array_owned, 188 const CeedInt **target_array_borrowed, const CeedInt **target_array); 189 CEED_INTERN int CeedSetHostCeedScalarArray(const CeedScalar *source_array, CeedCopyMode copy_mode, CeedSize num_values, 190 const CeedScalar **target_array_owned, const CeedScalar **target_array_borrowed, 191 const CeedScalar **target_array); 192 193 /** 194 @brief Calls a libCEED function and then checks the resulting error code. 195 If the error code is non-zero, then the error handler is called and the call from the current function with the error code. 196 197 @ref Developer 198 **/ 199 #define CeedCall(...) \ 200 do { \ 201 int ierr_ = __VA_ARGS__; \ 202 if (ierr_) return ierr_; \ 203 } while (0) 204 205 /** 206 @brief Calls a libCEED function and then checks the resulting error code. 207 If the error code is non-zero, then the error handler is called and the call from the current function with the error code. 208 All interface level error codes are upgraded to `CEED_ERROR_BACKEND`. 209 210 @ref Developer 211 **/ 212 #define CeedCallBackend(...) \ 213 do { \ 214 int ierr_ = __VA_ARGS__; \ 215 if (ierr_) return (ierr_ > CEED_ERROR_SUCCESS) ? CEED_ERROR_BACKEND : ierr_; \ 216 } while (0) 217 218 /** 219 @brief Check that a particular condition is true and returns a `CeedError` if not. 220 221 @ref Developer 222 **/ 223 #define CeedCheck(cond, ceed, ecode, ...) \ 224 do { \ 225 if (!(cond)) return CeedError(ceed, ecode, __VA_ARGS__); \ 226 } while (0) 227 228 /* Note that CeedMalloc and CeedCalloc will, generally, return pointers with different memory alignments: 229 CeedMalloc returns pointers aligned at CEED_ALIGN bytes, while CeedCalloc uses the alignment of calloc. */ 230 #define CeedMalloc(n, p) CeedMallocArray((n), sizeof(**(p)), p) 231 #define CeedCalloc(n, p) CeedCallocArray((n), sizeof(**(p)), p) 232 #define CeedRealloc(n, p) CeedReallocArray((n), sizeof(**(p)), p) 233 234 /* Allows calling CeedSetBackendFunctionImpl using incompatible pointer types */ 235 #define CeedSetBackendFunction(ceed, type, object, func_name, f) CeedSetBackendFunctionImpl(ceed, type, object, func_name, (void (*)(void))f) 236 237 CEED_EXTERN int CeedRegister(const char *prefix, int (*init)(const char *, Ceed), unsigned int priority); 238 CEED_EXTERN int CeedRegisterImpl(const char *prefix, int (*init)(const char *, Ceed), unsigned int priority); 239 240 CEED_EXTERN int CeedIsDebug(Ceed ceed, bool *is_debug); 241 CEED_EXTERN int CeedGetResourceRoot(Ceed ceed, const char *resource, const char *delineator, char **resource_root); 242 CEED_EXTERN int CeedGetParent(Ceed ceed, Ceed *parent); 243 CEED_EXTERN int CeedGetDelegate(Ceed ceed, Ceed *delegate); 244 CEED_EXTERN int CeedSetDelegate(Ceed ceed, Ceed delegate); 245 CEED_EXTERN int CeedGetObjectDelegate(Ceed ceed, Ceed *delegate, const char *obj_name); 246 CEED_EXTERN int CeedSetObjectDelegate(Ceed ceed, Ceed delegate, const char *obj_name); 247 CEED_EXTERN int CeedGetOperatorFallbackResource(Ceed ceed, const char **resource); 248 CEED_EXTERN int CeedGetOperatorFallbackCeed(Ceed ceed, Ceed *fallback_ceed); 249 CEED_EXTERN int CeedSetOperatorFallbackResource(Ceed ceed, const char *resource); 250 CEED_EXTERN int CeedSetDeterministic(Ceed ceed, bool is_deterministic); 251 CEED_EXTERN int CeedSetBackendFunctionImpl(Ceed ceed, const char *type, void *object, const char *func_name, void (*f)(void)); 252 CEED_EXTERN int CeedGetData(Ceed ceed, void *data); 253 CEED_EXTERN int CeedSetData(Ceed ceed, void *data); 254 CEED_EXTERN int CeedReference(Ceed ceed); 255 CEED_EXTERN int CeedGetWorkVector(Ceed ceed, CeedSize len, CeedVector *vec); 256 CEED_EXTERN int CeedRestoreWorkVector(Ceed ceed, CeedVector *vec); 257 258 CEED_EXTERN int CeedVectorHasValidArray(CeedVector vec, bool *has_valid_array); 259 CEED_EXTERN int CeedVectorHasBorrowedArrayOfType(CeedVector vec, CeedMemType mem_type, bool *has_borrowed_array_of_type); 260 CEED_EXTERN int CeedVectorHasValidArray(CeedVector vec, bool *has_valid_array); 261 CEED_EXTERN int CeedVectorGetState(CeedVector vec, uint64_t *state); 262 CEED_EXTERN int CeedVectorGetData(CeedVector vec, void *data); 263 CEED_EXTERN int CeedVectorSetData(CeedVector vec, void *data); 264 CEED_EXTERN int CeedVectorReference(CeedVector vec); 265 266 /// Type of element restriction; 267 /// @ingroup CeedElemRestriction 268 typedef enum { 269 /// Standard element restriction with offsets 270 CEED_RESTRICTION_STANDARD = 1, 271 /// Oriented element restriction 272 CEED_RESTRICTION_ORIENTED = 2, 273 /// Curl-oriented element restriction 274 CEED_RESTRICTION_CURL_ORIENTED = 3, 275 /// Strided element restriction 276 CEED_RESTRICTION_STRIDED = 4, 277 /// Point-in-cell element restriction 278 CEED_RESTRICTION_POINTS = 5, 279 } CeedRestrictionType; 280 281 CEED_EXTERN int CeedElemRestrictionGetType(CeedElemRestriction rstr, CeedRestrictionType *rstr_type); 282 CEED_EXTERN int CeedElemRestrictionIsStrided(CeedElemRestriction rstr, bool *is_strided); 283 CEED_EXTERN int CeedElemRestrictionIsAtPoints(CeedElemRestriction rstr, bool *is_points); 284 CEED_EXTERN int CeedElemRestrictionAtPointsAreCompatible(CeedElemRestriction rstr_a, CeedElemRestriction rstr_b, bool *are_compatible); 285 CEED_EXTERN int CeedElemRestrictionGetStrides(CeedElemRestriction rstr, CeedInt strides[3]); 286 CEED_EXTERN int CeedElemRestrictionHasBackendStrides(CeedElemRestriction rstr, bool *has_backend_strides); 287 CEED_EXTERN int CeedElemRestrictionGetOffsets(CeedElemRestriction rstr, CeedMemType mem_type, const CeedInt **offsets); 288 CEED_EXTERN int CeedElemRestrictionRestoreOffsets(CeedElemRestriction rstr, const CeedInt **offsets); 289 CEED_EXTERN int CeedElemRestrictionGetOrientations(CeedElemRestriction rstr, CeedMemType mem_type, const bool **orients); 290 CEED_EXTERN int CeedElemRestrictionRestoreOrientations(CeedElemRestriction rstr, const bool **orients); 291 CEED_EXTERN int CeedElemRestrictionGetCurlOrientations(CeedElemRestriction rstr, CeedMemType mem_type, const CeedInt8 **curl_orients); 292 CEED_EXTERN int CeedElemRestrictionRestoreCurlOrientations(CeedElemRestriction rstr, const CeedInt8 **curl_orients); 293 CEED_EXTERN int CeedElemRestrictionGetLLayout(CeedElemRestriction rstr, CeedInt layout[3]); 294 CEED_EXTERN int CeedElemRestrictionSetLLayout(CeedElemRestriction rstr, CeedInt layout[3]); 295 CEED_EXTERN int CeedElemRestrictionGetELayout(CeedElemRestriction rstr, CeedInt layout[3]); 296 CEED_EXTERN int CeedElemRestrictionSetELayout(CeedElemRestriction rstr, CeedInt layout[3]); 297 CEED_EXTERN int CeedElemRestrictionGetAtPointsElementOffset(CeedElemRestriction rstr, CeedInt elem, CeedSize *elem_offset); 298 CEED_EXTERN int CeedElemRestrictionSetAtPointsEVectorSize(CeedElemRestriction rstr, CeedSize e_size); 299 CEED_EXTERN int CeedElemRestrictionGetData(CeedElemRestriction rstr, void *data); 300 CEED_EXTERN int CeedElemRestrictionSetData(CeedElemRestriction rstr, void *data); 301 CEED_EXTERN int CeedElemRestrictionReference(CeedElemRestriction rstr); 302 CEED_EXTERN int CeedElemRestrictionGetFlopsEstimate(CeedElemRestriction rstr, CeedTransposeMode t_mode, CeedSize *flops); 303 304 /// Type of FE space; 305 /// @ingroup CeedBasis 306 typedef enum { 307 /// H^1 FE space 308 CEED_FE_SPACE_H1 = 1, 309 /// H(div) FE space 310 CEED_FE_SPACE_HDIV = 2, 311 /// H(curl) FE space 312 CEED_FE_SPACE_HCURL = 3, 313 } CeedFESpace; 314 CEED_EXTERN const char *const CeedFESpaces[]; 315 316 CEED_EXTERN int CeedBasisGetCollocatedGrad(CeedBasis basis, CeedScalar *colo_grad_1d); 317 CEED_EXTERN int CeedBasisGetChebyshevInterp1D(CeedBasis basis, CeedScalar *chebyshev_interp_1d); 318 CEED_EXTERN int CeedBasisIsTensor(CeedBasis basis, bool *is_tensor); 319 CEED_EXTERN int CeedBasisGetData(CeedBasis basis, void *data); 320 CEED_EXTERN int CeedBasisSetData(CeedBasis basis, void *data); 321 CEED_EXTERN int CeedBasisReference(CeedBasis basis); 322 CEED_EXTERN int CeedBasisGetNumQuadratureComponents(CeedBasis basis, CeedEvalMode eval_mode, CeedInt *q_comp); 323 CEED_EXTERN int CeedBasisGetFlopsEstimate(CeedBasis basis, CeedTransposeMode t_mode, CeedEvalMode eval_mode, CeedSize *flops); 324 CEED_EXTERN int CeedBasisGetFESpace(CeedBasis basis, CeedFESpace *fe_space); 325 CEED_EXTERN int CeedBasisGetTopologyDimension(CeedElemTopology topo, CeedInt *dim); 326 CEED_EXTERN int CeedBasisGetTensorContract(CeedBasis basis, CeedTensorContract *contract); 327 CEED_EXTERN int CeedBasisSetTensorContract(CeedBasis basis, CeedTensorContract contract); 328 329 CEED_EXTERN int CeedTensorContractCreate(Ceed ceed, CeedTensorContract *contract); 330 CEED_EXTERN int CeedTensorContractApply(CeedTensorContract contract, CeedInt A, CeedInt B, CeedInt C, CeedInt J, const CeedScalar *__restrict__ t, 331 CeedTransposeMode t_mode, const CeedInt Add, const CeedScalar *__restrict__ u, CeedScalar *__restrict__ v); 332 CEED_EXTERN int CeedTensorContractStridedApply(CeedTensorContract contract, CeedInt A, CeedInt B, CeedInt C, CeedInt D, CeedInt J, 333 const CeedScalar *__restrict__ t, CeedTransposeMode t_mode, const CeedInt add, 334 const CeedScalar *__restrict__ u, CeedScalar *__restrict__ v); 335 CEED_EXTERN int CeedTensorContractGetCeed(CeedTensorContract contract, Ceed *ceed); 336 CEED_EXTERN Ceed CeedTensorContractReturnCeed(CeedTensorContract contract); 337 CEED_EXTERN int CeedTensorContractGetData(CeedTensorContract contract, void *data); 338 CEED_EXTERN int CeedTensorContractSetData(CeedTensorContract contract, void *data); 339 CEED_EXTERN int CeedTensorContractReference(CeedTensorContract contract); 340 CEED_EXTERN int CeedTensorContractReferenceCopy(CeedTensorContract tensor, CeedTensorContract *tensor_copy); 341 CEED_EXTERN int CeedTensorContractDestroy(CeedTensorContract *contract); 342 343 CEED_EXTERN int CeedQFunctionRegister(const char *name, const char *source, CeedInt vec_length, CeedQFunctionUser f, 344 int (*init)(Ceed, const char *, CeedQFunction)); 345 CEED_EXTERN int CeedQFunctionSetFortranStatus(CeedQFunction qf, bool status); 346 CEED_EXTERN int CeedQFunctionGetVectorLength(CeedQFunction qf, CeedInt *vec_length); 347 CEED_EXTERN int CeedQFunctionGetNumArgs(CeedQFunction qf, CeedInt *num_input_fields, CeedInt *num_output_fields); 348 CEED_EXTERN int CeedQFunctionGetKernelName(CeedQFunction qf, const char **kernel_name); 349 CEED_EXTERN int CeedQFunctionGetSourcePath(CeedQFunction qf, const char **source_path); 350 CEED_EXTERN int CeedQFunctionLoadSourceToBuffer(CeedQFunction qf, const char **source_buffer); 351 CEED_EXTERN int CeedQFunctionGetUserFunction(CeedQFunction qf, CeedQFunctionUser *f); 352 CEED_EXTERN int CeedQFunctionGetContext(CeedQFunction qf, CeedQFunctionContext *ctx); 353 CEED_EXTERN int CeedQFunctionGetContextData(CeedQFunction qf, CeedMemType mem_type, void *data); 354 CEED_EXTERN int CeedQFunctionRestoreContextData(CeedQFunction qf, void *data); 355 CEED_EXTERN int CeedQFunctionGetInnerContext(CeedQFunction qf, CeedQFunctionContext *ctx); 356 CEED_EXTERN int CeedQFunctionGetInnerContextData(CeedQFunction qf, CeedMemType mem_type, void *data); 357 CEED_EXTERN int CeedQFunctionRestoreInnerContextData(CeedQFunction qf, void *data); 358 CEED_EXTERN int CeedQFunctionIsIdentity(CeedQFunction qf, bool *is_identity); 359 CEED_EXTERN int CeedQFunctionIsContextWritable(CeedQFunction qf, bool *is_writable); 360 CEED_EXTERN int CeedQFunctionGetData(CeedQFunction qf, void *data); 361 CEED_EXTERN int CeedQFunctionSetData(CeedQFunction qf, void *data); 362 CEED_EXTERN int CeedQFunctionIsImmutable(CeedQFunction qf, bool *is_immutable); 363 CEED_EXTERN int CeedQFunctionSetImmutable(CeedQFunction qf); 364 CEED_EXTERN int CeedQFunctionReference(CeedQFunction qf); 365 CEED_EXTERN int CeedQFunctionGetFlopsEstimate(CeedQFunction qf, CeedSize *flops); 366 367 CEED_EXTERN int CeedQFunctionContextGetCeed(CeedQFunctionContext ctx, Ceed *ceed); 368 CEED_EXTERN Ceed CeedQFunctionContextReturnCeed(CeedQFunctionContext ctx); 369 CEED_EXTERN int CeedQFunctionContextHasValidData(CeedQFunctionContext ctx, bool *has_valid_data); 370 CEED_EXTERN int CeedQFunctionContextHasBorrowedDataOfType(CeedQFunctionContext ctx, CeedMemType mem_type, bool *has_borrowed_data_of_type); 371 CEED_EXTERN int CeedQFunctionContextGetState(CeedQFunctionContext ctx, uint64_t *state); 372 CEED_EXTERN int CeedQFunctionContextGetBackendData(CeedQFunctionContext ctx, void *data); 373 CEED_EXTERN int CeedQFunctionContextSetBackendData(CeedQFunctionContext ctx, void *data); 374 CEED_EXTERN int CeedQFunctionContextGetFieldLabel(CeedQFunctionContext ctx, const char *field_name, CeedContextFieldLabel *field_label); 375 CEED_EXTERN int CeedQFunctionContextSetGeneric(CeedQFunctionContext ctx, CeedContextFieldLabel field_label, CeedContextFieldType field_type, 376 void *value); 377 CEED_EXTERN int CeedQFunctionContextGetGenericRead(CeedQFunctionContext ctx, CeedContextFieldLabel field_label, CeedContextFieldType field_type, 378 size_t *num_values, void *value); 379 CEED_EXTERN int CeedQFunctionContextRestoreGenericRead(CeedQFunctionContext ctx, CeedContextFieldLabel field_label, CeedContextFieldType field_type, 380 void *value); 381 CEED_EXTERN int CeedQFunctionContextSetDouble(CeedQFunctionContext ctx, CeedContextFieldLabel field_label, double *values); 382 CEED_EXTERN int CeedQFunctionContextGetDoubleRead(CeedQFunctionContext ctx, CeedContextFieldLabel field_label, size_t *num_values, 383 const double **values); 384 CEED_EXTERN int CeedQFunctionContextRestoreDoubleRead(CeedQFunctionContext ctx, CeedContextFieldLabel field_label, const double **values); 385 CEED_EXTERN int CeedQFunctionContextSetInt32(CeedQFunctionContext ctx, CeedContextFieldLabel field_label, int32_t *values); 386 CEED_EXTERN int CeedQFunctionContextGetInt32Read(CeedQFunctionContext ctx, CeedContextFieldLabel field_label, size_t *num_values, 387 const int32_t **values); 388 CEED_EXTERN int CeedQFunctionContextRestoreInt32Read(CeedQFunctionContext ctx, CeedContextFieldLabel field_label, const int32_t **values); 389 CEED_EXTERN int CeedQFunctionContextSetBoolean(CeedQFunctionContext ctx, CeedContextFieldLabel field_label, bool *values); 390 CEED_EXTERN int CeedQFunctionContextGetBooleanRead(CeedQFunctionContext ctx, CeedContextFieldLabel field_label, size_t *num_values, 391 const bool **values); 392 CEED_EXTERN int CeedQFunctionContextRestoreBooleanRead(CeedQFunctionContext ctx, CeedContextFieldLabel field_label, const bool **values); 393 CEED_EXTERN int CeedQFunctionContextGetDataDestroy(CeedQFunctionContext ctx, CeedMemType *f_mem_type, CeedQFunctionContextDataDestroyUser *f); 394 CEED_EXTERN int CeedQFunctionContextReference(CeedQFunctionContext ctx); 395 396 CEED_EXTERN int CeedOperatorGetBasisPointer(CeedBasis basis, CeedEvalMode eval_mode, const CeedScalar *identity, const CeedScalar **basis_ptr); 397 CEED_EXTERN int CeedOperatorCreateActivePointBlockRestriction(CeedElemRestriction rstr, CeedElemRestriction *pointblock_rstr); 398 399 CEED_EXTERN int CeedOperatorGetQFunctionAssemblyData(CeedOperator op, CeedQFunctionAssemblyData *data); 400 CEED_EXTERN int CeedQFunctionAssemblyDataCreate(Ceed ceed, CeedQFunctionAssemblyData *data); 401 CEED_EXTERN int CeedQFunctionAssemblyDataReference(CeedQFunctionAssemblyData data); 402 CEED_EXTERN int CeedQFunctionAssemblyDataSetReuse(CeedQFunctionAssemblyData data, bool reuse_assembly_data); 403 CEED_EXTERN int CeedQFunctionAssemblyDataSetUpdateNeeded(CeedQFunctionAssemblyData data, bool needs_data_update); 404 CEED_EXTERN int CeedQFunctionAssemblyDataIsUpdateNeeded(CeedQFunctionAssemblyData data, bool *is_update_needed); 405 CEED_EXTERN int CeedQFunctionAssemblyDataReferenceCopy(CeedQFunctionAssemblyData data, CeedQFunctionAssemblyData *data_copy); 406 CEED_EXTERN int CeedQFunctionAssemblyDataIsSetup(CeedQFunctionAssemblyData data, bool *is_setup); 407 CEED_EXTERN int CeedQFunctionAssemblyDataSetObjects(CeedQFunctionAssemblyData data, CeedVector vec, CeedElemRestriction rstr); 408 CEED_EXTERN int CeedQFunctionAssemblyDataGetObjects(CeedQFunctionAssemblyData data, CeedVector *vec, CeedElemRestriction *rstr); 409 CEED_EXTERN int CeedQFunctionAssemblyDataDestroy(CeedQFunctionAssemblyData *data); 410 411 CEED_EXTERN int CeedOperatorGetOperatorAssemblyData(CeedOperator op, CeedOperatorAssemblyData *data); 412 CEED_EXTERN int CeedOperatorAssemblyDataCreate(Ceed ceed, CeedOperator op, CeedOperatorAssemblyData *data); 413 CEED_EXTERN int CeedOperatorAssemblyDataGetEvalModes(CeedOperatorAssemblyData data, CeedInt *num_active_bases_in, CeedInt **num_eval_modes_in, 414 const CeedEvalMode ***eval_modes_in, CeedSize ***eval_mode_offsets_in, 415 CeedInt *num_active_bases_out, CeedInt **num_eval_modes_out, 416 const CeedEvalMode ***eval_modes_out, CeedSize ***eval_mode_offsets_out, 417 CeedSize *num_output_components); 418 CEED_EXTERN int CeedOperatorAssemblyDataGetBases(CeedOperatorAssemblyData data, CeedInt *num_active_bases_in, CeedBasis **active_bases_in, 419 const CeedScalar ***assembled_bases_in, CeedInt *num_active_bases_out, CeedBasis **active_bases_out, 420 const CeedScalar ***assembled_bases_out); 421 CEED_EXTERN int CeedOperatorAssemblyDataGetElemRestrictions(CeedOperatorAssemblyData data, CeedInt *num_active_elem_rstrs_in, 422 CeedElemRestriction **active_elem_rstrs_in, CeedInt *num_active_elem_rstrs_out, 423 CeedElemRestriction **active_elem_rstrs_out); 424 CEED_EXTERN int CeedOperatorAssemblyDataDestroy(CeedOperatorAssemblyData *data); 425 426 CEED_EXTERN int CeedOperatorGetActiveBasis(CeedOperator op, CeedBasis *active_basis); 427 CEED_EXTERN int CeedOperatorGetActiveBases(CeedOperator op, CeedBasis *active_input_basis, CeedBasis *active_output_basis); 428 CEED_EXTERN int CeedOperatorGetActiveElemRestriction(CeedOperator op, CeedElemRestriction *active_rstr); 429 CEED_EXTERN int CeedOperatorGetActiveElemRestrictions(CeedOperator op, CeedElemRestriction *active_input_rstr, 430 CeedElemRestriction *active_output_rstr); 431 CEED_EXTERN int CeedOperatorGetNumArgs(CeedOperator op, CeedInt *num_args); 432 CEED_EXTERN int CeedOperatorHasTensorBases(CeedOperator op, bool *has_tensor_bases); 433 CEED_EXTERN int CeedOperatorIsImmutable(CeedOperator op, bool *is_immutable); 434 CEED_EXTERN int CeedOperatorIsSetupDone(CeedOperator op, bool *is_setup_done); 435 CEED_EXTERN int CeedOperatorGetQFunction(CeedOperator op, CeedQFunction *qf); 436 CEED_EXTERN int CeedOperatorIsComposite(CeedOperator op, bool *is_composite); 437 CEED_EXTERN int CeedOperatorGetData(CeedOperator op, void *data); 438 CEED_EXTERN int CeedOperatorSetData(CeedOperator op, void *data); 439 CEED_EXTERN int CeedOperatorReference(CeedOperator op); 440 CEED_EXTERN int CeedOperatorGetFallback(CeedOperator op, CeedOperator *op_fallback); 441 CEED_EXTERN int CeedOperatorGetFallbackParent(CeedOperator op, CeedOperator *parent); 442 CEED_EXTERN int CeedOperatorGetFallbackParentCeed(CeedOperator op, Ceed *parent); 443 CEED_EXTERN int CeedOperatorSetSetupDone(CeedOperator op); 444 445 CEED_INTERN int CeedMatrixMatrixMultiply(Ceed ceed, const CeedScalar *mat_A, const CeedScalar *mat_B, CeedScalar *mat_C, CeedInt m, CeedInt n, 446 CeedInt kk); 447 CEED_EXTERN int CeedQRFactorization(Ceed ceed, CeedScalar *mat, CeedScalar *tau, CeedInt m, CeedInt n); 448 CEED_EXTERN int CeedHouseholderApplyQ(CeedScalar *mat_A, const CeedScalar *mat_Q, const CeedScalar *tau, CeedTransposeMode t_mode, CeedInt m, 449 CeedInt n, CeedInt k, CeedInt row, CeedInt col); 450 CEED_EXTERN int CeedMatrixPseudoinverse(Ceed ceed, const CeedScalar *mat, CeedInt m, CeedInt n, CeedScalar *mat_pinv); 451 CEED_EXTERN int CeedSymmetricSchurDecomposition(Ceed ceed, CeedScalar *mat, CeedScalar *lambda, CeedInt n); 452 CEED_EXTERN int CeedSimultaneousDiagonalization(Ceed ceed, CeedScalar *mat_A, CeedScalar *mat_B, CeedScalar *x, CeedScalar *lambda, CeedInt n); 453