real(c_float) :: r
real(c_float) :: r
character(kind=c_char) :: c
character(len=*) :: c
character(len=*) :: c
character(len=*, kind=c_char) :: c
character(len=*, kind=c_char) :: c
character(len=*, kind=c_char) :: c
character(len=:) :: c
character(len=:) :: c
character(len=:, kind=c_char) :: c
character(len=:, kind=c_char) :: c
character(len=:, kind=c_char) :: c
character(len=n) :: c
character(len=n) :: c
character(len=n, kind=c_char) :: c
character(len=n, kind=c_char) :: c
character(len=n, kind=c_char) :: c
