oups...
This commit is contained in:
parent
9dab731285
commit
7a534be476
@ -22,7 +22,7 @@ subroutine list_points3d(array, start, length)
|
|||||||
endif
|
endif
|
||||||
|
|
||||||
! send oi to stdout.
|
! 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
|
print *, array(i)%x, array(i)%y, array(i)%z, array(i)%seq
|
||||||
enddo
|
enddo
|
||||||
|
|
||||||
|
Loading…
Reference in New Issue
Block a user