program complicated_kind_spec
real(int(sin(0.5))+8+len("ab((c")-3) :: y
real(int(sin(0.5))+8+len("ab))c")-3) :: z
end program
