NetCDF-Fortran  4.4.4
EightByteIntTest-2.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 *, "Kind parameter for EightByteInt is", eightbyteint
9  print *, "Bit size of eight byte int is", bit_size(eight)
10 contains
11  subroutine eightbyteintprocedure(input)
12  integer (kind = EightByteInt), intent( in) :: input
13 
14  print *, int(input)
15  end subroutine eightbyteintprocedure
16 end program eightbytinttest
integer, parameter eightbyteint
Definition: typeSizes.f90:33
subroutine eightbyteintprocedure(input)
program eightbytinttest

Return to the Main Unidata NetCDF page.
Generated on Thu Nov 9 2017 06:56:52 for NetCDF-Fortran. NetCDF is a Unidata library.