summaryrefslogtreecommitdiffstats
path: root/fortran/examples/grpsexample.f90
diff options
context:
space:
mode:
authorElena Pourmal <epourmal@hdfgroup.org>2000-11-17 22:45:34 (GMT)
committerElena Pourmal <epourmal@hdfgroup.org>2000-11-17 22:45:34 (GMT)
commit320dfb1a03b50f932959ee595bc5b723f770d25c (patch)
tree88973b4dd27f2a94b5f2284905f88d51569fe358 /fortran/examples/grpsexample.f90
parent610ad05c1d18045b33a922e59a3f5fd34870c3fc (diff)
downloadhdf5-320dfb1a03b50f932959ee595bc5b723f770d25c.zip
hdf5-320dfb1a03b50f932959ee595bc5b723f770d25c.tar.gz
hdf5-320dfb1a03b50f932959ee595bc5b723f770d25c.tar.bz2
[svn-r2977]
Purpose: Code maintenance Description: Fixed the code to use h5open_f and h5close_f subroutines Platforms tested: Solaris 2.6
Diffstat (limited to 'fortran/examples/grpsexample.f90')
-rw-r--r--fortran/examples/grpsexample.f904
1 files changed, 2 insertions, 2 deletions
diff --git a/fortran/examples/grpsexample.f90 b/fortran/examples/grpsexample.f90
index 2761732..4b53bf0 100644
--- a/fortran/examples/grpsexample.f90
+++ b/fortran/examples/grpsexample.f90
@@ -26,7 +26,7 @@
!
! Initialize FORTRAN interface.
!
- CALL h5init_fortran_f(error)
+ CALL h5open_f(error)
!
! Create a new file using default properties.
@@ -63,6 +63,6 @@
!
! Close FORTRAN interface.
!
- CALL h5close_fortran_f(error)
+ CALL h5close_f(error)
END PROGRAM GRPSEXAMPLE