5 integer (kind = EightByteInt) :: Eight
8 print *,
"Bit size of default int is", bit_size(defaultint)
9 print *,
"Kind parameter for EightByteInt is",
eightbyteint 10 print *,
"Bit size of eight byte int is", bit_size(eight)
integer, parameter eightbyteint