diff options
author | 2002-08-13 14:44:24 +0000 | |
---|---|---|
committer | 2002-08-13 14:44:24 +0000 | |
commit | a3848b0a10064fb7e206a503ac8b829cb9ce4666 (patch) | |
tree | 57715eb46564f71b91825c46ecb432a41c1ec095 /test-suite/modules/sub_objects.v | |
parent | bc4e7b8c2317b2536eb42efb7cbf37d748ceb7c6 (diff) |
Petites corrections ici et la
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@2961 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'test-suite/modules/sub_objects.v')
-rw-r--r-- | test-suite/modules/sub_objects.v | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/test-suite/modules/sub_objects.v b/test-suite/modules/sub_objects.v index f800dec52..73fd6f322 100644 --- a/test-suite/modules/sub_objects.v +++ b/test-suite/modules/sub_objects.v @@ -3,33 +3,33 @@ Reset Initial. Set Implicit Arguments. -Mod M. +Module M. Definition id:=[A:Set][x:A]x. - Modtype SIG. + Module Type SIG. Parameter idid:(A:Set)A->A. - EndT SIG. + End SIG. - Mod N. + Module N. Definition idid:=[A:Set][x:A](id x). Grammar constr constr8 := not_eq [ "#" constr7($b) ] -> [ (idid $b) ]. Syntactic Definition inc := (plus (S O)). - EndM N. + End N. Definition zero:=(N.idid O). -EndM M. +End M. Definition zero := (M.N.idid O). Definition jeden := (M.N.inc O). -Mod Goly:=M.N. +Module Goly:=M.N. Definition Gole_zero := (Goly.idid O). Definition Goly_jeden := (Goly.inc O). -Mod Ubrany : M.SIG := M.N. +Module Ubrany : M.SIG := M.N. Definition Ubrane_zero := (Ubrany.idid O). |