<Example Program>
Program poppar_example
Integer :: a(3) = [ Int(z'ff'),Int(z'e3'),Int(z'02') ]
Print *,
Poppar(a)
End Program
Execution Results
0 1 1