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