Subversion Repositories slepc-dev

Rev

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

Rev 986 Rev 1004
Line 125... Line 125...
  *ierr = STInitializePackage(PETSC_NULL); if (*ierr) return;
  *ierr = STInitializePackage(PETSC_NULL); if (*ierr) return;
  *ierr = EPSInitializePackage(PETSC_NULL); if (*ierr) return;
  *ierr = EPSInitializePackage(PETSC_NULL); if (*ierr) return;
#endif
#endif
 
 
  SlepcInitializeCalled = PETSC_TRUE;
  SlepcInitializeCalled = PETSC_TRUE;
  PetscLogInfo((0,"SlepcInitialize: SLEPc successfully started from Fortran\n"));
  PetscVerboseInfo((0,"SlepcInitialize: SLEPc successfully started from Fortran\n"));
 
 
}  
}  
 
 
EXTERN_C_END
EXTERN_C_END