[svn-r2797]

Purpose:
    Maintenance
Description:
    Updated examples to use new F90 programming model
Platforms tested:
    O2K and Solaris2.7

fortran/examples/rwdsetexample.f90

@@ -33,9 +33,9 @@
      end do
 
      !
-     ! Initialize FORTRAN predefined datatypes
+     ! Initialize FORTRAN interface.
      !
-     CALL h5init_types_f(error) 
+     CALL h5init_fortran_f(error) 
 
      !
      ! Open an existing file.
@@ -68,9 +68,9 @@
      CALL h5fclose_f(file_id, error)
      
      !
-     ! Close FORTRAN predefined datatypes.
+     ! Close FORTRAN interface.
      !
-     CALL h5close_types_f(error)
+     CALL h5close_fortran_f(error)
 
      END PROGRAM RWDSETEXAMPLE