From 3fc487a21483c1cccbe03b9b9712793a2684330b Mon Sep 17 00:00:00 2001 From: pboutill Date: Mon, 21 Jan 2013 10:56:36 +0000 Subject: Last test-suite not in Symmetric Patterns syntax git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@16132 85f007b7-540e-0410-9357-904b9bb8a0f7 --- test-suite/complexity/injection.v | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'test-suite/complexity') diff --git a/test-suite/complexity/injection.v b/test-suite/complexity/injection.v index 335996c27..08f489d75 100644 --- a/test-suite/complexity/injection.v +++ b/test-suite/complexity/injection.v @@ -72,14 +72,14 @@ Definition own_join (a b c: own) : Prop := match a , b , c with | NO , _ , _ => b=c | _ , NO , _ => a=c - | VAL' sa _ , VAL' sb _, VAL' sc _ => Share.j.(join) sa sb sc - | LK sa pa ha fa, LK sb pb hb fb, LK sc pc hc fc => + | @VAL' sa _, @VAL' sb _, @VAL' sc _ => Share.j.(join) sa sb sc + | @LK sa pa ha fa, @LK sb pb hb fb, @LK sc pc hc fc => Share.j.(join) sa sb sc /\ Share.j.(join) ha hb hc /\ fa=fc /\ fb=fc - | CT sa pa , CT sb pb, CT sc pc => Share.j.(join) sa sb sc - | FUN sa pa fa, FUN sb pb fb, FUN sc pc fc => + | @CT sa pa , @CT sb pb, @CT sc pc => Share.j.(join) sa sb sc + | @FUN sa pa fa, @FUN sb pb fb, @FUN sc pc fc => Share.j.(join) sa sb sc /\ fa=fc /\ fb=fc | _ , _ , _ => False end. -- cgit v1.2.3