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 /hl/fortran/test | |
parent | 8da35c7bdf5059f3c8a2b0a64d5a0d815a7d7d46 (diff) | |
download | hdf5-541bc15452f71f3eae7471fdecbe7994a7f138e2.zip hdf5-541bc15452f71f3eae7471fdecbe7994a7f138e2.tar.gz hdf5-541bc15452f71f3eae7471fdecbe7994a7f138e2.tar.bz2 |
Normalize Fortran code with develop (#1600)
Diffstat (limited to 'hl/fortran/test')
-rw-r--r-- | hl/fortran/test/tsttable.F90 | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/hl/fortran/test/tsttable.F90 b/hl/fortran/test/tsttable.F90 index a77068c..e7bd88e 100644 --- a/hl/fortran/test/tsttable.F90 +++ b/hl/fortran/test/tsttable.F90 @@ -172,11 +172,11 @@ SUBROUTINE test_table1() ! offset = 0 field_offset(1) = offset - offset = offset + type_sizec ! Offset of the second memeber is 2 + offset = offset + type_sizec ! Offset of the second member is 2 field_offset(2) = offset - offset = offset + type_sizei ! Offset of the second memeber is 6 + offset = offset + type_sizei ! Offset of the second member is 6 field_offset(3) = offset - offset = offset + type_sized ! Offset of the second memeber is 14 + offset = offset + type_sized ! Offset of the second member is 14 field_offset(4) = offset !------------------------------------------------------------------------- @@ -571,7 +571,7 @@ SUBROUTINE test_table2() INTEGER(HSIZE_T), PARAMETER :: nrecords = 8 ! nrecords CHARACTER(len=8), PARAMETER :: filename = "f2tab.h5" ! File name - CHARACTER(LEN=5), PARAMETER :: table_name = "tabel" ! table name + CHARACTER(LEN=5), PARAMETER :: table_name = "table" ! table name CHARACTER(LEN=10), PARAMETER :: table_name_fill = "tabel_fill" ! table name ! Define field information |