7 Nov 2023 7:24
#30709
The following program should allocate the logical array and assign all values to .false., but in FTN95 the array is not allocated.
Program p
Logical, Dimension(:), Allocatable :: l
Allocate ( l(2), Source=.false. )
Print *, l
End Program p