xref: /libCEED/tests/t508-operator.c (revision 49aac155e7a09736f56fb3abac0f57dab29f7cbf)
19560d06aSjeremylt /// @file
29560d06aSjeremylt /// Test creation, copying, and destruction for mass matrix operator
39560d06aSjeremylt /// \test Test creation, copying, and destruction for mass matrix operator
49560d06aSjeremylt #include <ceed.h>
59560d06aSjeremylt #include <math.h>
6*49aac155SJeremy L Thompson #include <stdio.h>
72b730f8bSJeremy L Thompson #include <stdlib.h>
89560d06aSjeremylt 
99560d06aSjeremylt #include "t500-operator.h"
109560d06aSjeremylt 
main(int argc,char ** argv)119560d06aSjeremylt int main(int argc, char **argv) {
129560d06aSjeremylt   Ceed          ceed;
139560d06aSjeremylt   CeedQFunction qf, qf_2;
149560d06aSjeremylt   CeedOperator  op, op_2;
159560d06aSjeremylt 
169560d06aSjeremylt   CeedInit(argv[1], &ceed);
179560d06aSjeremylt 
189560d06aSjeremylt   CeedQFunctionCreateInterior(ceed, 1, setup, setup_loc, &qf);
199560d06aSjeremylt   CeedQFunctionCreateInterior(ceed, 1, mass, mass_loc, &qf_2);
202b730f8bSJeremy L Thompson   CeedOperatorCreate(ceed, qf, CEED_QFUNCTION_NONE, CEED_QFUNCTION_NONE, &op);
212b730f8bSJeremy L Thompson   CeedOperatorCreate(ceed, qf_2, CEED_QFUNCTION_NONE, CEED_QFUNCTION_NONE, &op_2);
229560d06aSjeremylt 
239560d06aSjeremylt   CeedOperatorReferenceCopy(op, &op_2);  // This destroys the previous op_2
242b730f8bSJeremy L Thompson   if (op != op_2) printf("Error copying CeedOperator reference\n");
259560d06aSjeremylt 
269560d06aSjeremylt   CeedQFunctionDestroy(&qf);
279560d06aSjeremylt   CeedQFunctionDestroy(&qf_2);
289560d06aSjeremylt   CeedOperatorDestroy(&op);
299560d06aSjeremylt   CeedOperatorDestroy(&op_2);
309560d06aSjeremylt   CeedDestroy(&ceed);
319560d06aSjeremylt   return 0;
329560d06aSjeremylt }
33