Actual source code: petscao.h
1: !
2: ! $Id: petscao.h,v 1.14 2001/04/10 22:37:56 balay Exp $;
3: !
4: ! Include file for Fortran use of the AO (application ordering) package in PETSc
5: !
6: #if !defined (__PETSCAO_H)
9: #define AO PetscFortranAddr
10: #define AOData PetscFortranAddr
11: #define AOType integer
12: #define AODataType integer
13: #define AOData2dGrid PetscFortranAddr
15: #endif
18: #if !defined (PETSC_AVOID_DECLARATIONS)
20: integer AO_BASIC,AO_ADVANCED
21: parameter (AO_BASIC = 0,AO_ADVANCED = 1)
23: integer AODATA_BASIC,AODATA_ADVANCED
24: parameter (AODATA_BASIC=0,AODATA_ADVANCED=1)
25: !
26: ! End of Fortran include file for the AO package in PETSc
28: #endif