| /petsc/src/ksp/ksp/tutorials/ |
| H A D | ex6f.F90 | 25 PetscInt nsteps, one
33 nsteps = 2
37 …PetscCallA(PetscOptionsGetInt(PETSC_NULL_OPTIONS, PETSC_NULL_CHARACTER, '-nsteps', nsteps, flg, ie…
113 do i = 1, nsteps
114 PetscCallA(solve1(ksp, A, x, b, u, i, nsteps, A2, ierr))
145 PetscInt count, nsteps, one
201 if (count == nsteps) PetscCallA(MatDestroy(A2, ierr))
|
| /petsc/src/ts/tutorials/optimal_control/ |
| H A D | ex1.c | 8 PetscInt nsteps; /* number of time steps */ member
246 aircraft.nsteps = 10; /* number of steps */ in main()
251 PetscCall(PetscOptionsGetInt(NULL, NULL, "-nsteps", &aircraft.nsteps, NULL)); in main()
271 PetscCall(MatSetSizes(aircraft.Jacp, PETSC_DECIDE, PETSC_DECIDE, 2, 2 * aircraft.nsteps)); in main()
275 …PetscCall(MatCreateDense(PETSC_COMM_WORLD, PETSC_DECIDE, PETSC_DECIDE, 2 * aircraft.nsteps, 1, NUL… in main()
297 PetscCall(VecSetSizes(aircraft.V, PETSC_DECIDE, aircraft.nsteps)); in main()
330 PetscCall(TSSetTimeStep(aircraft.ts, aircraft.ftime / aircraft.nsteps)); in main()
335 for (i = 0; i < aircraft.nsteps; i++) { in main()
343 for (i = 0; i < aircraft.nsteps; i++) { in main()
349 for (i = 0; i < aircraft.nsteps; i++) { in main()
[all …]
|
| /petsc/src/ts/impls/implicit/sundials/ |
| H A D | sundials.c | 123 long int nits, lits, nsteps; in TSStep_Sundials() local
150 PetscCallExternal(CVodeGetNumSteps, mem, &nsteps); in TSStep_Sundials()
152 …MT ". Increase '-ts_max_steps <>' or modify TSSetMaxSteps()", (double)tcur, nsteps, ts->max_steps); in TSStep_Sundials()
207 PetscCallExternal(CVodeGetNumSteps, mem, &nsteps); in TSStep_Sundials()
208 …if (!cvode->monitorstep) ts->steps += nsteps - 1; /* TSStep() increments the step counter by one */ in TSStep_Sundials()
417 long int nsteps, its, nfevals, nlinsetups, nfails, itmp; in TSView_Sundials() local
450 …PetscCallExternal(CVodeGetIntegratorStats, cvode->mem, &nsteps, &nfevals, &nlinsetups, &nfails, &q… in TSView_Sundials()
451 …Call(PetscViewerASCIIPrintf(viewer, "SUNDIALS cumulative number of internal steps %ld\n", nsteps)); in TSView_Sundials()
|
| /petsc/src/ts/tutorials/ |
| H A D | ex17.c | 51 PetscInt nsteps; in main() local
141 PetscCall(TSGetStepNumber(ts, &nsteps)); in main()
143 …imestep %" PetscInt_FMT ": time %g, solution norm %g, max %g, min %g\n", nsteps, (double)ftime, (d… in main()
|
| H A D | ex18.c | 1072 PetscInt nsteps; in main() local
1076 PetscCall(TSGetStepNumber(ts, &nsteps)); in main()
1078 …s at time %g after %" PetscInt_FMT " steps\n", TSConvergedReasons[reason], (double)ftime, nsteps)); in main()
|
| H A D | ex11.c | 1246 PetscInt dim, nsteps; in main() local
1542 PetscCall(TSGetStepNumber(ts, &nsteps)); in main()
1544 …s at time %g after %" PetscInt_FMT " steps\n", TSConvergedReasons[reason], (double)ftime, nsteps)); in main()
|
| /petsc/src/ts/tests/ |
| H A D | ex4.c | 232 PetscInt i, n, *idx, nsteps, maxsteps; in Monitor() local
237 PetscCall(TSGetStepNumber(ts, &nsteps)); in Monitor()
240 if (nsteps % 10 != 0) PetscFunctionReturn(PETSC_SUCCESS); in Monitor()
260 …OMM_WORLD, "At t[%" PetscInt_FMT "] =%14.2e u= %14.2e at the center \n", nsteps, (double)time, (do… in Monitor()
|
| /petsc/src/ts/utils/dmplexlandau/tutorials/ |
| H A D | ex1.c | 414 PetscInt nsteps; in main() local
420 nsteps = (PetscInt)(finalTime / dt_real) + 1; in main()
421 PetscCall(TSSetMaxSteps(ts_nrl, nsteps)); in main()
|
| H A D | ex2.c | 684 PetscInt nsteps; in main() local
690 PetscCall(TSGetMaxSteps(ts, &nsteps)); in main()
694 PetscCall(TSSetMaxSteps(ts, nsteps)); in main()
|