Subversion Repositories slepc-dev

Rev

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

Rev 2717 Rev 2823
Line 110... Line 110...
 
 
  /*
  /*
     Initialize shell spectral transformation if selected by user
     Initialize shell spectral transformation if selected by user
  */
  */
  ierr = EPSGetST(eps,&st);CHKERRQ(ierr);
  ierr = EPSGetST(eps,&st);CHKERRQ(ierr);
  ierr = PetscTypeCompare((PetscObject)st,STSHELL,&isShell);CHKERRQ(ierr);
  ierr = PetscObjectTypeCompare((PetscObject)st,STSHELL,&isShell);CHKERRQ(ierr);
  if (isShell) {
  if (isShell) {
    /* (Optional) Create a context for the user-defined spectral tranform;
    /* (Optional) Create a context for the user-defined spectral tranform;
       this context can be defined to contain any application-specific data. */
       this context can be defined to contain any application-specific data. */
    ierr = SampleShellSTCreate(&shell);CHKERRQ(ierr);
    ierr = SampleShellSTCreate(&shell);CHKERRQ(ierr);