This commit is contained in:
tth 2022-03-19 02:45:54 +01:00
parent 9dab731285
commit 7a534be476

View File

@ -22,7 +22,7 @@ subroutine list_points3d(array, start, length)
endif
! send oi to stdout.
do i = start, start+length
do i = start, start+length-1
print *, array(i)%x, array(i)%y, array(i)%z, array(i)%seq
enddo