Searched refs:tval_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
32 PetscCall(PetscMalloc1(k, &tval_dot)); in main()
41 PetscCall(VecTDot(t, V[j], &tval_dot[j])); in main()
49 if (PetscAbsScalar(tval_mdot[j] - tval_dot[j]) / PetscAbsScalar(tval_dot[j]) > 1e-5) { in main()
50 …al_dot[j]=%g\n", i, j, (double)PetscAbsScalar(tval_mdot[j]), (double)PetscAbsScalar(tval_dot[j]))); in main()
59 PetscCall(PetscFree(tval_dot)); in main()
|