EightByteIntTest.f90
Go to the documentation of this file.
program eightbytinttest
use typesizes
implicit none
integer (kind = EightByteInt) :: Eight
integer :: defaultInt
print *, "Bit size of default int is", bit_size(defaultint)
print *, "Kind parameter for EightByteInt is", eightbyteint
print *, "Bit size of eight byte int is", bit_size(eight)
end program eightbytinttest
typesizes::eightbyteint
integer, parameter eightbyteint
Definition: typeSizes.f90:33
typesizes
Definition: typeSizes.f90:30
eightbytinttest
program eightbytinttest
Definition: EightByteIntTest-2.f90:1

Return to the Main Unidata NetCDF page.