10436c2adSjeremylt /// @file 20436c2adSjeremylt /// Test creation, setting, reading, restoring, and destroying of a vector 30436c2adSjeremylt /// \test Test creation, setting, reading, restoring, and destroying of a vector 40436c2adSjeremylt #include <ceed.h> 5*49aac155SJeremy L Thompson #include <stdio.h> 60436c2adSjeremylt 70436c2adSjeremylt int main(int argc, char **argv) { 80436c2adSjeremylt Ceed ceed; 90436c2adSjeremylt CeedVector x; 104fee36f0SJeremy L Thompson CeedInt len = 10; 114fee36f0SJeremy L Thompson CeedScalar array[len]; 120436c2adSjeremylt 130436c2adSjeremylt CeedInit(argv[1], &ceed); 140436c2adSjeremylt 154fee36f0SJeremy L Thompson CeedVectorCreate(ceed, len, &x); 164fee36f0SJeremy L Thompson for (CeedInt i = 0; i < len; i++) array[i] = len + i; 174fee36f0SJeremy L Thompson CeedVectorSetArray(x, CEED_MEM_HOST, CEED_USE_POINTER, array); 180436c2adSjeremylt 194fee36f0SJeremy L Thompson { 204fee36f0SJeremy L Thompson const CeedScalar *read_array; 214fee36f0SJeremy L Thompson 224fee36f0SJeremy L Thompson CeedVectorGetArrayRead(x, CEED_MEM_HOST, &read_array); 234fee36f0SJeremy L Thompson for (CeedInt i = 0; i < len; i++) { 244fee36f0SJeremy L Thompson if (read_array[i] != len + i) printf("Error reading array[%" CeedInt_FMT "] = %f\n", i, (CeedScalar)read_array[i]); 252b730f8bSJeremy L Thompson } 264fee36f0SJeremy L Thompson CeedVectorRestoreArrayRead(x, &read_array); 274fee36f0SJeremy L Thompson } 280436c2adSjeremylt 290436c2adSjeremylt CeedVectorDestroy(&x); 300436c2adSjeremylt CeedDestroy(&ceed); 310436c2adSjeremylt return 0; 320436c2adSjeremylt } 33