Skip to content

Commit 31c2ccd

Browse files
committed
test:array:write more example
1 parent bcd8621 commit 31c2ccd

File tree

1 file changed

+3
-0
lines changed

1 file changed

+3
-0
lines changed

test/test_array.f90

Lines changed: 3 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -52,6 +52,9 @@ subroutine test_basic_array(filename)
5252
call h%open(filename, action='w', comp_lvl=1)
5353

5454
call h%write('/int32-1d', i1)
55+
call h % write('/i32-1d', [1,2,3], istart=[1], iend=[3])
56+
call h % write('/i32-1d', [4], istart=[2], iend=[2])
57+
5558
call h%write('/test/group2/int32-2d', i2)
5659
call h%write('/real32-2d', r2)
5760
!> write from subarray

0 commit comments

Comments
 (0)