Actual source code: petscviewer.h90
petsc-3.10.5 2019-03-28
Report Typos and Errors

      2:       Interface PetscViewerBinaryWrite
      3:         Subroutine PetscViewerBinaryWriteInt(v,a,cnt,tmp,ierr)
      4:           use petscdef
      5:           PetscViewer v
      6:           PetscInt a(*)
      7:           PetscInt cnt
      8:           PetscBool  tmp
      9:           PetscErrorCode ierr
     10:         End Subroutine

     12:         Subroutine PetscViewerBinaryWriteScalar(v,a,cnt,tmp,ierr)
     13:           use petscdef
     14:           PetscViewer v
     15:           PetscScalar a(*)
     16:           PetscInt cnt
     17:           PetscBool  tmp
     18:           PetscErrorCode ierr
     19:         End Subroutine

     21: #if defined(PETSC_USE_COMPLEX)
     22:         Subroutine PetscViewerBinaryWriteReal(v,a,cnt,tmp,ierr)
     23:           use petscdef
     24:           PetscViewer v
     25:           PetscReal a(*)
     26:           PetscInt cnt
     27:           PetscBool  tmp
     28:           PetscErrorCode ierr
     29:         End Subroutine
     30: #endif

     32:         Subroutine PetscViewerBinaryReadInt(v,a,cnt,ierr)
     33:           use petscdef
     34:           PetscViewer v
     35:           PetscInt a(*)
     36:           PetscInt cnt
     37:           PetscErrorCode ierr
     38:         End Subroutine

     40:         Subroutine PetscViewerBinaryReadScalar(v,a,cnt,ierr)
     41:           use petscdef
     42:           PetscViewer v
     43:           PetscScalar a(*)
     44:           PetscInt cnt
     45:           PetscErrorCode ierr
     46:         End Subroutine

     48: #if defined(PETSC_USE_COMPLEX)
     49:         Subroutine PetscViewerBinaryReadReal(v,a,cnt,ierr)
     50:           use petscdef
     51:           PetscViewer v
     52:           PetscReal a(*)
     53:           PetscInt cnt
     54:           PetscErrorCode ierr
     55:         End Subroutine
     56: #endif

     58:       End Interface