summaryrefslogtreecommitdiffstats
path: root/fortran/src/H5fortran_types.f90.in
diff options
context:
space:
mode:
authorBill Wendling <wendling@ncsa.uiuc.edu>2000-09-19 20:06:49 (GMT)
committerBill Wendling <wendling@ncsa.uiuc.edu>2000-09-19 20:06:49 (GMT)
commit8055378bcecfc77af85b2bb07e7904edc9492789 (patch)
tree01c100c34cd727b9dc15ae21c89b6e0dfa361303 /fortran/src/H5fortran_types.f90.in
parent8272da0b67a9ef3a7299fd10cc5f3ccbf80cbeae (diff)
downloadhdf5-8055378bcecfc77af85b2bb07e7904edc9492789.zip
hdf5-8055378bcecfc77af85b2bb07e7904edc9492789.tar.gz
hdf5-8055378bcecfc77af85b2bb07e7904edc9492789.tar.bz2
[svn-r2576] Purpose:
Adding the Fortran interface to the HDF5 library Description: Fortran is now a subdirectory of the HDF5 library tree. Platforms tested: Solaris and IRIX (O2K)
Diffstat (limited to 'fortran/src/H5fortran_types.f90.in')
-rw-r--r--fortran/src/H5fortran_types.f90.in29
1 files changed, 29 insertions, 0 deletions
diff --git a/fortran/src/H5fortran_types.f90.in b/fortran/src/H5fortran_types.f90.in
new file mode 100644
index 0000000..9010d7f
--- /dev/null
+++ b/fortran/src/H5fortran_types.f90.in
@@ -0,0 +1,29 @@
+!
+! This file contains HDF5 Fortran90 type definitions
+!
+ MODULE H5FORTRAN_TYPES
+ !
+ ! HDF5 integers
+ !
+ ! Each of the arguments of SELECTED_INT_KIND function should be
+ ! determined by configure.
+ ! R_LARGE is the number of digits for the biggest integer supported.
+ ! R_INTEGER is the number of digits in INTEGER
+ ! For example:
+ ! On 64 bit machine ( DEC ALPHA) R_LARGE = 18 and R_INTEGER = 9
+ ! On 32 bit machines ( Sparc Solaris ) R_LARGE = 9 and R_INTEGER = 9
+ !
+ INTEGER, PARAMETER :: R_LARGE = @R_LARGE@
+ INTEGER, PARAMETER :: R_INTEGER = @R_INTEGER@
+ INTEGER, PARAMETER :: HSIZE_T = @HSIZE_T@
+ INTEGER, PARAMETER :: HSSIZE_T = @HSSIZE_T@
+ INTEGER, PARAMETER :: HID_T = @HID_T@
+ INTEGER, PARAMETER :: SIZE_T = @SIZE_T@
+
+ !
+ ! Some HDF5 FORTARN90 default values ( here for now 8/5/99 EIP )
+ !
+
+ INTEGER(SIZE_T), PARAMETER :: OBJECT_NAMELEN_DEFAULT_F = @OBJECT_NAMELEN_DEFAULT_F@
+
+ END MODULE H5FORTRAN_TYPES