How do I access last item in an array in Fortran?
arrays, fortran, indexing
Solution
array ( ubound (array) )
`size` will only work if the array is 1-indexed.
Problem
In Matlab, `end` index lets me access a last item. ``` > array = [1 2 3 4 5 6 7]; > array(end) ans = 7 ``` How do I do the same in Fortran? ``` program hello integer array(7) array = (/1, 2, 3, 4, 5, 6, 7/) !print *, array(end) ! 1 !Error: Legacy Extension: REAL array index at (1) ! print *, array(-1) ! 1 !Warning: Array reference at (1) is out of bounds (-1 < 1) in dimension 1 ! print *, array(0) ! 1 !Warning: Array reference at (1) is out of bounds (0 < 1) in dimension 1 end program Hello ```