diff --git a/wp.v b/wp.v
new file mode 100644
index 0000000..e3cfc04
--- /dev/null
+++ b/wp.v
@@ -0,0 +1,18 @@
+(* Projet Coq - WP - MPRI 2.7.1 *)
+
+(***** Partie 1 : definition de While ****************************************)
+
+Require Import ZArith.BinInt.
+Import Z.
+
+Parameter Var: Type.
+Definition Mem := Var -> Z.
+Definition Expr:= Mem -> Z.
+
+Inductive Instr : Type :=
+| skip: Instr
+| abort: Instr
+| assign: Var -> Expr -> Instr
+| seq: Instr -> Instr -> Instr
+| ifelse: Expr -> Instr -> Instr -> Instr
+| while: Expr -> Instr -> Instr.