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