xref: /libCEED/tests/t300-basis.c (revision caee03026e6576cbf7a399c2fc51bb918c77f451)
1 /// @file
2 /// Test creation and distruction of a H1Lagrange basis
3 /// \test Test creation and distruction of a H1Lagrange basis
4 #include <ceed.h>
5 
6 int main(int argc, char **argv) {
7   Ceed      ceed;
8   CeedBasis b;
9 
10   CeedInit(argv[1], &ceed);
11 
12   // Test skipped if using single precision
13   if (CEED_SCALAR_TYPE == CEED_SCALAR_FP32) {
14     return CeedError(ceed, CEED_ERROR_UNSUPPORTED, "Test not implemented in single precision\n");
15   }
16 
17   CeedBasisCreateTensorH1Lagrange(ceed, 1, 1, 4, 4, CEED_GAUSS_LOBATTO, &b);
18   CeedBasisView(b, stdout);
19   CeedBasisDestroy(&b);
20 
21   CeedBasisCreateTensorH1Lagrange(ceed, 1, 1, 4, 4, CEED_GAUSS, &b);
22   CeedBasisView(b, stdout);
23   CeedBasisDestroy(&b);
24 
25   CeedDestroy(&ceed);
26   return 0;
27 }
28