[petsc-users] How to get Version

2010-07-15 Thread jaru...@ascomp.ch
Hello, I want to get version of Petsc but the command PetscGetVersion is not supported in Fortran. Is there another command I can use for Fortran? Thanks Jarunan -- Jarunan Panyasantisuk Development Engineer ASCOMP GmbH, Technoparkstr. 1 CH-8005 Zurich, Switzerland Phone : +41 44 445 4072

[petsc-users] How to get Version

2010-07-15 Thread Jed Brown
On Thu, 15 Jul 2010 12:07:40 +0200, jarunan at ascomp.ch wrote: Hello, I want to get version of Petsc but the command PetscGetVersion is not supported in Fortran. Is there another command I can use for Fortran? #if (PETSC_VERSION_RELEASE == 1) #define PetscGetVersion(version,len)

[petsc-users] How to get Version

2010-07-15 Thread Satish Balay
For eg: #if (PETSC_VERSION_RELEASE == 1) write(6,25) PETSC_VERSION_MAJOR,PETSC_VERSION_MINOR,PETSC_VERSION_SUBMINOR,PETSC_VERSION_PATCH 25 format('PETSc Release Version: ',i1,'.',i1,'.',i1,' Patch:',i2) #else write(6,25) 25 format('PETSc Development Version: ',

[petsc-users] How to get Version

2010-07-15 Thread jaru...@ascomp.ch
Thanks a lot Jarunan Quoting Satish Balay balay at mcs.anl.gov: For eg: #if (PETSC_VERSION_RELEASE == 1) write(6,25) PETSC_VERSION_MAJOR,PETSC_VERSION_MINOR,PETSC_VERSION_SUBMINOR,PETSC_VERSION_PATCH 25 format('PETSc Release Version: ',i1,'.',i1,'.',i1,' Patch:',i2) #else