/usr/lib/petscdir/3.1/include/finclude/petscdadef.h is in libpetsc3.1-dev 3.1.dfsg-11ubuntu1.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 | !
! Include file for Fortran use of the DA (distributed array) package in PETSc
!
#if !defined (__PETSCDADEF_H)
#define __PETSCDADEF_H
#include "finclude/petscisdef.h"
#include "finclude/petscvecdef.h"
#include "finclude/petscmatdef.h"
#if !defined(PETSC_USE_FORTRAN_DATATYPES)
#define DA PetscFortranAddr
#define DM PetscFortranAddr
#define ADDA PetscFortranAddr
#define SDA PetscFortranAddr
#endif
#define DAPeriodicType PetscEnum
#define DAStencilType PetscEnum
#define DADirection PetscEnum
#define DMMG PetscFortranAddr
#define DMMGArray PetscFortranAddr
#define DMComposite PetscFortranAddr
#define DALocalInfo PetscInt
!
! DA_LOCAL_INFO_SIZE is one large than the size incase the DA is larger than an integer (on 64 bit systems).
! non-int fields are not accessiable from fortran.
!
#define DA_LOCAL_INFO_SIZE 22
#define DA_LOCAL_INFO_DIM 1
#define DA_LOCAL_INFO_DOF 2
#define DA_LOCAL_INFO_MX 4
#define DA_LOCAL_INFO_MY 5
#define DA_LOCAL_INFO_MZ 6
#define DA_LOCAL_INFO_XS 7
#define DA_LOCAL_INFO_YS 8
#define DA_LOCAL_INFO_ZS 9
#define DA_LOCAL_INFO_XM 10
#define DA_LOCAL_INFO_YM 11
#define DA_LOCAL_INFO_ZM 12
#define DA_LOCAL_INFO_GXS 13
#define DA_LOCAL_INFO_GYS 14
#define DA_LOCAL_INFO_GZS 15
#define DA_LOCAL_INFO_GXM 16
#define DA_LOCAL_INFO_GYM 17
#define DA_LOCAL_INFO_GZM 18
#define XG_RANGE in(DA_LOCAL_INFO_GXS)+1:in(DA_LOCAL_INFO_GXS)+in(DA_LOCAL_INFO_GXM)
#define YG_RANGE in(DA_LOCAL_INFO_GYS)+1:in(DA_LOCAL_INFO_GYS)+in(DA_LOCAL_INFO_GYM)
#define ZG_RANGE in(DA_LOCAL_INFO_GZS)+1:in(DA_LOCAL_INFO_GZS)+in(DA_LOCAL_INFO_GZM)
#define X_RANGE in(DA_LOCAL_INFO_XS)+1:in(DA_LOCAL_INFO_XS)+in(DA_LOCAL_INFO_XM)
#define Y_RANGE in(DA_LOCAL_INFO_YS)+1:in(DA_LOCAL_INFO_YS)+in(DA_LOCAL_INFO_YM)
#define Z_RANGE in(DA_LOCAL_INFO_ZS)+1:in(DA_LOCAL_INFO_ZS)+in(DA_LOCAL_INFO_ZM)
#define DAInterpolationType PetscEnum
#define DAElementType PetscEnum
#endif
|