Integer Data Type by Kind

• selecting kind, by an explicit integer is still not portable,
• must use the SELECTED_INT_KIND intrinsic function. For example, SELECTED_INT_KIND(2) returns a kind number capable of expressing numbers in the range, .
• here the argument specifies the minimum decimal exponent range for the desired model. For example,

   INTEGER :: short, medium, long, vlong
   PARAMETER (short = SELECTED_INT_KIND(2), &
              medium= SELECTED_INT_KIND(4), &
              long  = SELECTED_INT_KIND(10),&
              vlong = SELECTED_INT_KIND(100))
   INTEGER(short)    :: a,b,c
   INTEGER(medium)   :: d,e,f
   INTEGER(long)     :: g,h,i

For more information, click here