diff options
author | Dana Robinson <43805+derobins@users.noreply.github.com> | 2022-04-07 13:16:24 (GMT) |
---|---|---|
committer | GitHub <noreply@github.com> | 2022-04-07 13:16:24 (GMT) |
commit | 541bc15452f71f3eae7471fdecbe7994a7f138e2 (patch) | |
tree | 71f58ed5741addba26a8f3d783781e8b14cf7ce2 /fortran/examples/h5_crtatt.f90 | |
parent | 8da35c7bdf5059f3c8a2b0a64d5a0d815a7d7d46 (diff) | |
download | hdf5-541bc15452f71f3eae7471fdecbe7994a7f138e2.zip hdf5-541bc15452f71f3eae7471fdecbe7994a7f138e2.tar.gz hdf5-541bc15452f71f3eae7471fdecbe7994a7f138e2.tar.bz2 |
Normalize Fortran code with develop (#1600)
Diffstat (limited to 'fortran/examples/h5_crtatt.f90')
-rw-r--r-- | fortran/examples/h5_crtatt.f90 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/fortran/examples/h5_crtatt.f90 b/fortran/examples/h5_crtatt.f90 index 996a506..64d2bde 100644 --- a/fortran/examples/h5_crtatt.f90 +++ b/fortran/examples/h5_crtatt.f90 @@ -35,7 +35,7 @@ PROGRAM H5_CRTATT INTEGER(HID_T) :: aspace_id ! Attribute Dataspace identifier INTEGER(HID_T) :: atype_id ! Attribute Dataspace identifier INTEGER(HSIZE_T), DIMENSION(1) :: adims = (/2/) ! Attribute dimension - INTEGER :: arank = 1 ! Attribure rank + INTEGER :: arank = 1 ! Attribute rank INTEGER(SIZE_T) :: attrlen ! Length of the attribute string CHARACTER(LEN=80), DIMENSION(2) :: attr_data ! Attribute data |