]> matita.cs.unibo.it Git - helm.git/blobdiff - helm/gTopLevel/tests/match07.cic.test
ocaml 3.09 transition
[helm.git] / helm / gTopLevel / tests / match07.cic.test
index ec1ad7156708bebcfa6aad5c98659f50a9048f01..690ccd28ab82fa1aac5bc2dffb09471473941669 100644 (file)
@@ -2,6 +2,13 @@
 match true with
 [ true \Rightarrow O
 | false \Rightarrow (S O) ]
+###### INTERPRETATION NUMBER 1 ######
+### (* disambiguation environment  *)
+alias id O = cic:/Coq/Init/Datatypes/nat.ind#xpointer(1/1/1)
+alias id S = cic:/Coq/Init/Datatypes/nat.ind#xpointer(1/1/2)
+alias id bool = cic:/Coq/Init/Datatypes/bool.ind#xpointer(1/1)
+alias id nat = cic:/Coq/Init/Datatypes/nat.ind#xpointer(1/1)
+alias id true = cic:/Coq/Init/Datatypes/bool.ind#xpointer(1/1/1)
 ### (* METASENV after disambiguation  *)
 
 ### (* TERM after disambiguation      *)