Actual source code: petscversion.h
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_RELEASE 1
15: #define PETSC_VERSION_MAJOR 2
16: #define PETSC_VERSION_MINOR 3
17: #define PETSC_VERSION_SUBMINOR 0
18: #define PETSC_VERSION_PATCH 21
19: #define PETSC_VERSION_DATE "April, 26, 2005"
20: #define PETSC_VERSION_PATCH_DATE "June, 21, 2005"
21: #define PETSC_AUTHOR_INFO "\
22: The PETSc Team\n\
23: petsc-maint@mcs.anl.gov\n\
24: http://www.mcs.anl.gov/petsc/\n"
26: #if (PETSC_VERSION_RELEASE == 1)
27: #define PetscGetVersion(version) (sprintf(*(version),"Petsc Release Version %d.%d.%d, Patch %d, ", \
28: PETSC_VERSION_MAJOR,PETSC_VERSION_MINOR, PETSC_VERSION_SUBMINOR, \
29: PETSC_VERSION_PATCH),PetscStrcat(*(version),PETSC_VERSION_DATE),0)
30: #else
31: #define PetscGetVersion(version) (sprintf(*(version),"Petsc Development Version %d.%d.%d, Patch %d, ", \
32: PETSC_VERSION_MAJOR,PETSC_VERSION_MINOR, PETSC_VERSION_SUBMINOR, \
33: PETSC_VERSION_PATCH),PetscStrcat(*(version),PETSC_VERSION_DATE),0)
34: #endif
36: /*M
37: PetscGetVersion - Gets the Petsc Version information in a string.
39: Output Parameter:
40: . version - version string
42: Level: developer
44: Usage:
45: char version[256];
46: PetscGetVersion(&version);
48: Fortran Note:
49: This routine is not supported in Fortran.
51: .seealso: PetscGetProgramName()
53: M*/
56: #endif