(** Some properties of [move_no_temp]. *)

(* Specifications: *)
Lemma move_no_temp_append:
forall m1 m2,
move_no_temp m1 -> move_no_temp m2 -> move_no_temp (m1 ++ m2).
Lemma move_no_temp_rev:
forall m, move_no_temp (List.rev m) -> move_no_temp m.
Lemma move_no_temp_append:
forall m1 m2,
move_no_temp m1 -> move_no_temp m2 -> move_no_temp (m1 ++ m2).
Lemma move_no_temp_rev:
forall m, move_no_temp (List.rev m) -> move_no_temp m.