1 2 /* $Id: petscversion.h,v 1.26 2001/06/21 21:20:02 bsmith Exp $ */ 3 #if !defined(__PETSCVERSION_H) 4 #define __PETSCVERSION_H 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 1 16 #define PETSC_VERSION_SUBMINOR 6 17 #define PETSC_VERSION_PATCH 4 18 #define PETSC_VERSION_DATE "Aug 14, 2003" 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 #endif 28 29 /*M 30 PetscGetVersion - Gets the Petsc Version information in a string. 31 32 Output Parameter: 33 . version - version string 34 35 Level: developer 36 37 Usage: 38 char version[256]; 39 PetscGetVersion(&version); 40 41 Fortran Note: 42 This routine is not supported in Fortran. 43 44 .seealso: PetscGetProgramName() 45 46 M*/ 47