Actual source code: petscda.h90

  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: !