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.h>
9 #include <ceed/backend.h>
10 #include <ceed/jit-source/gallery/ceed-identity-to-scalar.h>
11 #include <stddef.h>
12 #include <string.h>
13
14 /**
15 @brief Set fields identity `CeedQFunction` that copies first input component directly into output
16 **/
CeedQFunctionInit_IdentityScalar(Ceed ceed,const char * requested,CeedQFunction qf)17 static int CeedQFunctionInit_IdentityScalar(Ceed ceed, const char *requested, CeedQFunction qf) {
18 // Check QFunction name
19 const char *name = "Identity to scalar";
20
21 CeedCheck(!strcmp(name, requested), ceed, CEED_ERROR_UNSUPPORTED, "QFunction '%s' does not match requested name: %s", name, requested);
22
23 // QFunction fields 'input' and 'output' with requested emodes added by the library rather than being added here
24
25 CeedCall(CeedQFunctionSetUserFlopsEstimate(qf, 0));
26 return CEED_ERROR_SUCCESS;
27 }
28
29 /**
30 @brief Register identity `CeedQFunction` that copies first input component directly into output
31 **/
CeedQFunctionRegister_IdentityScalar(void)32 CEED_INTERN int CeedQFunctionRegister_IdentityScalar(void) {
33 return CeedQFunctionRegister("Identity to scalar", IdentityScalar_loc, 1, IdentityScalar, CeedQFunctionInit_IdentityScalar);
34 }
35