Subversion Repositories slepc-dev

Rev

Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 2214 Rev 2216
Line 46... Line 46...
PetscErrorCode QEPSetUp(QEP qep)
PetscErrorCode QEPSetUp(QEP qep)
{
{
  PetscErrorCode ierr;
  PetscErrorCode ierr;
  PetscInt       i,k;
  PetscInt       i,k;
  PetscScalar    *pV;
  PetscScalar    *pV;
  PetscTruth     khas,mhas,lindep;
  PetscBool      khas,mhas,lindep;
  PetscReal      knorm,mnorm,norm;
  PetscReal      knorm,mnorm,norm;
 
 
  PetscFunctionBegin;
  PetscFunctionBegin;
  PetscValidHeaderSpecific(qep,QEP_CLASSID,1);
  PetscValidHeaderSpecific(qep,QEP_CLASSID,1);