10c784865Scamierjs // Copyright (c) 2017-2018, Lawrence Livermore National Security, LLC. 20c784865Scamierjs // Produced at the Lawrence Livermore National Laboratory. LLNL-CODE-734707. 30c784865Scamierjs // All Rights reserved. See files LICENSE and NOTICE for details. 4ae3cba82Scamierjs // 5ae3cba82Scamierjs // This file is part of CEED, a collection of benchmarks, miniapps, software 6ae3cba82Scamierjs // libraries and APIs for efficient high-order finite element and spectral 7ae3cba82Scamierjs // element discretizations for exascale applications. For more information and 8ae3cba82Scamierjs // source code availability see http://github.com/ceed. 9ae3cba82Scamierjs // 10ae3cba82Scamierjs // The CEED research is supported by the Exascale Computing Project 17-SC-20-SC, 11ae3cba82Scamierjs // a collaborative effort of two U.S. Department of Energy organizations (Office 12ae3cba82Scamierjs // of Science and the National Nuclear Security Administration) responsible for 13ae3cba82Scamierjs // the planning and preparation of a capable exascale ecosystem, including 14ae3cba82Scamierjs // software, applications, hardware, advanced system engineering and early 15ae3cba82Scamierjs // testbed platforms, in support of the nation's exascale computing imperative. 16ae3cba82Scamierjs 173d576824SJeremy L Thompson #include <ceed.h> 183d576824SJeremy L Thompson #include <ceed-backend.h> 193d576824SJeremy L Thompson #include <string.h> 2021617c04Sjeremylt #include "ceed-ref.h" 21ae3cba82Scamierjs 22f10650afSjeremylt //------------------------------------------------------------------------------ 23f10650afSjeremylt // Backend Init 24f10650afSjeremylt //------------------------------------------------------------------------------ 25ae3cba82Scamierjs static int CeedInit_Ref(const char *resource, Ceed ceed) { 26fe2413ffSjeremylt int ierr; 276f7d248dSjeremylt if (strcmp(resource, "/cpu/self") && strcmp(resource, "/cpu/self/ref") 28856142e1Sjeremylt && strcmp(resource, "/cpu/self/ref/serial")) 29c042f62fSJeremy L Thompson // LCOV_EXCL_START 30*e15f9bd0SJeremy L Thompson return CeedError(ceed, CEED_ERROR_BACKEND, 31*e15f9bd0SJeremy L Thompson "Ref backend cannot use resource: %s", resource); 32c042f62fSJeremy L Thompson // LCOV_EXCL_STOP 33*e15f9bd0SJeremy L Thompson ierr = CeedSetDeterministic(ceed, true); CeedChkBackend(ierr); 346f7d248dSjeremylt 35f8902d9eSjeremylt ierr = CeedSetBackendFunction(ceed, "Ceed", ceed, "VectorCreate", 36*e15f9bd0SJeremy L Thompson CeedVectorCreate_Ref); CeedChkBackend(ierr); 37fe2413ffSjeremylt ierr = CeedSetBackendFunction(ceed, "Ceed", ceed, "BasisCreateTensorH1", 38*e15f9bd0SJeremy L Thompson CeedBasisCreateTensorH1_Ref); CeedChkBackend(ierr); 39fe2413ffSjeremylt ierr = CeedSetBackendFunction(ceed, "Ceed", ceed, "BasisCreateH1", 40*e15f9bd0SJeremy L Thompson CeedBasisCreateH1_Ref); CeedChkBackend(ierr); 412f86a920SJeremy L Thompson ierr = CeedSetBackendFunction(ceed, "Ceed", ceed, "TensorContractCreate", 42*e15f9bd0SJeremy L Thompson CeedTensorContractCreate_Ref); CeedChkBackend(ierr); 43fe2413ffSjeremylt ierr = CeedSetBackendFunction(ceed, "Ceed", ceed, "ElemRestrictionCreate", 44*e15f9bd0SJeremy L Thompson CeedElemRestrictionCreate_Ref); CeedChkBackend(ierr); 451dfeef1dSjeremylt ierr = CeedSetBackendFunction(ceed, "Ceed", ceed, 461dfeef1dSjeremylt "ElemRestrictionCreateBlocked", 47*e15f9bd0SJeremy L Thompson CeedElemRestrictionCreate_Ref); CeedChkBackend(ierr); 48fe2413ffSjeremylt ierr = CeedSetBackendFunction(ceed, "Ceed", ceed, "QFunctionCreate", 49*e15f9bd0SJeremy L Thompson CeedQFunctionCreate_Ref); CeedChkBackend(ierr); 50777ff853SJeremy L Thompson ierr = CeedSetBackendFunction(ceed, "Ceed", ceed, "QFunctionContextCreate", 51*e15f9bd0SJeremy L Thompson CeedQFunctionContextCreate_Ref); CeedChkBackend(ierr); 52fe2413ffSjeremylt ierr = CeedSetBackendFunction(ceed, "Ceed", ceed, "OperatorCreate", 53*e15f9bd0SJeremy L Thompson CeedOperatorCreate_Ref); CeedChkBackend(ierr); 54c04a41a7SJeremy L Thompson ierr = CeedSetBackendFunction(ceed, "Ceed", ceed, "CompositeOperatorCreate", 55*e15f9bd0SJeremy L Thompson CeedCompositeOperatorCreate_Ref); CeedChkBackend(ierr); 56*e15f9bd0SJeremy L Thompson return CEED_ERROR_SUCCESS; 57ae3cba82Scamierjs } 58ae3cba82Scamierjs 59f10650afSjeremylt //------------------------------------------------------------------------------ 60f10650afSjeremylt // Backend Register 61f10650afSjeremylt //------------------------------------------------------------------------------ 621d013790SJed Brown CEED_INTERN int CeedRegister_Ref(void) { 631d013790SJed Brown return 649ddbf157Sjeremylt //! [Register] 65706bc5e6Sjeremylt CeedRegister("/cpu/self/ref/serial", CeedInit_Ref, 50); 669ddbf157Sjeremylt //! [Register] 67ae3cba82Scamierjs } 68f10650afSjeremylt //------------------------------------------------------------------------------ 69