global_write_true_3D_logic_array.F90 12.1 KB