fix(tests/lean/run): adjust test to changes in the library
Signed-off-by: Leonardo de Moura <leonardo@microsoft.com>
This commit is contained in:
parent
5b7fb1f61a
commit
094459504b
9 changed files with 11 additions and 11 deletions
|
@ -1,5 +1,5 @@
|
|||
import standard
|
||||
using num pair
|
||||
using num prod
|
||||
|
||||
definition H : inhabited (Prop × num × (num → num)) := _
|
||||
|
||||
|
|
|
@ -1,5 +1,5 @@
|
|||
import standard
|
||||
using num pair
|
||||
using num prod
|
||||
|
||||
theorem H {A B : Type} (H1 : inhabited A) : inhabited (Prop × A × (B → num))
|
||||
:= _
|
||||
|
|
|
@ -1,5 +1,5 @@
|
|||
import standard
|
||||
using num pair
|
||||
using num prod
|
||||
|
||||
section
|
||||
parameter {A : Type}
|
||||
|
|
|
@ -1,5 +1,5 @@
|
|||
import standard
|
||||
using pair
|
||||
using prod
|
||||
|
||||
inductive t1 : Type :=
|
||||
| mk1 : t1
|
||||
|
|
|
@ -1,5 +1,5 @@
|
|||
import standard
|
||||
using num tactic pair
|
||||
using num tactic prod
|
||||
|
||||
inductive inh (A : Type) : Prop :=
|
||||
| inh_intro : A -> inh A
|
||||
|
@ -18,8 +18,8 @@ theorem inh_bool [instance] : inh Prop
|
|||
theorem inh_fun [instance] {A B : Type} (H : inh B) : inh (A → B)
|
||||
:= inh_rec (λb, inh_intro (λa : A, b)) H
|
||||
|
||||
theorem pair_inh [instance] {A : Type} {B : Type} (H1 : inh A) (H2 : inh B) : inh (pair A B)
|
||||
:= inh_elim H1 (λa, inh_elim H2 (λb, inh_intro (mk_pair a b)))
|
||||
theorem pair_inh [instance] {A : Type} {B : Type} (H1 : inh A) (H2 : inh B) : inh (prod A B)
|
||||
:= inh_elim H1 (λa, inh_elim H2 (λb, inh_intro (pair a b)))
|
||||
|
||||
definition assump := eassumption
|
||||
tactic_hint assump
|
||||
|
|
|
@ -3,7 +3,7 @@
|
|||
--- Released under Apache 2.0 license as described in the file LICENSE.
|
||||
--- Author: Jeremy Avigad
|
||||
----------------------------------------------------------------------------------------------------
|
||||
import logic.connectives.basic logic.connectives.function
|
||||
import logic.connectives.basic struc.function
|
||||
using function
|
||||
|
||||
namespace congr
|
||||
|
|
|
@ -4,7 +4,7 @@
|
|||
--- Author: Jeremy Avigad
|
||||
----------------------------------------------------------------------------------------------------
|
||||
|
||||
import standard
|
||||
import standard struc.function
|
||||
|
||||
using function
|
||||
|
||||
|
|
|
@ -1,4 +1,4 @@
|
|||
import standard
|
||||
import standard struc.function
|
||||
using function num bool
|
||||
|
||||
|
||||
|
|
|
@ -1,5 +1,5 @@
|
|||
import standard
|
||||
using pair
|
||||
using prod
|
||||
|
||||
-- Test tuple notation
|
||||
check (3, false, 1, true)
|
||||
|
|
Loading…
Reference in a new issue