fix create_struct_global. it solves segfault "mpirun -np 3 10(=dim)