<Example Program>
Program not_example
Integer,Parameter :: i8 = Selected_Int_Kind(2)
Integer(i8) :: a(3) = [ Int(z'f1',i8),Int(z'7a',i8),Int(z'0f',i8) ]
Print 1,
Not(a)
1 Format(3(1X,Z2.2))
End Program
Execution Results
0E 85 F0