set reorder = .TRUE. Working MPI tested.