Searched refs:val_dot (Results 1 – 1 of 1) sorted by relevance
| /petsc/src/vec/vec/tests/ |
| H A D | ex43.c | 10 PetscScalar *val_dot, *val_mdot, *tval_dot, *tval_mdot; in main() local
30 PetscCall(PetscMalloc1(k, &val_dot)); in main()
40 PetscCall(VecDot(t, V[j], &val_dot[j])); in main()
45 if (PetscAbsScalar(val_mdot[j] - val_dot[j]) / PetscAbsScalar(val_dot[j]) > 1e-5) { in main()
46 … val_dot[j]=%g\n", i, j, (double)PetscAbsScalar(val_mdot[j]), (double)PetscAbsScalar(val_dot[j]))); in main()
57 PetscCall(PetscFree(val_dot)); in main()
|