Hi,

I have a strange problem. When I compile this code:

module user
implicit none

type user_type
    real :: value
    integer, dimension(30,30) :: array
end type

end module

program test_mpi
use user
implicit none

integer, parameter :: num = 1e5
type(user_type), dimension(num)    :: var

var(1)%value = 19.

write(*,*) var(1)%value

            end program

with gfortran and run it there is no problem.
Now If I compile this program with

mpifort -fcoarray=lib -fopenmp testmod.f95 -lcaf_mpi

and run it with

   mpirun -np 1 ./a.out

I got an error Segmentation fault (signal 11)

Now if if compile it with

   mpifort -fcoarray=lib testmod.f95 -lcaf_mpi

everything is fine.
Why is it a problem to add the option -fopenmp with this code?
Doing some web searches suggests that using big static array
will not work .

Thanks
Jan