KIND (The GNU Fortran Compiler) (original) (raw)

program test_kind integer,parameter :: kc = kind(' ') integer,parameter :: kl = kind(.true.)

print *, "The default character kind is ", kc print *, "The default logical kind is ", kl end program test_kind