summaryrefslogtreecommitdiffstats
path: root/doc/html/fortran/h5f_FORTRAN.html
blob: ac55061656c2446cca618935beda91657c0ce73e (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
<html>
<head><title>
FORTRAN File API -- h5f
</title></head>

<body bgcolor="#FFFFFF">



<center>
<h1>The FORTRAN 90 API to HDF5<br>h5f: Files</h1>
</center>


<dl>


<p>&nbsp;
<p>&nbsp;
<hr>
<p>&nbsp;
<a name="h5fclose_f">
<p>&nbsp;
</a>


<dt><strong>FORTRAN interface:</strong>  &nbsp <strong>h5fclose_f</strong>

<pre>
         SUBROUTINE h5fclose_f(file_id, hdferr) 
           IMPLICIT NONE
           INTEGER(HID_T), INTENT(IN) :: file_id ! File identifier
           INTEGER, INTENT(OUT) :: hdferr        ! Error code
                                                 ! 0 on success and -1 on failure
         END SUBROUTINE h5fclose_f 
</pre>


<p>&nbsp;
<p>&nbsp;
<hr>
<p>&nbsp;
<a name="h5fcreate_f">
<p>&nbsp;
</a>


<dt><strong>FORTRAN interface:</strong>  &nbsp <strong>h5fcreate_f</strong>
<pre>
         SUBROUTINE h5fcreate_f(name, access_flags, file_id, hdferr, &  
                                creation_prp, access_prp)
           IMPLICIT NONE 
           CHARACTER(LEN=*), INTENT(IN) :: name   ! Name of the file
           INTEGER, INTENT(IN) :: access_flag     ! File access flags 
                                                  ! Possible values are:
                                                  ! H5F_ACC_RDWR_F   
                                                  ! H5F_ACC_RDONLY_F   
                                                  ! H5F_ACC_TRUNC_F  
                                                  ! H5F_ACC_EXCL_F    
                                                  ! H5F_ACC_DEBUG_F   
           INTEGER(HID_T), INTENT(OUT) :: file_id ! File identifier 
           INTEGER, INTENT(OUT) :: hdferr         ! Error code 
                                                  ! 0 on success and -1 on failure
           INTEGER(HID_T), OPTIONAL, INTENT(IN) :: creation_prp 
                                                  ! File creation propertly 
                                                  ! list identifier, if not 
                                                  ! specified its value is
                                                  ! H5P_DEFAULT_F  
           INTEGER(HID_T), OPTIONAL, INTENT(IN) :: access_prp  
                                                  ! File access property list 
                                                  ! identifier, if not 
                                                  ! specified its value is
                                                  ! H5P_DEFAULT_F  
         END SUBROUTINE h5fcreate_f 
</pre>


<p>&nbsp;
<p>&nbsp;
<hr>
<p>&nbsp;
<a name="h5fis_hdf5_f">
<p>&nbsp;
</a>


<dt><strong>FORTRAN interface:</strong>  &nbsp <strong>h5fis_hdf5_f</strong>
<pre>
         SUBROUTINE h5fis_hdf5_f(name, status, hdferr)   
           IMPLICIT NONE 
           CHARACTER(LEN=*), INTENT(IN) :: name   ! Name of the file
           LOGICAL, INTENT(OUT) :: status         ! This parameter
                                                  ! indicates if file is 
                                                  ! an HDF5 file 
                                                  ! ( TRUE or FALSE ) 
           INTEGER, INTENT(OUT) :: hdferr         ! Error code 
                                                  ! 0 on success and -1 on failure
         END SUBROUTINE h5fis_hdf5_f 
</pre>


<p>&nbsp;
<p>&nbsp;
<hr>
<p>&nbsp;
<a name="h5fopen_f">
<p>&nbsp;
</a>


<dt><strong>FORTRAN interface:</strong>  &nbsp <strong>h5fopen_f</strong>
<pre>
         SUBROUTINE h5fopen_f(name, access_flags, file_id, hdferr, &  
                              access_prp)
           IMPLICIT NONE 
           CHARACTER(LEN=*), INTENT(IN) :: name   ! Name of the file
           INTEGER, INTENT(IN) :: access_flag     ! File access flags  
                                                  ! Possible values are:
                                                  ! H5F_ACC_RDWR_F   
                                                  ! H5F_ACC_RDONLY_F    
           INTEGER(HID_T), INTENT(OUT) :: file_id ! File identifier 
           INTEGER, INTENT(OUT) :: hdferr         ! Error code 
                                                  ! 0 on success and -1 on failure
           INTEGER(HID_T), OPTIONAL, INTENT(IN) :: access_prp  
                                                  ! File access property list 
                                                  ! identifier  
         END SUBROUTINE h5fopen_f 
</pre>



</dl>

<p>&nbsp;
<p>&nbsp;
<hr>



<address>
<a href="mailto:hdfhelp@ncsa.uiuc.edu">HDF Help Desk</a> 
</address>

Last modified:  20 October 1999
<br>
Describes HDF5 Release 1.2.2, July 2000

</body>
</html>