petsc-3.3-p7 2013-05-11

TSAlphaSetAdapt

sets the time step adaptativity and acceptance test routine

#include "petscts.h"   
PetscErrorCode  TSAlphaSetAdapt(TS ts,TSAlphaAdaptFunction adapt,void *ctx)

This function allows to accept/reject a step and select the next time step to use.

Not Collective

	ts	- timestepping context
	adapt	- user-defined adapt routine
	ctx	- [optional] user-defined context for private data for the adapt routine (may be PETSC_NULL)

   adapt (TS ts,PetscReal t,Vec X,Vec Xdot,

           PetscReal *next_dt,PetscBool *accepted,void *ctx);