NetCDF-Fortran  4.4.4
 All Classes Files Functions Variables Typedefs Macros Pages
EightByteIntTest.f90
Go to the documentation of this file.
2  use typesizes
3  implicit none
4 
5  integer (kind = EightByteInt) :: eight
6  integer :: defaultint
7 
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)
11 end program eightbytinttest
program eightbytinttest

Return to the Main Unidata NetCDF page.
Generated on Mon Dec 19 2016 16:43:42 for NetCDF-Fortran. NetCDF is a Unidata library.