1*0436c2adSjeremylt /// @file 2*0436c2adSjeremylt /// Test creation, setting, reading, restoring, and destroying of a vector 3*0436c2adSjeremylt /// \test Test creation, setting, reading, restoring, and destroying of a vector 4*0436c2adSjeremylt #include <ceed.h> 5*0436c2adSjeremylt 6*0436c2adSjeremylt int main(int argc, char **argv) { 7*0436c2adSjeremylt Ceed ceed; 8*0436c2adSjeremylt CeedVector x; 9*0436c2adSjeremylt CeedInt n; 10*0436c2adSjeremylt CeedScalar a[10]; 11*0436c2adSjeremylt const CeedScalar *b; 12*0436c2adSjeremylt 13*0436c2adSjeremylt CeedInit(argv[1], &ceed); 14*0436c2adSjeremylt 15*0436c2adSjeremylt n = 10; 16*0436c2adSjeremylt CeedVectorCreate(ceed, n, &x); 17*0436c2adSjeremylt for (CeedInt i=0; i<n; i++) 18*0436c2adSjeremylt a[i] = 10 + i; 19*0436c2adSjeremylt CeedVectorSetArray(x, CEED_MEM_HOST, CEED_USE_POINTER, a); 20*0436c2adSjeremylt 21*0436c2adSjeremylt CeedVectorGetArrayRead(x, CEED_MEM_HOST, &b); 22*0436c2adSjeremylt for (CeedInt i=0; i<n; i++) 23*0436c2adSjeremylt if (b[i] != 10+i) 24*0436c2adSjeremylt // LCOV_EXCL_START 25*0436c2adSjeremylt printf("Error reading array b[%d] = %f",i,(double)b[i]); 26*0436c2adSjeremylt // LCOV_EXCL_STOP 27*0436c2adSjeremylt CeedVectorRestoreArrayRead(x, &b); 28*0436c2adSjeremylt 29*0436c2adSjeremylt CeedVectorDestroy(&x); 30*0436c2adSjeremylt CeedDestroy(&ceed); 31*0436c2adSjeremylt return 0; 32*0436c2adSjeremylt } 33