| /petsc/src/ts/impls/implicit/glle/ |
| H A D | glleadapt.c | 185 …al errors[], const PetscReal cost[], PetscInt cur, PetscReal h, PetscReal tleft, PetscInt *next_sc… in TSGLLEAdaptChoose() argument
195 …PetscUseTypeMethod(adapt, choose, n, orders, errors, cost, cur, h, tleft, next_sc, next_h, finish); in TSGLLEAdaptChoose()
226 …al errors[], const PetscReal cost[], PetscInt cur, PetscReal h, PetscReal tleft, PetscInt *next_sc… in TSGLLEAdaptChoose_None() argument
231 if (*next_h > tleft) { in TSGLLEAdaptChoose_None()
233 *next_h = tleft; in TSGLLEAdaptChoose_None()
254 …al errors[], const PetscReal cost[], PetscInt cur, PetscReal h, PetscReal tleft, PetscInt *next_sc… in TSGLLEAdaptChoose_Size() argument
271 if (*next_h > tleft) { in TSGLLEAdaptChoose_Size()
273 *next_h = tleft; in TSGLLEAdaptChoose_Size()
295 …al errors[], const PetscReal cost[], PetscInt cur, PetscReal h, PetscReal tleft, PetscInt *next_sc… in TSGLLEAdaptChoose_Both() argument
332 if (*next_h > tleft) { in TSGLLEAdaptChoose_Both()
[all …]
|
| H A D | glle.c | 701 static PetscErrorCode TSGLLEAccept_Always(TS ts, PetscReal tleft, PetscReal h, const PetscReal enor… in TSGLLEAccept_Always() argument
794 PetscReal errors[64], costs[64], tleft; in TSGLLEChooseNextScheme() local
799 tleft = ts->max_time - (ts->ptime + ts->time_step); in TSGLLEChooseNextScheme()
814 …PetscCall(TSGLLEAdaptChoose(gl->adapt, n, orders, errors, costs, cur, h, tleft, &next_sc, next_h, … in TSGLLEChooseNextScheme()
|
| /petsc/src/snes/tutorials/ |
| H A D | ex18.c | 41 PetscReal tleft, tright; /* Dirichlet boundary conditions */ member
63 user.tleft = 1.0; in main()
66 PetscCall(PetscOptionsGetReal(NULL, NULL, "-tleft", &user.tleft, NULL)); in main()
112 PetscReal tleft; in FormInitialGuess() local
119 tleft = user->tleft; in FormInitialGuess()
126 for (i = xs; i < xs + xm; i++) x[j][i] = tleft; in FormInitialGuess()
139 PetscScalar tleft, tright, beta; in FormFunction() local
152 tleft = user->tleft; in FormFunction()
193 tw = tleft; in FormFunction()
298 PetscScalar tleft, tright, beta, bm1, coef; in FormJacobian() local
[all …]
|
| /petsc/src/snes/tests/ |
| H A D | ex20.c | 41 PetscReal tleft, tright; /* Dirichlet boundary conditions */ member
65 user.tleft = 1.0; in main()
68 PetscCall(PetscOptionsGetReal(NULL, NULL, "-tleft", &user.tleft, NULL)); in main()
125 for (i = xs; i < xs + xm; i++) x[k][j][i] = user->tleft; in FormInitialGuess()
139 PetscScalar tleft, tright, beta, td, ad, dd, fd = 0.0, tu, au, du = 0.0, fu = 0.0; in FormFunction() local
154 tleft = user->tleft; in FormFunction()
206 tw = tleft; in FormFunction()
451 PetscScalar tleft, tright, beta, td, ad, dd, tu, au, du, v[7], bm1, coef; in FormJacobian() local
467 tleft = user->tleft; in FormJacobian()
564 tw = tleft; in FormJacobian()
|
| /petsc/src/ts/event/ |
| H A D | tsevent.c | 518 static inline PetscReal RefineAndersonBjorck(PetscReal tleft, PetscReal t, PetscReal tright, PetscR… in RefineAndersonBjorck() argument
551 if (side == -1) new_dt = scal * fleft / (scal * fleft - f) * (t - tleft); in RefineAndersonBjorck()
|