diff options
| author |  herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2004-12-09 13:46:39 +0000 |
|---|---|---|
| committer | herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2004-12-09 13:46:39 +0000 |
| commit | 47ed51985ad5ab4bb77092beebdc5fe30d3d453b (patch) | |
| tree | e2d3b66066519bdeff9fbc265c502f4458ffc9a1 /test-suite/output/Cases.out | |
| parent | 380315878ad71c77592d9bbee5efdb365b46bff3 (diff) | |
MAJ avec les particularités de l'afficheur v7 de la V8
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@6450 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'test-suite/output/Cases.out')
| -rw-r--r-- | test-suite/output/Cases.out | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/test-suite/output/Cases.out b/test-suite/output/Cases.out index 5f13caafc..a35885651 100644 --- a/test-suite/output/Cases.out +++ b/test-suite/output/Cases.out @@ -1,4 +1,6 @@ t_rect = -[P:(t->Type); f:([x:=t](x0:x)(P x0)->(P (k x0)))] - Fix F{F [t:t] : (P t) := <P>Cases t of (k x x0) => (f x0 (F x0)) end} - : (P:(t->Type))([x:=t](x0:x)(P x0)->(P (k x0)))->(t:t)(P t) +[P:(t ->Type); f:([x:=t](x0:x)(P x0) ->(P (k x0)))] + Fix F + {F [t:t] : (P t) := <[t0:t](P t0)>Cases t of (k x x0) => (f x0 (F x0)) end} + : (P:(t ->Type))([x:=t](x0:x)(P x0) ->(P (k x0))) ->(t:t)(P t) + |