C++ (Cpp) KSPGLTRGetLambda Exemples

Exemple #1

Fichier : taolinearsolver_petsc.c Projet : fuentesdt/tao-1.10.1-p3

int TaoLinearSolverPetsc::GetLambda(double *lambda)
{
  const KSPType ktype;
  int info;
  PetscTruth flg;

  PetscFunctionBegin;

  *lambda = 0.0;

  info = KSPGetType(ksp, &ktype); CHKERRQ(info);
  info = PetscStrcmp((char *)ktype, KSPGLTR, &flg); CHKERRQ(info);
  if (flg == PETSC_TRUE) { 	
    info = KSPGLTRGetLambda(ksp, lambda); CHKERRQ(info);
  }

  PetscFunctionReturn(0);
}

Exemple #2

Fichier : gltrf.c Projet : Kun-Qu/petsc

void PETSC_STDCALL  kspgltrgetlambda_(KSP ksp,PetscReal *lambda, int *__ierr ){
*__ierr = KSPGLTRGetLambda(
	(KSP)PetscToPointer((ksp) ),lambda);
}