program mykinds

!-- the value of the kind parameters can also differ from one compiler to another
!-- on the same processor!

!-- note that the value of the kind parameter has nothing to do with the number of 
!-- decimal digits of precision or range.

  write(*,*) "kind(0) =",kind(0)
  write(*,*) "kind(0.0) =",kind(0.0)
  write(*,*) "kind(.false.) =",kind(.false.)
  write(*,*) "kind('a') =",kind("a")

end program mykinds