program multiline_lexical_token
implicit none
inte&
    &ger &
    :: i
RE&
&AL(int(sin(0.5))&
 &+8+len("ab)&
    &)c")-3) :: Z
end program
