xref: /libCEED/include/ceed/ceed.h (revision b2165e7a2e371018feedcb47974a027ed47e0487)
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
9 /// Public header for user and utility components of libCEED
10 #ifndef _ceed_h
11 #define _ceed_h
12 
13 /// @defgroup Ceed Ceed: core components
14 /// @defgroup CeedVector CeedVector: storing and manipulating vectors
15 /// @defgroup CeedElemRestriction CeedElemRestriction: restriction from local vectors to elements
16 /// @defgroup CeedBasis CeedBasis: fully discrete finite element-like objects
17 /// @defgroup CeedQFunction CeedQFunction: independent operations at quadrature points
18 /// @defgroup CeedOperator CeedOperator: composed FE-type operations on vectors
19 ///
20 /// @page FunctionCategories libCEED: Types of Functions libCEED provides three different header files depending upon the type of functions a user
21 /// requires.
22 /// @section Utility Utility Functions
23 ///    These functions are intended general utilities that may be useful to libCEED developers and users.
24 ///    These functions can generally be found in "ceed.h".
25 /// @section User User Functions
26 ///    These functions are intended to be used by general users of libCEED and can generally be found in "ceed.h".
27 /// @section Advanced Advanced Functions
28 ///    These functions are intended to be used by advanced users of libCEED and can generally be found in "ceed.h".
29 /// @section Backend Backend Developer Functions
30 ///    These functions are intended to be used by backend developers of libCEED and can generally be found in "ceed-backend.h".
31 /// @section Developer Library Developer Functions
32 ///    These functions are intended to be used by library developers of libCEED and can generally be found in "ceed-impl.h".
33 
34 #if !defined(CEED_SKIP_VISIBILITY)
35 #define CEED_VISIBILITY(mode) __attribute__((visibility(#mode)))
36 #else
37 #define CEED_VISIBILITY(mode)
38 #endif
39 
40 /**
41   CEED_EXTERN is used in this header to denote all publicly visible symbols.
42 
43   No other file should declare publicly visible symbols, thus it should never be used outside ceed.h.
44  */
45 #if defined(__clang_analyzer__)
46 #define CEED_EXTERN extern
47 #elif defined(__cplusplus)
48 #define CEED_EXTERN extern "C" CEED_VISIBILITY(default)
49 #else
50 #define CEED_EXTERN extern CEED_VISIBILITY(default)
51 #endif
52 
53 #include <stdarg.h>
54 #include <stdbool.h>
55 #include <stdio.h>
56 
57 /// Typedefs and macros used in public interfaces and user QFunction source
58 #include "types.h"  // IWYU pragma: export
59 /// This line prevents IWYU from suggesting "ceed.h"
60 // IWYU pragma: private, include <ceed.h>
61 
62 /// Library context created by CeedInit()
63 /// @ingroup CeedUser
64 typedef struct Ceed_private *Ceed;
65 /// Non-blocking Ceed interfaces return a CeedRequest.
66 /// To perform an operation immediately, pass \ref CEED_REQUEST_IMMEDIATE instead.
67 /// @ingroup CeedUser
68 typedef struct CeedRequest_private *CeedRequest;
69 /// Handle for vectors over the field \ref CeedScalar
70 /// @ingroup CeedVectorUser
71 typedef struct CeedVector_private *CeedVector;
72 /// Handle for object describing restriction to elements
73 /// @ingroup CeedElemRestrictionUser
74 typedef struct CeedElemRestriction_private *CeedElemRestriction;
75 /// Handle for object describing discrete finite element evaluations
76 /// @ingroup CeedBasisUser
77 typedef struct CeedBasis_private *CeedBasis;
78 /// Handle for object describing CeedQFunction fields
79 /// @ingroup CeedQFunctionBackend
80 typedef struct CeedQFunctionField_private *CeedQFunctionField;
81 /// Handle for object describing functions evaluated independently at quadrature points
82 /// @ingroup CeedQFunctionUser
83 typedef struct CeedQFunction_private *CeedQFunction;
84 /// Handle for object describing CeedOperator fields
85 /// @ingroup CeedOperatorBackend
86 typedef struct CeedOperatorField_private *CeedOperatorField;
87 /// Handle for object describing context data for CeedQFunctions
88 /// @ingroup CeedQFunctionUser
89 typedef struct CeedQFunctionContext_private *CeedQFunctionContext;
90 /// Handle for object describing registered fields for CeedQFunctionContext
91 /// @ingroup CeedQFunctionUser
92 typedef struct CeedContextFieldLabel_private *CeedContextFieldLabel;
93 /// Handle for object describing FE-type operators acting on vectors
94 ///
95 /// Given an element restriction \f$E\f$, basis evaluator \f$B\f$, and quadrature function\f$f\f$, a CeedOperator expresses operations of the form
96 /// \f$E^T B^T f(B E u)\f$ acting on the vector \f$u\f$.
97 /// @ingroup CeedOperatorUser
98 typedef struct CeedOperator_private *CeedOperator;
99 
100 CEED_EXTERN int CeedRegistryGetList(size_t *n, char ***const resources, CeedInt **array);
101 CEED_EXTERN int CeedInit(const char *resource, Ceed *ceed);
102 CEED_EXTERN int CeedSetStream(Ceed ceed, void *handle);
103 CEED_EXTERN int CeedReferenceCopy(Ceed ceed, Ceed *ceed_copy);
104 CEED_EXTERN int CeedGetResource(Ceed ceed, const char **resource);
105 CEED_EXTERN int CeedIsDeterministic(Ceed ceed, bool *is_deterministic);
106 CEED_EXTERN int CeedAddJitSourceRoot(Ceed ceed, const char *jit_source_root);
107 CEED_EXTERN int CeedView(Ceed ceed, FILE *stream);
108 CEED_EXTERN int CeedDestroy(Ceed *ceed);
109 
110 CEED_EXTERN int CeedErrorImpl(Ceed, const char *, int, const char *, int, const char *, ...);
111 /// Raise an error on ceed object
112 ///
113 /// @param ceed Ceed library context or NULL
114 /// @param ecode Error code (int)
115 /// @param ... printf-style format string followed by arguments as needed
116 ///
117 /// @ingroup Ceed
118 /// @sa CeedSetErrorHandler()
119 #define CeedError(ceed, ecode, ...) (CeedErrorImpl((ceed), __FILE__, __LINE__, __func__, (ecode), __VA_ARGS__), (ecode))
120 
121 /// Ceed error handlers
122 CEED_EXTERN int CeedErrorReturn(Ceed, const char *, int, const char *, int, const char *, va_list *);
123 CEED_EXTERN int CeedErrorStore(Ceed, const char *, int, const char *, int, const char *, va_list *);
124 CEED_EXTERN int CeedErrorAbort(Ceed, const char *, int, const char *, int, const char *, va_list *);
125 CEED_EXTERN int CeedErrorExit(Ceed, const char *, int, const char *, int, const char *, va_list *);
126 typedef int (*CeedErrorHandler)(Ceed, const char *, int, const char *, int, const char *, va_list *);
127 CEED_EXTERN int CeedSetErrorHandler(Ceed ceed, CeedErrorHandler eh);
128 CEED_EXTERN int CeedGetErrorMessage(Ceed, const char **err_msg);
129 CEED_EXTERN int CeedResetErrorMessage(Ceed, const char **err_msg);
130 
131 /// libCEED library version numbering
132 /// @ingroup Ceed
133 #define CEED_VERSION_MAJOR 0
134 #define CEED_VERSION_MINOR 11
135 #define CEED_VERSION_PATCH 0
136 #define CEED_VERSION_RELEASE false
137 
138 /// Compile-time check that the the current library version is at least as recent as the specified version.
139 /// This macro is typically used in
140 /// @code
141 /// #if CEED_VERSION_GE(0, 8, 0)
142 ///   code path that needs at least 0.8.0
143 /// #else
144 ///   fallback code for older versions
145 /// #endif
146 /// @endcode
147 ///
148 /// A non-release version always compares as positive infinity.
149 ///
150 /// @param major   Major version
151 /// @param minor   Minor version
152 /// @param patch   Patch (subminor) version
153 ///
154 /// @ingroup Ceed
155 /// @sa CeedGetVersion()
156 #define CEED_VERSION_GE(major, minor, patch) \
157   (!CEED_VERSION_RELEASE ||                  \
158    (CEED_VERSION_MAJOR > major ||            \
159     (CEED_VERSION_MAJOR == major && (CEED_VERSION_MINOR > minor || (CEED_VERSION_MINOR == minor && CEED_VERSION_PATCH >= patch)))))
160 
161 CEED_EXTERN int CeedGetVersion(int *major, int *minor, int *patch, bool *release);
162 
163 CEED_EXTERN int CeedGetScalarType(CeedScalarType *scalar_type);
164 
165 /// String names for enum pretty printing
166 CEED_EXTERN const char *const *CeedErrorTypes;
167 CEED_EXTERN const char *const  CeedMemTypes[];
168 CEED_EXTERN const char *const  CeedCopyModes[];
169 CEED_EXTERN const char *const  CeedTransposeModes[];
170 CEED_EXTERN const char *const  CeedEvalModes[];
171 CEED_EXTERN const char *const  CeedQuadModes[];
172 CEED_EXTERN const char *const  CeedElemTopologies[];
173 CEED_EXTERN const char *const  CeedContextFieldTypes[];
174 
175 CEED_EXTERN int CeedGetPreferredMemType(Ceed ceed, CeedMemType *type);
176 
177 CEED_EXTERN int CeedVectorCreate(Ceed ceed, CeedSize len, CeedVector *vec);
178 CEED_EXTERN int CeedVectorReferenceCopy(CeedVector vec, CeedVector *vec_copy);
179 CEED_EXTERN int CeedVectorCopy(CeedVector vec, CeedVector vec_copy);
180 CEED_EXTERN int CeedVectorSetArray(CeedVector vec, CeedMemType mem_type, CeedCopyMode copy_mode, CeedScalar *array);
181 CEED_EXTERN int CeedVectorSetValue(CeedVector vec, CeedScalar value);
182 CEED_EXTERN int CeedVectorSyncArray(CeedVector vec, CeedMemType mem_type);
183 CEED_EXTERN int CeedVectorTakeArray(CeedVector vec, CeedMemType mem_type, CeedScalar **array);
184 CEED_EXTERN int CeedVectorGetArray(CeedVector vec, CeedMemType mem_type, CeedScalar **array);
185 CEED_EXTERN int CeedVectorGetArrayRead(CeedVector vec, CeedMemType mem_type, const CeedScalar **array);
186 CEED_EXTERN int CeedVectorGetArrayWrite(CeedVector vec, CeedMemType mem_type, CeedScalar **array);
187 CEED_EXTERN int CeedVectorRestoreArray(CeedVector vec, CeedScalar **array);
188 CEED_EXTERN int CeedVectorRestoreArrayRead(CeedVector vec, const CeedScalar **array);
189 CEED_EXTERN int CeedVectorNorm(CeedVector vec, CeedNormType type, CeedScalar *norm);
190 CEED_EXTERN int CeedVectorScale(CeedVector x, CeedScalar alpha);
191 CEED_EXTERN int CeedVectorAXPY(CeedVector y, CeedScalar alpha, CeedVector x);
192 CEED_EXTERN int CeedVectorAXPBY(CeedVector y, CeedScalar alpha, CeedScalar beta, CeedVector x);
193 CEED_EXTERN int CeedVectorPointwiseMult(CeedVector w, CeedVector x, CeedVector y);
194 CEED_EXTERN int CeedVectorReciprocal(CeedVector vec);
195 CEED_EXTERN int CeedVectorViewRange(CeedVector vec, CeedSize start, CeedSize stop, CeedInt step, const char *fp_fmt, FILE *stream);
196 CEED_EXTERN int CeedVectorView(CeedVector vec, const char *fp_fmt, FILE *stream);
197 CEED_EXTERN int CeedVectorGetCeed(CeedVector vec, Ceed *ceed);
198 CEED_EXTERN int CeedVectorGetLength(CeedVector vec, CeedSize *length);
199 CEED_EXTERN int CeedVectorDestroy(CeedVector *vec);
200 
201 CEED_EXTERN CeedRequest *const CEED_REQUEST_IMMEDIATE;
202 CEED_EXTERN CeedRequest *const CEED_REQUEST_ORDERED;
203 CEED_EXTERN int                CeedRequestWait(CeedRequest *req);
204 
205 /// Argument for CeedOperatorSetField that vector is collocated with quadrature points, only used with CeedEvalMode CEED_EVAL_NONE
206 /// @ingroup CeedBasis
207 CEED_EXTERN const CeedBasis CEED_BASIS_COLLOCATED;
208 
209 /// Argument for CeedOperatorSetField to use active input or output
210 /// @ingroup CeedVector
211 CEED_EXTERN const CeedVector CEED_VECTOR_ACTIVE;
212 
213 /// Argument for CeedOperatorSetField to use no vector, used with QFunction input with eval mode CEED_EVAL_WEIGHT
214 /// @ingroup CeedVector
215 CEED_EXTERN const CeedVector CEED_VECTOR_NONE;
216 
217 /// Argument for CeedOperatorSetField to use no ElemRestriction, only used with eval mode CEED_EVAL_WEIGHT.
218 /// @ingroup CeedElemRestriction
219 CEED_EXTERN const CeedElemRestriction CEED_ELEMRESTRICTION_NONE;
220 
221 /// Argument for CeedOperatorCreate that QFunction is not created by user.
222 /// Only used for QFunctions dqf and dqfT.
223 /// If implemented, a backend may attempt to provide the action of these QFunctions.
224 /// @ingroup CeedQFunction
225 CEED_EXTERN const CeedQFunction CEED_QFUNCTION_NONE;
226 
227 /// Argument for CeedElemRestrictionCreateStrided that L-vector is in the Ceed backend's preferred layout.
228 /// This argument should only be used with vectors created by a Ceed backend.
229 /// @ingroup CeedElemRestriction
230 CEED_EXTERN const CeedInt CEED_STRIDES_BACKEND[3];
231 
232 CEED_EXTERN int CeedElemRestrictionCreate(Ceed ceed, CeedInt num_elem, CeedInt elem_size, CeedInt num_comp, CeedInt comp_stride, CeedSize l_size,
233                                           CeedMemType mem_type, CeedCopyMode copy_mode, const CeedInt *offsets, CeedElemRestriction *rstr);
234 CEED_EXTERN int CeedElemRestrictionCreateOriented(Ceed ceed, CeedInt num_elem, CeedInt elem_size, CeedInt num_comp, CeedInt comp_stride,
235                                                   CeedSize l_size, CeedMemType mem_type, CeedCopyMode copy_mode, const CeedInt *offsets,
236                                                   const bool *orients, CeedElemRestriction *rstr);
237 CEED_EXTERN int CeedElemRestrictionCreateCurlOriented(Ceed ceed, CeedInt num_elem, CeedInt elem_size, CeedInt num_comp, CeedInt comp_stride,
238                                                       CeedSize l_size, CeedMemType mem_type, CeedCopyMode copy_mode, const CeedInt *offsets,
239                                                       const CeedInt8 *curl_orients, CeedElemRestriction *rstr);
240 CEED_EXTERN int CeedElemRestrictionCreateStrided(Ceed ceed, CeedInt num_elem, CeedInt elem_size, CeedInt num_comp, CeedSize l_size,
241                                                  const CeedInt strides[3], CeedElemRestriction *rstr);
242 CEED_EXTERN int CeedElemRestrictionCreateBlocked(Ceed ceed, CeedInt num_elem, CeedInt elem_size, CeedInt block_size, CeedInt num_comp,
243                                                  CeedInt comp_stride, CeedSize l_size, CeedMemType mem_type, CeedCopyMode copy_mode,
244                                                  const CeedInt *offsets, CeedElemRestriction *rstr);
245 CEED_EXTERN int CeedElemRestrictionCreateBlockedOriented(Ceed ceed, CeedInt num_elem, CeedInt elem_size, CeedInt block_size, CeedInt num_comp,
246                                                          CeedInt comp_stride, CeedSize l_size, CeedMemType mem_type, CeedCopyMode copy_mode,
247                                                          const CeedInt *offsets, const bool *orients, CeedElemRestriction *rstr);
248 CEED_EXTERN int CeedElemRestrictionCreateBlockedCurlOriented(Ceed ceed, CeedInt num_elem, CeedInt elem_size, CeedInt block_size, CeedInt num_comp,
249                                                              CeedInt comp_stride, CeedSize l_size, CeedMemType mem_type, CeedCopyMode copy_mode,
250                                                              const CeedInt *offsets, const CeedInt8 *curl_orients, CeedElemRestriction *rstr);
251 CEED_EXTERN int CeedElemRestrictionCreateBlockedStrided(Ceed ceed, CeedInt num_elem, CeedInt elem_size, CeedInt block_size, CeedInt num_comp,
252                                                         CeedSize l_size, const CeedInt strides[3], CeedElemRestriction *rstr);
253 CEED_EXTERN int CeedElemRestrictionCreateUnsignedCopy(CeedElemRestriction rstr, CeedElemRestriction *rstr_unsigned);
254 CEED_EXTERN int CeedElemRestrictionCreateUnorientedCopy(CeedElemRestriction rstr, CeedElemRestriction *rstr_unoriented);
255 CEED_EXTERN int CeedElemRestrictionReferenceCopy(CeedElemRestriction rstr, CeedElemRestriction *rstr_copy);
256 CEED_EXTERN int CeedElemRestrictionCreateVector(CeedElemRestriction rstr, CeedVector *lvec, CeedVector *evec);
257 CEED_EXTERN int CeedElemRestrictionApply(CeedElemRestriction rstr, CeedTransposeMode t_mode, CeedVector u, CeedVector ru, CeedRequest *request);
258 CEED_EXTERN int CeedElemRestrictionApplyBlock(CeedElemRestriction rstr, CeedInt block, CeedTransposeMode t_mode, CeedVector u, CeedVector ru,
259                                               CeedRequest *request);
260 CEED_EXTERN int CeedElemRestrictionGetCeed(CeedElemRestriction rstr, Ceed *ceed);
261 CEED_EXTERN int CeedElemRestrictionGetCompStride(CeedElemRestriction rstr, CeedInt *comp_stride);
262 CEED_EXTERN int CeedElemRestrictionGetNumElements(CeedElemRestriction rstr, CeedInt *num_elem);
263 CEED_EXTERN int CeedElemRestrictionGetElementSize(CeedElemRestriction rstr, CeedInt *elem_size);
264 CEED_EXTERN int CeedElemRestrictionGetLVectorSize(CeedElemRestriction rstr, CeedSize *l_size);
265 CEED_EXTERN int CeedElemRestrictionGetNumComponents(CeedElemRestriction rstr, CeedInt *num_comp);
266 CEED_EXTERN int CeedElemRestrictionGetNumBlocks(CeedElemRestriction rstr, CeedInt *num_block);
267 CEED_EXTERN int CeedElemRestrictionGetBlockSize(CeedElemRestriction rstr, CeedInt *block_size);
268 CEED_EXTERN int CeedElemRestrictionGetMultiplicity(CeedElemRestriction rstr, CeedVector mult);
269 CEED_EXTERN int CeedElemRestrictionView(CeedElemRestriction rstr, FILE *stream);
270 CEED_EXTERN int CeedElemRestrictionDestroy(CeedElemRestriction *rstr);
271 
272 // The formalism here is that we have the structure
273 //  \int_\Omega v^T f_0(u, \nabla u, qdata) + (\nabla v)^T f_1(u, \nabla u, qdata)
274 // where gradients are with respect to the reference element.
275 
276 CEED_EXTERN int CeedBasisCreateTensorH1Lagrange(Ceed ceed, CeedInt dim, CeedInt num_comp, CeedInt P, CeedInt Q, CeedQuadMode quad_mode,
277                                                 CeedBasis *basis);
278 CEED_EXTERN int CeedBasisCreateTensorH1(Ceed ceed, CeedInt dim, CeedInt num_comp, CeedInt P_1d, CeedInt Q_1d, const CeedScalar *interp_1d,
279                                         const CeedScalar *grad_1d, const CeedScalar *q_ref_1d, const CeedScalar *q_weight_1d, CeedBasis *basis);
280 CEED_EXTERN int CeedBasisCreateH1(Ceed ceed, CeedElemTopology topo, CeedInt num_comp, CeedInt num_nodes, CeedInt nqpts, const CeedScalar *interp,
281                                   const CeedScalar *grad, const CeedScalar *q_ref, const CeedScalar *q_weights, CeedBasis *basis);
282 CEED_EXTERN int CeedBasisCreateHdiv(Ceed ceed, CeedElemTopology topo, CeedInt num_comp, CeedInt num_nodes, CeedInt nqpts, const CeedScalar *interp,
283                                     const CeedScalar *div, const CeedScalar *q_ref, const CeedScalar *q_weights, CeedBasis *basis);
284 CEED_EXTERN int CeedBasisCreateHcurl(Ceed ceed, CeedElemTopology topo, CeedInt num_comp, CeedInt num_nodes, CeedInt nqpts, const CeedScalar *interp,
285                                      const CeedScalar *curl, const CeedScalar *q_ref, const CeedScalar *q_weights, CeedBasis *basis);
286 CEED_EXTERN int CeedBasisCreateProjection(CeedBasis basis_from, CeedBasis basis_to, CeedBasis *basis_project);
287 CEED_EXTERN int CeedBasisReferenceCopy(CeedBasis basis, CeedBasis *basis_copy);
288 CEED_EXTERN int CeedBasisView(CeedBasis basis, FILE *stream);
289 CEED_EXTERN int CeedBasisApply(CeedBasis basis, CeedInt num_elem, CeedTransposeMode t_mode, CeedEvalMode eval_mode, CeedVector u, CeedVector v);
290 CEED_EXTERN int CeedBasisApplyAtPoints(CeedBasis basis, CeedInt num_points, CeedTransposeMode t_mode, CeedEvalMode eval_mode, CeedVector x_ref,
291                                        CeedVector u, CeedVector v);
292 CEED_EXTERN int CeedBasisGetCeed(CeedBasis basis, Ceed *ceed);
293 CEED_EXTERN int CeedBasisGetDimension(CeedBasis basis, CeedInt *dim);
294 CEED_EXTERN int CeedBasisGetTopology(CeedBasis basis, CeedElemTopology *topo);
295 CEED_EXTERN int CeedBasisGetNumComponents(CeedBasis basis, CeedInt *num_comp);
296 CEED_EXTERN int CeedBasisGetNumNodes(CeedBasis basis, CeedInt *P);
297 CEED_EXTERN int CeedBasisGetNumNodes1D(CeedBasis basis, CeedInt *P_1d);
298 CEED_EXTERN int CeedBasisGetNumQuadraturePoints(CeedBasis basis, CeedInt *Q);
299 CEED_EXTERN int CeedBasisGetNumQuadraturePoints1D(CeedBasis basis, CeedInt *Q_1d);
300 CEED_EXTERN int CeedBasisGetQRef(CeedBasis basis, const CeedScalar **q_ref);
301 CEED_EXTERN int CeedBasisGetQWeights(CeedBasis basis, const CeedScalar **q_weights);
302 CEED_EXTERN int CeedBasisGetInterp(CeedBasis basis, const CeedScalar **interp);
303 CEED_EXTERN int CeedBasisGetInterp1D(CeedBasis basis, const CeedScalar **interp_1d);
304 CEED_EXTERN int CeedBasisGetGrad(CeedBasis basis, const CeedScalar **grad);
305 CEED_EXTERN int CeedBasisGetGrad1D(CeedBasis basis, const CeedScalar **grad_1d);
306 CEED_EXTERN int CeedBasisGetDiv(CeedBasis basis, const CeedScalar **div);
307 CEED_EXTERN int CeedBasisGetCurl(CeedBasis basis, const CeedScalar **curl);
308 CEED_EXTERN int CeedBasisDestroy(CeedBasis *basis);
309 
310 CEED_EXTERN int CeedGaussQuadrature(CeedInt Q, CeedScalar *q_ref_1d, CeedScalar *q_weight_1d);
311 CEED_EXTERN int CeedLobattoQuadrature(CeedInt Q, CeedScalar *q_ref_1d, CeedScalar *q_weight_1d);
312 
313 /** Handle for the user provided CeedQFunction callback function
314 
315  @param[in,out] ctx  User-defined context set using CeedQFunctionSetContext() or NULL
316  @param[in] Q        Number of quadrature points at which to evaluate
317  @param[in] in       Array of pointers to each input argument in the order provided by the user in CeedQFunctionAddInput().
318                        Each array has shape `[dim, num_comp, Q]` where `dim` is the geometric dimension for \ref CEED_EVAL_GRAD (`dim=1` for \ref
319 CEED_EVAL_INTERP) and `num_comp` is the number of field components (`num_comp=1` for scalar fields). This results in indexing the `i`th input at
320 quadrature point `j` as `in[i][(d*num_comp + c)*Q + j]`.
321  @param[out]   out   Array of pointers to each output array in the order provided using CeedQFunctionAddOutput().
322                        The shapes are as above for \a in.
323 
324  @return An error code: 0 - success, otherwise - failure
325 
326  @ingroup CeedQFunction
327 **/
328 typedef int (*CeedQFunctionUser)(void *ctx, const CeedInt Q, const CeedScalar *const *in, CeedScalar *const *out);
329 
330 CEED_EXTERN int CeedQFunctionCreateInterior(Ceed ceed, CeedInt vec_length, CeedQFunctionUser f, const char *source, CeedQFunction *qf);
331 CEED_EXTERN int CeedQFunctionCreateInteriorByName(Ceed ceed, const char *name, CeedQFunction *qf);
332 CEED_EXTERN int CeedQFunctionCreateIdentity(Ceed ceed, CeedInt size, CeedEvalMode in_mode, CeedEvalMode out_mode, CeedQFunction *qf);
333 CEED_EXTERN int CeedQFunctionReferenceCopy(CeedQFunction qf, CeedQFunction *qf_copy);
334 CEED_EXTERN int CeedQFunctionAddInput(CeedQFunction qf, const char *field_name, CeedInt size, CeedEvalMode eval_mode);
335 CEED_EXTERN int CeedQFunctionAddOutput(CeedQFunction qf, const char *field_name, CeedInt size, CeedEvalMode eval_mode);
336 CEED_EXTERN int CeedQFunctionGetFields(CeedQFunction qf, CeedInt *num_input_fields, CeedQFunctionField **input_fields, CeedInt *num_output_fields,
337                                        CeedQFunctionField **output_fields);
338 CEED_EXTERN int CeedQFunctionSetContext(CeedQFunction qf, CeedQFunctionContext ctx);
339 CEED_EXTERN int CeedQFunctionSetContextWritable(CeedQFunction qf, bool is_writable);
340 CEED_EXTERN int CeedQFunctionSetUserFlopsEstimate(CeedQFunction qf, CeedSize flops);
341 CEED_EXTERN int CeedQFunctionView(CeedQFunction qf, FILE *stream);
342 CEED_EXTERN int CeedQFunctionGetCeed(CeedQFunction qf, Ceed *ceed);
343 CEED_EXTERN int CeedQFunctionApply(CeedQFunction qf, CeedInt Q, CeedVector *u, CeedVector *v);
344 CEED_EXTERN int CeedQFunctionDestroy(CeedQFunction *qf);
345 
346 CEED_EXTERN int CeedQFunctionFieldGetName(CeedQFunctionField qf_field, char **field_name);
347 CEED_EXTERN int CeedQFunctionFieldGetSize(CeedQFunctionField qf_field, CeedInt *size);
348 CEED_EXTERN int CeedQFunctionFieldGetEvalMode(CeedQFunctionField qf_field, CeedEvalMode *eval_mode);
349 
350 /** Handle for the user provided CeedQFunctionContextDataDestroy callback function
351 
352  @param[in,out] data  User-CeedQFunctionContext data
353 
354  @return An error code: 0 - success, otherwise - failure
355 
356  @ingroup CeedQFunction
357 **/
358 typedef int (*CeedQFunctionContextDataDestroyUser)(void *data);
359 
360 CEED_EXTERN int CeedQFunctionContextCreate(Ceed ceed, CeedQFunctionContext *ctx);
361 CEED_EXTERN int CeedQFunctionContextReferenceCopy(CeedQFunctionContext ctx, CeedQFunctionContext *ctx_copy);
362 CEED_EXTERN int CeedQFunctionContextSetData(CeedQFunctionContext ctx, CeedMemType mem_type, CeedCopyMode copy_mode, size_t size, void *data);
363 CEED_EXTERN int CeedQFunctionContextTakeData(CeedQFunctionContext ctx, CeedMemType mem_type, void *data);
364 CEED_EXTERN int CeedQFunctionContextGetData(CeedQFunctionContext ctx, CeedMemType mem_type, void *data);
365 CEED_EXTERN int CeedQFunctionContextGetDataRead(CeedQFunctionContext ctx, CeedMemType mem_type, void *data);
366 CEED_EXTERN int CeedQFunctionContextRestoreData(CeedQFunctionContext ctx, void *data);
367 CEED_EXTERN int CeedQFunctionContextRestoreDataRead(CeedQFunctionContext ctx, void *data);
368 CEED_EXTERN int CeedQFunctionContextRegisterDouble(CeedQFunctionContext ctx, const char *field_name, size_t field_offset, size_t num_values,
369                                                    const char *field_description);
370 CEED_EXTERN int CeedQFunctionContextRegisterInt32(CeedQFunctionContext ctx, const char *field_name, size_t field_offset, size_t num_values,
371                                                   const char *field_description);
372 CEED_EXTERN int CeedQFunctionContextGetAllFieldLabels(CeedQFunctionContext ctx, const CeedContextFieldLabel **field_labels, CeedInt *num_fields);
373 CEED_EXTERN int CeedContextFieldLabelGetDescription(CeedContextFieldLabel label, const char **field_name, const char **field_description,
374                                                     size_t *num_values, CeedContextFieldType *field_type);
375 CEED_EXTERN int CeedQFunctionContextGetContextSize(CeedQFunctionContext ctx, size_t *ctx_size);
376 CEED_EXTERN int CeedQFunctionContextView(CeedQFunctionContext ctx, FILE *stream);
377 CEED_EXTERN int CeedQFunctionContextSetDataDestroy(CeedQFunctionContext ctx, CeedMemType f_mem_type, CeedQFunctionContextDataDestroyUser f);
378 CEED_EXTERN int CeedQFunctionContextDestroy(CeedQFunctionContext *ctx);
379 
380 CEED_EXTERN int CeedOperatorCreate(Ceed ceed, CeedQFunction qf, CeedQFunction dqf, CeedQFunction dqfT, CeedOperator *op);
381 CEED_EXTERN int CeedCompositeOperatorCreate(Ceed ceed, CeedOperator *op);
382 CEED_EXTERN int CeedOperatorReferenceCopy(CeedOperator op, CeedOperator *op_copy);
383 CEED_EXTERN int CeedOperatorSetField(CeedOperator op, const char *field_name, CeedElemRestriction r, CeedBasis b, CeedVector v);
384 CEED_EXTERN int CeedOperatorGetFields(CeedOperator op, CeedInt *num_input_fields, CeedOperatorField **input_fields, CeedInt *num_output_fields,
385                                       CeedOperatorField **output_fields);
386 CEED_EXTERN int CeedCompositeOperatorAddSub(CeedOperator composite_op, CeedOperator sub_op);
387 CEED_EXTERN int CeedCompositeOperatorGetNumSub(CeedOperator op, CeedInt *num_suboperators);
388 CEED_EXTERN int CeedCompositeOperatorGetSubList(CeedOperator op, CeedOperator **sub_operators);
389 CEED_EXTERN int CeedOperatorCheckReady(CeedOperator op);
390 CEED_EXTERN int CeedOperatorGetActiveVectorLengths(CeedOperator op, CeedSize *input_size, CeedSize *output_size);
391 CEED_EXTERN int CeedOperatorSetQFunctionAssemblyReuse(CeedOperator op, bool reuse_assembly_data);
392 CEED_EXTERN int CeedOperatorSetQFunctionAssemblyDataUpdateNeeded(CeedOperator op, bool needs_data_update);
393 CEED_EXTERN int CeedOperatorLinearAssembleQFunction(CeedOperator op, CeedVector *assembled, CeedElemRestriction *rstr, CeedRequest *request);
394 CEED_EXTERN int CeedOperatorLinearAssembleQFunctionBuildOrUpdate(CeedOperator op, CeedVector *assembled, CeedElemRestriction *rstr,
395                                                                  CeedRequest *request);
396 CEED_EXTERN int CeedOperatorLinearAssembleDiagonal(CeedOperator op, CeedVector assembled, CeedRequest *request);
397 CEED_EXTERN int CeedOperatorLinearAssembleAddDiagonal(CeedOperator op, CeedVector assembled, CeedRequest *request);
398 CEED_EXTERN int CeedOperatorLinearAssemblePointBlockDiagonal(CeedOperator op, CeedVector assembled, CeedRequest *request);
399 CEED_EXTERN int CeedOperatorLinearAssembleAddPointBlockDiagonal(CeedOperator op, CeedVector assembled, CeedRequest *request);
400 CEED_EXTERN int CeedOperatorLinearAssembleSymbolic(CeedOperator op, CeedSize *num_entries, CeedInt **rows, CeedInt **cols);
401 CEED_EXTERN int CeedOperatorLinearAssemble(CeedOperator op, CeedVector values);
402 CEED_EXTERN int CeedCompositeOperatorGetMultiplicity(CeedOperator op, CeedInt num_skip_indices, CeedInt *skip_indices, CeedVector mult);
403 CEED_EXTERN int CeedOperatorMultigridLevelCreate(CeedOperator op_fine, CeedVector p_mult_fine, CeedElemRestriction rstr_coarse,
404                                                  CeedBasis basis_coarse, CeedOperator *op_coarse, CeedOperator *op_prolong,
405                                                  CeedOperator *op_restrict);
406 CEED_EXTERN int CeedOperatorMultigridLevelCreateTensorH1(CeedOperator op_fine, CeedVector p_mult_fine, CeedElemRestriction rstr_coarse,
407                                                          CeedBasis basis_coarse, const CeedScalar *interp_c_to_f, CeedOperator *op_coarse,
408                                                          CeedOperator *op_prolong, CeedOperator *op_restrict);
409 CEED_EXTERN int CeedOperatorMultigridLevelCreateH1(CeedOperator op_fine, CeedVector p_mult_fine, CeedElemRestriction rstr_coarse,
410                                                    CeedBasis basis_coarse, const CeedScalar *interp_c_to_f, CeedOperator *op_coarse,
411                                                    CeedOperator *op_prolong, CeedOperator *op_restrict);
412 CEED_EXTERN int CeedOperatorCreateFDMElementInverse(CeedOperator op, CeedOperator *fdm_inv, CeedRequest *request);
413 CEED_EXTERN int CeedOperatorSetNumQuadraturePoints(CeedOperator op, CeedInt num_qpts);
414 CEED_EXTERN int CeedOperatorSetName(CeedOperator op, const char *name);
415 CEED_EXTERN int CeedOperatorView(CeedOperator op, FILE *stream);
416 CEED_EXTERN int CeedOperatorGetCeed(CeedOperator op, Ceed *ceed);
417 CEED_EXTERN int CeedOperatorGetNumElements(CeedOperator op, CeedInt *num_elem);
418 CEED_EXTERN int CeedOperatorGetNumQuadraturePoints(CeedOperator op, CeedInt *num_qpts);
419 CEED_EXTERN int CeedOperatorGetFlopsEstimate(CeedOperator op, CeedSize *flops);
420 CEED_EXTERN int CeedOperatorGetContext(CeedOperator op, CeedQFunctionContext *ctx);
421 CEED_EXTERN int CeedOperatorGetContextFieldLabel(CeedOperator op, const char *field_name, CeedContextFieldLabel *field_label);
422 CEED_EXTERN int CeedOperatorSetContextDouble(CeedOperator op, CeedContextFieldLabel field_label, double *values);
423 CEED_EXTERN int CeedOperatorGetContextDoubleRead(CeedOperator op, CeedContextFieldLabel field_label, size_t *num_values, const double **values);
424 CEED_EXTERN int CeedOperatorRestoreContextDoubleRead(CeedOperator op, CeedContextFieldLabel field_label, const double **values);
425 CEED_EXTERN int CeedOperatorSetContextInt32(CeedOperator op, CeedContextFieldLabel field_label, int *values);
426 CEED_EXTERN int CeedOperatorGetContextInt32Read(CeedOperator op, CeedContextFieldLabel field_label, size_t *num_values, const int **values);
427 CEED_EXTERN int CeedOperatorRestoreContextInt32Read(CeedOperator op, CeedContextFieldLabel field_label, const int **values);
428 CEED_EXTERN int CeedOperatorApply(CeedOperator op, CeedVector in, CeedVector out, CeedRequest *request);
429 CEED_EXTERN int CeedOperatorApplyAdd(CeedOperator op, CeedVector in, CeedVector out, CeedRequest *request);
430 CEED_EXTERN int CeedOperatorDestroy(CeedOperator *op);
431 
432 CEED_EXTERN int CeedOperatorGetFieldByName(CeedOperator op, const char *field_name, CeedOperatorField *op_field);
433 CEED_EXTERN int CeedOperatorFieldGetName(CeedOperatorField op_field, char **field_name);
434 CEED_EXTERN int CeedOperatorFieldGetElemRestriction(CeedOperatorField op_field, CeedElemRestriction *rstr);
435 CEED_EXTERN int CeedOperatorFieldGetBasis(CeedOperatorField op_field, CeedBasis *basis);
436 CEED_EXTERN int CeedOperatorFieldGetVector(CeedOperatorField op_field, CeedVector *vec);
437 
438 /**
439   @brief Return integer power
440 
441   @param[in] base  The base to exponentiate
442   @param[in] power The power to raise the base to
443 
444   @return base^power
445 
446   @ref Utility
447 **/
448 static inline CeedInt CeedIntPow(CeedInt base, CeedInt power) {
449   CeedInt result = 1;
450   while (power) {
451     if (power & 1) result *= base;
452     power >>= 1;
453     base *= base;
454   }
455   return result;
456 }
457 
458 /**
459   @brief Return minimum of two integers
460 
461   @param[in] a The first integer to compare
462   @param[in] b The second integer to compare
463 
464   @return The minimum of the two integers
465 
466   @ref Utility
467 **/
468 static inline CeedInt CeedIntMin(CeedInt a, CeedInt b) { return a < b ? a : b; }
469 
470 /**
471   @brief Return maximum of two integers
472 
473   @param[in] a The first integer to compare
474   @param[in] b The second integer to compare
475 
476   @return The maximum of the two integers
477 
478   @ref Utility
479 **/
480 static inline CeedInt CeedIntMax(CeedInt a, CeedInt b) { return a > b ? a : b; }
481 
482 // Used to ensure initialization before CeedInit()
483 CEED_EXTERN int CeedRegisterAll(void);
484 // Used to ensure initialization before CeedQFunctionCreate*()
485 CEED_EXTERN int CeedQFunctionRegisterAll(void);
486 
487 #endif
488