1: ! 2: ! $Id: petscda.h90,v 1.3 1998/03/30 21:14:27 balay Exp $; 3: ! 4: ! Additional DA include file for use of PETSc with Fortran 90/HPF 5: ! 7: Interface 8: Subroutine DAGetGlobalIndicesF90(v,n,array,ierr) 9: integer, pointer :: array(:) 10: integer ierr,n 11: DA v 12: End Subroutine 13: End Interface 15: ! 16: ! End of DA Fortran 90 include file for the PETSc package 17: !