codekingpro/portable-devtools
114k
1module foo
2 type bar
3 character(len = 4) :: text
4 end type bar
5 type(bar), parameter :: abar = bar('abar')
6end module foo
7 1module foo
2 type bar
3 character(len = 4) :: text
4 end type bar
5 type(bar), parameter :: abar = bar('abar')
6end module foo
7