For objects of an intrinsic type, the KIND intrinsic
procedure returns the kind type parameter of its argument.
You can use the LEN intrinsic
procedure to determine the length type parameter of a character object.
The SIZEOF intrinsic
function returns the size of a data object in bytes. 