| 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);
|
|
|