xref: /libCEED/tests/t508-operator.c (revision d310b3d31eeeddd20725517a3a61881a36d919f0)
1 /// @file
2 /// Test creation, copying, and destruction for mass matrix operator
3 /// \test Test creation, copying, and destruction for mass matrix operator
4 #include <ceed.h>
5 #include <math.h>
6 #include <stdlib.h>
7 
8 #include "t500-operator.h"
9 
10 int main(int argc, char **argv) {
11   Ceed          ceed;
12   CeedQFunction qf, qf_2;
13   CeedOperator  op, op_2;
14 
15   CeedInit(argv[1], &ceed);
16 
17   CeedQFunctionCreateInterior(ceed, 1, setup, setup_loc, &qf);
18   CeedQFunctionCreateInterior(ceed, 1, mass, mass_loc, &qf_2);
19   CeedOperatorCreate(ceed, qf, CEED_QFUNCTION_NONE, CEED_QFUNCTION_NONE, &op);
20   CeedOperatorCreate(ceed, qf_2, CEED_QFUNCTION_NONE, CEED_QFUNCTION_NONE, &op_2);
21 
22   CeedOperatorReferenceCopy(op, &op_2);  // This destroys the previous op_2
23   if (op != op_2) printf("Error copying CeedOperator reference\n");
24 
25   CeedQFunctionDestroy(&qf);
26   CeedQFunctionDestroy(&qf_2);
27   CeedOperatorDestroy(&op);
28   CeedOperatorDestroy(&op_2);
29   CeedDestroy(&ceed);
30   return 0;
31 }
32