Subversion Repositories slepc-dev

Rev

Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 2371 Rev 2376
Line 53... Line 53... 
  PetscViewerASCIIMonitor monviewer;
 
  PetscViewerASCIIMonitor monviewer;
 
  SlepcConvMonitor        ctx;
 
  SlepcConvMonitor        ctx;
 
 
 
 
 
  PetscFunctionBegin;
 
  PetscFunctionBegin;
 
  PetscValidHeaderSpecific(eps,EPS_CLASSID,1);
 
  PetscValidHeaderSpecific(eps,EPS_CLASSID,1);
 
 
 
  if (!EPSRegisterAllCalled) { ierr = EPSRegisterAll(PETSC_NULL);CHKERRQ(ierr); }
 
  ierr = PetscOptionsBegin(((PetscObject)eps)->comm,((PetscObject)eps)->prefix,"Eigenproblem Solver (EPS) Options","EPS");CHKERRQ(ierr);
 
  ierr = PetscOptionsBegin(((PetscObject)eps)->comm,((PetscObject)eps)->prefix,"Eigenproblem Solver (EPS) Options","EPS");CHKERRQ(ierr);
 
    ierr = PetscOptionsList("-eps_type","Eigenproblem Solver method","EPSSetType",EPSList,(char*)(((PetscObject)eps)->type_name?((PetscObject)eps)->type_name:EPSKRYLOVSCHUR),type,256,&flg);CHKERRQ(ierr);
 
    ierr = PetscOptionsList("-eps_type","Eigenproblem Solver method","EPSSetType",EPSList,(char*)(((PetscObject)eps)->type_name?((PetscObject)eps)->type_name:EPSKRYLOVSCHUR),type,256,&flg);CHKERRQ(ierr);
 
    if (flg) {
 
    if (flg) {
 
      ierr = EPSSetType(eps,type);CHKERRQ(ierr);
 
      ierr = EPSSetType(eps,type);CHKERRQ(ierr);
 
    }
 
    }