Actual source code: test1.c
slepc-3.11.2 2019-07-30
1: /*
2: - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
3: SLEPc - Scalable Library for Eigenvalue Problem Computations
4: Copyright (c) 2002-2019, Universitat Politecnica de Valencia, Spain
6: This file is part of SLEPc.
7: SLEPc is distributed under a 2-clause BSD license (see LICENSE).
8: - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
9: */
10: /*
11: Demonstrates SlepcInitializeNoArguments()
12: */
14: #include <slepcsys.h>
16: int main(int argc,char **argv)
17: {
19: PetscBool isInitialized;
21: SlepcInitialized(&isInitialized);if (ierr) return ierr;
22: if (!isInitialized) {
23: SlepcInitializeNoArguments();if (ierr) return ierr;
24: PetscPrintf(PETSC_COMM_WORLD,"Initialize SLEPc.\n");
25: } else {
26: PetscPrintf(PETSC_COMM_WORLD,"SLEPc was already initialized.\n");
27: }
28: SlepcFinalize();
29: return ierr;
30: }
32: /*TEST
34: test:
35: suffix: 1
37: TEST*/