Last

Returns the last element of a vector.

Calling example:

a = last([1,2,3])
b = last([1.,2.,3.])
c = last("hello world")

program main
use easifemBase
implicit none
call ok( last([1,2,3]) .eq. 3, "last" )
call ok( last([1.,2.,3.]) .approxeq. 3., "last" )
call ok( last("hello world!") .eq. "!", "last" )
end program main