fortran66のブログ

fortran について書きます。

gfortran-8 apt install 可

gfortran-8 parameterized derived type など

戯れに bash on windows のコンソールで sudo apt install gfortran-8 をやってみたところ、インストールしてくれました。gfortran-9 はまだ not found のようです。

gfortran-8 で parameterized derived type が可能になったとのことで、テストしてみました。

なお coarray はデフォルト状態では single image のままのようです。forall(integer:: i=...) もまだのようです。

ソース・プログラム

program Console6
  implicit none
  type :: t_test(kind, leng)
    integer, kind :: kind = 8
    integer, len  :: leng =10
    real(kind) :: x(leng)
  end type t_test
  type(t_test) :: a
  type(t_test(4)) :: b
  type(t_test(leng=5)) :: c
  print *, a%kind, a%leng
  print *, b%kind, b%leng
  print *, c%kind, c%leng
  c%x =  1.0
  print *, 'c='
  print *, c
end program Console6

実行結果

O@HP8:~$ gfortran-8 param.f90
O@HP8:~$ ./a.out
           8          10
           4          10
           8           5
 c=
           8           5   1.0000000000000000        1.0000000000000000        1.0000000000000000        1.0000000000000000        1.0000000000000000

f:id:fortran66:20180612004215p:plain