Searched refs:xa_last (Results 1 – 1 of 1) sorted by relevance
| /petsc/src/snes/tutorials/ |
| H A D | ex3.c | 574 PetscScalar *xa, *xa_last, tmp; in PostCheck() local
594 PetscCall(DMDAVecGetArray(da, check->last_step, &xa_last)); in PostCheck()
606 else rdiff = PetscAbsScalar((xa[i] - xa_last[i]) / xa[i]); in PostCheck()
609 xa[i] = .5 * (xa[i] + xa_last[i]); in PostCheck()
611 …=%g, x_new=%g\n", i, (double)PetscAbsScalar(tmp), (double)PetscAbsScalar(xa_last[i]), (double)rdif… in PostCheck()
614 PetscCall(DMDAVecRestoreArray(da, check->last_step, &xa_last)); in PostCheck()
|