guneysus
4/16/2013 - 9:27 AM

Output

character(len=:), allocatable :: x
x = "Ondřej Čertík"
print *, x
end