let
rm_f x =
Cmd
(
S
[
A
"rm"
;
A
"-f"
;
Px
x])