blob: 15b53de00d2bd3faa1aa47f2335497a949a33d2a (
plain)
1
2
3
4
5
6
7
8
9
|
Require Import Int63 ZArith.
Open Scope int63_scope.
Goal False.
cut (let (q, r) := (0, 0) in ([|q|], [|r|]) = (9223372036854775808%Z, 0%Z));
[discriminate| ].
Fail (change (0, 0) with (diveucl_21 1 0 1); apply diveucl_21_spec).
Abort.
|
