Tail
Returns all elements from second element.
a = Tail(b)
program main
use easifemBase
implicit none
real(dfp) :: a(10)
call random_number(a)
call ok( all( a(2:) .approxeq. tail(a) ), "Tail:" )
end program main
Returns all elements from second element.
a = Tail(b)
program main
use easifemBase
implicit none
real(dfp) :: a(10)
call random_number(a)
call ok( all( a(2:) .approxeq. tail(a) ), "Tail:" )
end program main