xref: /libCEED/tests/t537-operator.h (revision 9ba83ac0e4b1fca39d6fa6737a318a9f0cbc172d)
1 // Copyright (c) 2017-2026, 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/types.h>
9 
10 CEED_QFUNCTION(setup)(void *ctx, const CeedInt Q, const CeedScalar *const *in, CeedScalar *const *out) {
11   const CeedScalar *weight = in[0], *J = in[1];
12   CeedScalar       *rho = out[0];
13   for (CeedInt i = 0; i < Q; i++) {
14     rho[i] = weight[i] * (J[i + Q * 0] * J[i + Q * 3] - J[i + Q * 1] * J[i + Q * 2]);
15   }
16   return 0;
17 }
18 
19 CEED_QFUNCTION(mass)(void *ctx, const CeedInt Q, const CeedScalar *const *in, CeedScalar *const *out) {
20   const CeedScalar *rho = in[0], *u = in[1];
21   CeedScalar       *v = out[0];
22   for (CeedInt i = 0; i < Q; i++) {
23     for (CeedInt c = 0; c < 2; c++) v[i + Q * c] = rho[i] * u[i + Q * (c ? 0 : 1)];
24   }
25   return 0;
26 }
27