Remove `kind_from_type' since an intrinsic function `kind' is enough