Home
last modified time | relevance | path

Searched refs:ta (Results 1 – 17 of 17) sorted by relevance

/petsc/src/tao/unconstrained/tutorials/
H A Drosenbrock1f.F9032 subroutine FormFunctionGradient(ta, X, f, G, dummy, ierr) argument
33 type(tTao) ta local
91 subroutine FormHessian(ta, X, H, PrecH, dummy, ierr) argument
94 type(tTao) ta local
166 type(tTao) ta ! TAO_SOVER context
204 PetscCallA(TaoCreate(PETSC_COMM_SELF, ta, ierr))
205 PetscCallA(TaoSetType(ta, TAOLMVM, ierr))
208 PetscCallA(TaoSetObjectiveAndGradient(ta, PETSC_NULL_VEC, FormFunctionGradient, 0, ierr))
209 PetscCallA(TaoSetHessian(ta, H, H, FormHessian, 0, ierr))
213 PetscCallA(TaoSetSolution(ta, x, ierr))
[all …]
H A Deptorsion2f.F90104 subroutine FormFunctionGradient(ta, X, f, G, dummy, ierr) argument
106 type(tTao) ta local
258 subroutine ComputeHessian(ta, X, H, Hpre, dummy, ierr) argument
259 type(tTao) ta local
330 subroutine Monitor(ta, dummy, ierr) argument
331 type(tTao) ta local
339 PetscCall(TaoGetSolutionStatus(ta, its, f, gnorm, cnorm, xdiff, reason, ierr))
348 subroutine ConvergenceTest(ta, dummy, ierr) argument
349 type(tTao) ta local
357 PetscCall(TaoGetSolutionStatus(ta, its, f, gnorm, cnorm, xdiff, reason, ierr))
[all …]
/petsc/src/ksp/ksp/impls/tcqmr/
H A Dtcqmr.c14 PetscScalar deltmp, rho, beta, eptmp, ta, s, c, tau_n, delta; in KSPSolve_TCQMR() local
111 ta = -deltmp / Gamma; in KSPSolve_TCQMR()
112 s = 1.0 / PetscSqrtScalar(1.0 + ta * ta); in KSPSolve_TCQMR()
113 c = s * ta; in KSPSolve_TCQMR()
115 ta = -Gamma / deltmp; in KSPSolve_TCQMR()
116 c = 1.0 / PetscSqrtScalar(1.0 + ta * ta); in KSPSolve_TCQMR()
117 s = c * ta; in KSPSolve_TCQMR()
/petsc/src/tao/leastsquares/tutorials/
H A Dchwirut1f.F9035 subroutine FormFunction(ta, x, f, dummy, ierr)
37 Tao ta
307 Tao ta ! Tao context
335 PetscCallA(TaoCreate(PETSC_COMM_SELF, ta, ierr))
336 PetscCallA(TaoSetType(ta, TAOPOUNDERS, ierr))
339 PetscCallA(TaoSetResidualRoutine(ta, f, FormFunction, 0, ierr))
344 PetscCallA(TaoSetSolution(ta, x, ierr))
347 PetscCallA(TaoSetFromOptions(ta, ierr))
349 PetscCallA(TaoSetConvergenceHistory(ta, hist, resid, cnorm, lits, oh, PETSC_TRUE, ierr))
351 PetscCallA(TaoSolve(ta, ierr))
[all …]
H A Dchwirut2f.F90331 subroutine FormFunction(ta, x, f, dummy, ierr) argument
333 Tao ta
426 Tao ta ! Tao context
444 PetscCallA(TaoCreate(PETSC_COMM_SELF, ta, ierr))
445 PetscCallA(TaoSetType(ta, TAOPOUNDERS, ierr))
448 PetscCallA(TaoSetResidualRoutine(ta, f, FormFunction, 0, ierr))
452 PetscCallA(TaoSetSolution(ta, x, ierr))
455 PetscCallA(TaoSetFromOptions(ta, ierr))
457 PetscCallA(TaoSolve(ta, ierr))
460 PetscCallA(TaoDestroy(ta, ierr))
/petsc/src/tao/bound/tutorials/
H A Dplate2f.F9056 subroutine FormFunctionGradient(ta, X, fcn, G, dummy, ierr)
59 Tao ta
293 subroutine FormHessian(ta, X, Hessian, Hpc, dummy, ierr) argument
295 Tao ta
664 subroutine MSA_Plate(ta, xl, xu, dummy, ierr) argument
666 Tao ta
799 Tao ta ! Tao solver context
871 PetscCallA(TaoCreate(PETSC_COMM_WORLD, ta, ierr))
872 PetscCallA(TaoSetType(ta, TAOBLMVM, ierr))
876 PetscCallA(TaoSetObjectiveAndGradient(ta, PETSC_NULL_VEC, FormFunctionGradient, 0, ierr))
[all …]
/petsc/src/dm/tutorials/
H A Dex7.c12 PetscBool ta; member
58 …PetscCall(PetscBagRegisterBool(bag, &params->ta, PETSC_TRUE, "do_output", "Write output file (true… in main()
/petsc/src/ts/impls/implicit/alpha/
H A Dalpha1.c294 PetscReal ta = th->stage_time; in SNESTSFormFunction_Alpha() local
300 PetscCall(TSComputeIFunction(ts, ta, Xa, Va, F, PETSC_FALSE)); in SNESTSFormFunction_Alpha()
308 PetscReal ta = th->stage_time; in SNESTSFormJacobian_Alpha() local
314 PetscCall(TSComputeIJacobian(ts, ta, Xa, Va, dVdX, J, P, PETSC_FALSE)); in SNESTSFormJacobian_Alpha()
H A Dalpha2.c385 PetscReal ta = th->stage_time; in SNESTSFormFunction_Alpha() local
391 PetscCall(TSComputeI2Function(ts, ta, Xa, Va, Aa, F)); in SNESTSFormFunction_Alpha()
399 PetscReal ta = th->stage_time; in SNESTSFormJacobian_Alpha() local
405 PetscCall(TSComputeI2Jacobian(ts, ta, Xa, Va, Aa, dVdX, dAdX, J, P)); in SNESTSFormJacobian_Alpha()
/petsc/src/mat/impls/aij/seq/
H A Dmatmatmult.c151 PetscHMapI ta; in MatMatMultSymbolic_SeqAIJ_SeqAIJ_LLCondensed() local
163 PetscCall(PetscHMapICreateWithSize(bn, &ta)); in MatMatMultSymbolic_SeqAIJ_SeqAIJ_LLCondensed()
164 MatRowMergeMax_SeqAIJ(b, bm, ta); in MatMatMultSymbolic_SeqAIJ_SeqAIJ_LLCondensed()
165 PetscCall(PetscHMapIGetSize(ta, &Crmax)); in MatMatMultSymbolic_SeqAIJ_SeqAIJ_LLCondensed()
166 PetscCall(PetscHMapIDestroy(&ta)); in MatMatMultSymbolic_SeqAIJ_SeqAIJ_LLCondensed()
388 PetscHMapI ta; in MatMatMultSymbolic_SeqAIJ_SeqAIJ_Scalable_fast() local
398 PetscCall(PetscHMapICreateWithSize(bn, &ta)); in MatMatMultSymbolic_SeqAIJ_SeqAIJ_Scalable_fast()
399 MatRowMergeMax_SeqAIJ(b, bm, ta); in MatMatMultSymbolic_SeqAIJ_SeqAIJ_Scalable_fast()
400 PetscCall(PetscHMapIGetSize(ta, &Crmax)); in MatMatMultSymbolic_SeqAIJ_SeqAIJ_Scalable_fast()
401 PetscCall(PetscHMapIDestroy(&ta)); in MatMatMultSymbolic_SeqAIJ_SeqAIJ_Scalable_fast()
[all …]
H A Daij.h679 #define MatRowMergeMax_SeqAIJ(mat, nrows, ta) \ argument
686 PetscCall(PetscHMapISet((ta), *_col + 1, 1)); \
695 #define MatMergeRows_SeqAIJ(mat, nrows, rows, ta) \ argument
702 PetscCall(PetscHMapISetWithMode((ta), *_col + 1, 1, INSERT_VALUES)); \
/petsc/src/mat/impls/aij/mpi/
H A Dmpiptap.c239 PetscHMapI ta; in MatPtAPSymbolic_MPIAIJ_MPIAIJ_scalable() local
281 PetscCall(PetscHMapICreateWithSize(pn, &ta)); /* for compute AP_loc and Cmpi */ in MatPtAPSymbolic_MPIAIJ_MPIAIJ_scalable()
282 MatRowMergeMax_SeqAIJ(p_loc, P_loc->rmap->N, ta); in MatPtAPSymbolic_MPIAIJ_MPIAIJ_scalable()
283 MatRowMergeMax_SeqAIJ(p_oth, P_oth->rmap->N, ta); in MatPtAPSymbolic_MPIAIJ_MPIAIJ_scalable()
284 PetscCall(PetscHMapIGetSize(ta, &Crmax)); /* Crmax = nnz(sum of Prows) */ in MatPtAPSymbolic_MPIAIJ_MPIAIJ_scalable()
456 for (j = 0; j < len_r[k]; j++) PetscCall(PetscHMapISet(ta, *(Jptr + j) + 1, 1)); in MatPtAPSymbolic_MPIAIJ_MPIAIJ_scalable()
458 PetscCall(PetscHMapIGetSize(ta, &Crmax)); in MatPtAPSymbolic_MPIAIJ_MPIAIJ_scalable()
459 PetscCall(PetscHMapIDestroy(&ta)); in MatPtAPSymbolic_MPIAIJ_MPIAIJ_scalable()
1526 PetscHMapI ta; in MatPtAPSymbolic_MPIAIJ_MPIAIJ() local
1568 PetscCall(PetscHMapICreateWithSize(pn, &ta)); /* for compute AP_loc and Cmpi */ in MatPtAPSymbolic_MPIAIJ_MPIAIJ()
[all …]
H A Dmpimatmatmult.c1286 PetscHMapI ta; in MatTransposeMatMultSymbolic_MPIAIJ_MPIAIJ_nonscalable() local
1385 PetscCall(PetscHMapICreateWithSize(an, &ta)); /* for compute Crmax */ in MatTransposeMatMultSymbolic_MPIAIJ_MPIAIJ_nonscalable()
1386 MatRowMergeMax_SeqAIJ(a_loc, ptap->A_loc->rmap->N, ta); in MatTransposeMatMultSymbolic_MPIAIJ_MPIAIJ_nonscalable()
1390 for (j = 0; j < len_r[k]; j++) PetscCall(PetscHMapISet(ta, *(Jptr + j) + 1, 1)); in MatTransposeMatMultSymbolic_MPIAIJ_MPIAIJ_nonscalable()
1392 PetscCall(PetscHMapIGetSize(ta, &Crmax)); in MatTransposeMatMultSymbolic_MPIAIJ_MPIAIJ_nonscalable()
1393 PetscCall(PetscHMapIDestroy(&ta)); in MatTransposeMatMultSymbolic_MPIAIJ_MPIAIJ_nonscalable()
1780 PetscHMapI ta; in MatTransposeMatMultSymbolic_MPIAIJ_MPIAIJ() local
1817 PetscCall(PetscHMapICreateWithSize(A->cmap->n + a->B->cmap->N, &ta)); in MatTransposeMatMultSymbolic_MPIAIJ_MPIAIJ()
1818 MatRowMergeMax_SeqAIJ(a_loc, am, ta); in MatTransposeMatMultSymbolic_MPIAIJ_MPIAIJ()
1819 PetscCall(PetscHMapIGetSize(ta, &Armax)); in MatTransposeMatMultSymbolic_MPIAIJ_MPIAIJ()
[all …]
/petsc/src/dm/impls/plex/
H A Dplexfem.c625 const PetscScalar *ta, *tva; in DMPlexBasisTransformField_Internal() local
631 PetscCall(VecGetArrayRead(tv, &ta)); in DMPlexBasisTransformField_Internal()
632 PetscCall(DMPlexPointLocalFieldRead(tdm, p, f, ta, &tva)); in DMPlexBasisTransformField_Internal()
652 PetscCall(VecRestoreArrayRead(tv, &ta)); in DMPlexBasisTransformField_Internal()
659 const PetscScalar *ta, *tvaf, *tvag; in DMPlexBasisTransformFieldTensor_Internal() local
669 PetscCall(VecGetArrayRead(tv, &ta)); in DMPlexBasisTransformFieldTensor_Internal()
670 PetscCall(DMPlexPointLocalFieldRead(tdm, pf, f, ta, &tvaf)); in DMPlexBasisTransformFieldTensor_Internal()
671 PetscCall(DMPlexPointLocalFieldRead(tdm, pg, g, ta, &tvag)); in DMPlexBasisTransformFieldTensor_Internal()
707 PetscCall(VecRestoreArrayRead(tv, &ta)); in DMPlexBasisTransformFieldTensor_Internal()
773 const PetscScalar *ta; in DMPlexBasisTransform_Internal() local
[all …]
/petsc/src/ts/tutorials/
H A Dex30.c1295 Vec tu, ta; in ProjectAuxDM() local
1314 PetscCall(DMGetGlobalVector(dmAux, &ta)); in ProjectAuxDM()
1315 PetscCall(VecScatterCreate(tu, NULL, ta, is, &sctAux)); in ProjectAuxDM()
1317 PetscCall(DMRestoreGlobalVector(dmAux, &ta)); in ProjectAuxDM()
/petsc/src/dm/interface/
H A Ddm.c2688 PetscScalar *ta; in DMConstructBasisTransform_Internal() local
2713 PetscCall(VecGetArray(dm->transform, &ta)); in DMConstructBasisTransform_Internal()
2724 PetscCall(DMPlexPointLocalFieldRef(dm->transformDM, p, f, ta, (void *)&tva)); in DMConstructBasisTransform_Internal()
2729 PetscCall(VecRestoreArray(dm->transform, &ta)); in DMConstructBasisTransform_Internal()
/petsc/share/petsc/datafiles/meshes/
H A Dtestcase3D.cas2399 (dpm/pdf-tran-ta-counter 0)
8757 (ms-levels/viscous-ta (#t #t #t #t))
8758 (ms-levels/dissipation-ta (#t #t #t #t))
8759 (ms-coefficients-ta (0.25 0.333333 0.5 1.))