Coarsening loop working but not well enough