xref: /libCEED/tests/t530-operator.h (revision 3d8e882215d238700cdceb37404f76ca7fa24eaa)
1*3d8e8822SJeremy L Thompson // Copyright (c) 2017-2022, Lawrence Livermore National Security, LLC and other CEED contributors.
2*3d8e8822SJeremy L Thompson // All Rights Reserved. See the top-level LICENSE and NOTICE files for details.
31d102b48SJeremy L Thompson //
4*3d8e8822SJeremy L Thompson // SPDX-License-Identifier: BSD-2-Clause
51d102b48SJeremy L Thompson //
6*3d8e8822SJeremy L Thompson // This file is part of CEED:  http://github.com/ceed
71d102b48SJeremy L Thompson 
81d102b48SJeremy L Thompson CEED_QFUNCTION(setup)(void *ctx, const CeedInt Q,
91d102b48SJeremy L Thompson                       const CeedScalar *const *in,
101d102b48SJeremy L Thompson                       CeedScalar *const *out) {
111d102b48SJeremy L Thompson   const CeedScalar *weight = in[0], *J = in[1];
121d102b48SJeremy L Thompson   CeedScalar *rho = out[0];
131d102b48SJeremy L Thompson   for (CeedInt i=0; i<Q; i++) {
141d102b48SJeremy L Thompson     rho[i] = weight[i] * (J[i+Q*0]*J[i+Q*3] - J[i+Q*1]*J[i+Q*2]);
151d102b48SJeremy L Thompson   }
161d102b48SJeremy L Thompson   return 0;
171d102b48SJeremy L Thompson }
181d102b48SJeremy L Thompson 
191d102b48SJeremy L Thompson CEED_QFUNCTION(mass)(void *ctx, const CeedInt Q, const CeedScalar *const *in,
201d102b48SJeremy L Thompson                      CeedScalar *const *out) {
211d102b48SJeremy L Thompson   const CeedScalar *rho = in[0], *u = in[1];
221d102b48SJeremy L Thompson   CeedScalar *v = out[0];
231d102b48SJeremy L Thompson   for (CeedInt i=0; i<Q; i++) {
241d102b48SJeremy L Thompson     v[i] = rho[i] * u[i];
251d102b48SJeremy L Thompson   }
261d102b48SJeremy L Thompson   return 0;
271d102b48SJeremy L Thompson }
28