Fortran2003 での可変長文字列

ソース・プログラム

    program text0
      implicit none
      character(:), allocatable :: text
      text = 'FORTRAN77'
      print *, len(text)
      text = '12345678901234567890'
      print *, len(text)
      stop
    end program text0

実行結果

 9
 20
続行するには何かキーを押してください . . .