global_write_3D_logical_array.F90 11.5 KB