1 2 #if !defined(__PETSCVERSION_H) 3 #define __PETSCVERSION_H 4 PETSC_EXTERN_CXX_BEGIN 5 6 /* ========================================================================== */ 7 /* 8 Current PETSc version number and release date, also listed in 9 Web page 10 docs/tex/manual/intro.tex, 11 docs/tex/manual/manual.tex. 12 docs/website/index.html. 13 */ 14 #define PETSC_VERSION_MAJOR 2 15 #define PETSC_VERSION_MINOR 2 16 #define PETSC_VERSION_SUBMINOR 0 17 #define PETSC_VERSION_PATCH 0 18 #define PETSC_VERSION_DATE "Feb 27, 2004" 19 #define PETSC_AUTHOR_INFO "\ 20 The PETSc Team\n\ 21 petsc-maint@mcs.anl.gov\n\ 22 http://www.mcs.anl.gov/petsc/\n" 23 24 #define PetscGetVersion(version) (sprintf(*(version),"Petsc Version %d.%d.%d, Patch %d, Released ", \ 25 PETSC_VERSION_MAJOR,PETSC_VERSION_MINOR, PETSC_VERSION_SUBMINOR, \ 26 PETSC_VERSION_PATCH),PetscStrcat(*(version),PETSC_VERSION_DATE),0) 27 28 /*M 29 PetscGetVersion - Gets the Petsc Version information in a string. 30 31 Output Parameter: 32 . version - version string 33 34 Level: developer 35 36 Usage: 37 char version[256]; 38 PetscGetVersion(&version); 39 40 Fortran Note: 41 This routine is not supported in Fortran. 42 43 .seealso: PetscGetProgramName() 44 45 M*/ 46 47 PETSC_EXTERN_CXX_END 48 #endif 49