Не уверен, что делаю неправильно, но я думал, что reflexivity
должен работать ниже, но это не так.
a, b : nat
H : (1 <=? a - b - 3) = true
______________________________________(1/7)
is_true (0 < a - b - 3)
Я также пробовал apply leb_complete in H.
, в результате чего:
a, b : nat
H : (1 <= a - b - 3)%coq_nat
______________________________________(1/7)
is_true (0 < a - b - 3)
но в обоих случаях Coq выдает ошибку Unable to unify "true" with "is_true (0 < a - b - 3)"
Это не должно быть так сложно, правда? Я что-то упустил?
From mathcomp Require Import all_ssreflect. Require Import String Arith Strings.Byte Init.Byte Init.Nat Coq.Lists.List Coq.Program.Wf.
- person Dan Johnson   schedule 02.10.2020