-include "re.ma".
-include "basics/listb.ma".
+(*
+\ 5h1\ 6Moves\ 5/h1\ 6*)
+
+include "chapter8.ma".
let rec move (S: DeqSet) (x:S) (E: pitem S) on E : pre S ≝
match E with
|#Hfalse >moves_cons >not_occur_to_pit // >Hfalse /2/
]
]
-qed.
-
+qed.
\ No newline at end of file