fortran66のブログ

fortran について書きます。

allocatebleな文字型変数の文字列長のallocateについて

F2003からできるようになりました。

出力結果

ソースプログラム

program test_challoc
  implicit none
  character(len=:), allocatable :: d(:)

  allocate(character(len = 10)::d(5))
  print *, len(d), size(d)
  
  stop
end program test_challoc