chore(frontends/lean,tests): fix tests and style
This commit is contained in:
parent
53236718a8
commit
a5fb28ca78
4 changed files with 5 additions and 5 deletions
|
@ -1542,7 +1542,7 @@ expr parser::id_to_expr(name const & id, pos_info const & p) {
|
|||
new_as.push_back(*r);
|
||||
bool has_constructor = false;
|
||||
for (auto const & e : as) {
|
||||
has_constructor |= (bool)inductive::is_intro_rule(m_env, e);
|
||||
has_constructor |= static_cast<bool>(inductive::is_intro_rule(m_env, e));
|
||||
new_as.push_back(copy_with_new_pos(mk_constant(e, ls), p));
|
||||
}
|
||||
if (m_undef_id_behavior == undef_id_behavior::AssumeLocalAndAlsoDefinedNonConstructors &&
|
||||
|
|
|
@ -1,4 +1,4 @@
|
|||
definition pnat.pnat : Type₁ :=
|
||||
definition pnat : Type₁ :=
|
||||
{n | n > 0}
|
||||
inductive prod : Type → Type → Type
|
||||
constructors:
|
||||
|
|
|
@ -1,5 +1,5 @@
|
|||
definition symm {A : Type} : Π {a b : A}, a = b → b = a
|
||||
| a a rfl := rfl
|
||||
| a a (eq.refl a) := rfl
|
||||
|
||||
definition trans {A : Type} : Π {a b c : A}, a = b → b = c → a = c
|
||||
| a a a rfl rfl := rfl
|
||||
| a a a (eq.refl a) (eq.refl a) := rfl
|
||||
|
|
|
@ -16,4 +16,4 @@ end
|
|||
open nat
|
||||
|
||||
example : ∀ (a b : nat), a = b → b = a
|
||||
| a a rfl := rfl
|
||||
| a a (eq.refl a) := rfl
|
||||
|
|
Loading…
Reference in a new issue