7 static PetscErrorCode IncrementSize(PetscRandom rand, PetscInt *value)  in IncrementSize()  argument
13   PetscCall(PetscRandomSetInterval(rand, -(*value), 500 - (*value)));  in IncrementSize()
14   PetscCall(PetscRandomGetValueReal(rand, &rval));  in IncrementSize()
16   PetscCall(DebugPrintf(PetscObjectComm((PetscObject)rand), "n: %" PetscInt_FMT "\n", *value));  in IncrementSize()
20 static PetscErrorCode TestAllocate(PetscDeviceContext dctx, PetscRandom rand, PetscMemType mtype)  in TestAllocate()  argument
34   PetscCall(IncrementSize(rand, &n));  in TestAllocate()
66   PetscCall(IncrementSize(rand, &n));  in TestAllocate()
85   PetscCall(IncrementSize(rand, &n));  in TestAllocate()
99 static PetscErrorCode TestAsyncCoherence(PetscDeviceContext dctx, PetscRandom rand)  in TestAsyncCoherence()  argument
155   PetscRandom        rand;  in main()  local
185   PetscCall(PetscRandomCreate(PETSC_COMM_WORLD, &rand));  in main()
187   PetscCall(PetscRandomSetSeed(rand, 123));  in main()
188   PetscCall(PetscRandomSeed(rand));  in main()
189   PetscCall(PetscRandomSetFromOptions(rand));  in main()
191   PetscCall(TestAllocate(dctx, rand, PETSC_MEMTYPE_HOST));  in main()
192   PetscCall(TestAllocate(dctx, rand, PETSC_MEMTYPE_DEVICE));  in main()
193   PetscCall(TestAsyncCoherence(dctx, rand));  in main()
195   PetscCall(PetscRandomDestroy(&rand));  in main()