xref: /libCEED/tests/t107-vector.c (revision 82a9f6a50dfeefde267cdcc52ec1ab58d2e2b9ff)
10436c2adSjeremylt /// @file
20436c2adSjeremylt /// Test viewing a vector
30436c2adSjeremylt /// \test Test viewing a vector
40436c2adSjeremylt #include <ceed.h>
50436c2adSjeremylt 
60436c2adSjeremylt int main(int argc, char **argv) {
70436c2adSjeremylt   Ceed       ceed;
80436c2adSjeremylt   CeedVector x;
94fee36f0SJeremy L Thompson   CeedInt    len = 10;
104fee36f0SJeremy L Thompson   CeedScalar array[len];
110436c2adSjeremylt 
120436c2adSjeremylt   CeedInit(argv[1], &ceed);
130436c2adSjeremylt 
144fee36f0SJeremy L Thompson   CeedVectorCreate(ceed, len, &x);
154fee36f0SJeremy L Thompson   for (CeedInt i = 0; i < len; i++) array[i] = len + i;
164fee36f0SJeremy L Thompson   CeedVectorSetArray(x, CEED_MEM_HOST, CEED_USE_POINTER, array);
170436c2adSjeremylt 
180436c2adSjeremylt   CeedVectorView(x, "%12.8f", stdout);
190436c2adSjeremylt 
20*82a9f6a5SJeremy L Thompson   // Check tabs and CeedObject functionality
21*82a9f6a5SJeremy L Thompson   {
22*82a9f6a5SJeremy L Thompson     CeedVector x_copy = NULL;
23*82a9f6a5SJeremy L Thompson 
24*82a9f6a5SJeremy L Thompson     CeedVectorReferenceCopy(x, &x_copy);
25*82a9f6a5SJeremy L Thompson     CeedVectorSetNumViewTabs(x_copy, 1);
26*82a9f6a5SJeremy L Thompson     CeedObjectView((CeedObject)x_copy, stdout);
27*82a9f6a5SJeremy L Thompson     CeedObjectDestroy((CeedObject *)&x_copy);
28*82a9f6a5SJeremy L Thompson   }
2962e2d410SJeremy L Thompson 
300436c2adSjeremylt   CeedVectorDestroy(&x);
310436c2adSjeremylt   CeedDestroy(&ceed);
320436c2adSjeremylt   return 0;
330436c2adSjeremylt }
34