(***********************)
(* Diophantus' problem *)
(***********************)

Lemma diophantus20 :
~ (exists x : Z, exists y : Z, exists z : Z, exists t : Z,
0 < x /\ 0 < y /\ 0 < z /\ 0 < t /\ x * x + y * y = z * z /\
x * y = 2 * (t * t)).