let mv src dest = Cmd (S [A"mv"; P src; Px dest])