// Copyright (c) 2017-2022, Lawrence Livermore National Security, LLC and other CEED contributors. // All Rights Reserved. See the top-level LICENSE and NOTICE files for details. // // SPDX-License-Identifier: BSD-2-Clause // // This file is part of CEED: http://github.com/ceed #include #include #include #include /** @brief Set fields for Ceed QFunction applying the 3D Poisson operator **/ static int CeedQFunctionInit_Poisson3DApply(Ceed ceed, const char *requested, CeedQFunction qf) { // Check QFunction name const char *name = "Poisson3DApply"; CeedCheck(!strcmp(name, requested), ceed, CEED_ERROR_UNSUPPORTED, "QFunction '%s' does not match requested name: %s", name, requested); // Add QFunction fields const CeedInt dim = 3; CeedCall(CeedQFunctionAddInput(qf, "du", dim, CEED_EVAL_GRAD)); CeedCall(CeedQFunctionAddInput(qf, "qdata", dim * (dim + 1) / 2, CEED_EVAL_NONE)); CeedCall(CeedQFunctionAddOutput(qf, "dv", dim, CEED_EVAL_GRAD)); CeedCall(CeedQFunctionSetUserFlopsEstimate(qf, 15)); return CEED_ERROR_SUCCESS; } /** @brief Register Ceed QFunction for applying the 3D Poisson operator **/ CEED_INTERN int CeedQFunctionRegister_Poisson3DApply(void) { return CeedQFunctionRegister("Poisson3DApply", Poisson3DApply_loc, 1, Poisson3DApply, CeedQFunctionInit_Poisson3DApply); }