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 17*3d576824SJeremy L Thompson #include <ceed.h> 18*3d576824SJeremy L Thompson #include <ceed-backend.h> 19*3d576824SJeremy 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 30ae3cba82Scamierjs return CeedError(ceed, 1, "Ref backend cannot use resource: %s", resource); 31c042f62fSJeremy L Thompson // LCOV_EXCL_STOP 329525855cSJeremy L Thompson ierr = CeedSetDeterministic(ceed, true); CeedChk(ierr); 336f7d248dSjeremylt 34f8902d9eSjeremylt ierr = CeedSetBackendFunction(ceed, "Ceed", ceed, "VectorCreate", 35fe2413ffSjeremylt CeedVectorCreate_Ref); CeedChk(ierr); 36fe2413ffSjeremylt ierr = CeedSetBackendFunction(ceed, "Ceed", ceed, "BasisCreateTensorH1", 37fe2413ffSjeremylt CeedBasisCreateTensorH1_Ref); CeedChk(ierr); 38fe2413ffSjeremylt ierr = CeedSetBackendFunction(ceed, "Ceed", ceed, "BasisCreateH1", 39fe2413ffSjeremylt CeedBasisCreateH1_Ref); CeedChk(ierr); 402f86a920SJeremy L Thompson ierr = CeedSetBackendFunction(ceed, "Ceed", ceed, "TensorContractCreate", 412f86a920SJeremy L Thompson CeedTensorContractCreate_Ref); CeedChk(ierr); 42fe2413ffSjeremylt ierr = CeedSetBackendFunction(ceed, "Ceed", ceed, "ElemRestrictionCreate", 43fe2413ffSjeremylt CeedElemRestrictionCreate_Ref); CeedChk(ierr); 441dfeef1dSjeremylt ierr = CeedSetBackendFunction(ceed, "Ceed", ceed, 451dfeef1dSjeremylt "ElemRestrictionCreateBlocked", 46fe2413ffSjeremylt CeedElemRestrictionCreate_Ref); CeedChk(ierr); 47fe2413ffSjeremylt ierr = CeedSetBackendFunction(ceed, "Ceed", ceed, "QFunctionCreate", 48fe2413ffSjeremylt CeedQFunctionCreate_Ref); CeedChk(ierr); 49777ff853SJeremy L Thompson ierr = CeedSetBackendFunction(ceed, "Ceed", ceed, "QFunctionContextCreate", 50777ff853SJeremy L Thompson CeedQFunctionContextCreate_Ref); CeedChk(ierr); 51fe2413ffSjeremylt ierr = CeedSetBackendFunction(ceed, "Ceed", ceed, "OperatorCreate", 52fe2413ffSjeremylt CeedOperatorCreate_Ref); CeedChk(ierr); 53c04a41a7SJeremy L Thompson ierr = CeedSetBackendFunction(ceed, "Ceed", ceed, "CompositeOperatorCreate", 54c04a41a7SJeremy L Thompson CeedCompositeOperatorCreate_Ref); CeedChk(ierr); 55ae3cba82Scamierjs return 0; 56ae3cba82Scamierjs } 57ae3cba82Scamierjs 58f10650afSjeremylt //------------------------------------------------------------------------------ 59f10650afSjeremylt // Backend Register 60f10650afSjeremylt //------------------------------------------------------------------------------ 611d013790SJed Brown CEED_INTERN int CeedRegister_Ref(void) { 621d013790SJed Brown return 639ddbf157Sjeremylt //! [Register] 64706bc5e6Sjeremylt CeedRegister("/cpu/self/ref/serial", CeedInit_Ref, 50); 659ddbf157Sjeremylt //! [Register] 66ae3cba82Scamierjs } 67f10650afSjeremylt //------------------------------------------------------------------------------ 68