Darcs.Commands.Optimize