<Example Program>
Program trailz_example
Integer :: a(3) = [ 32768,120,32767 ]
Print *,
Trailz(a)
End Program
Execution Results
15 3 0
Execution Results Execution Results