aboutsummaryrefslogtreecommitdiffhomepage
path: root/contrib/omega/OmegaSyntax.v
diff options
context:
space:
mode:
authorGravatar herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7>2002-05-29 10:59:23 +0000
committerGravatar herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7>2002-05-29 10:59:23 +0000
commit668b15bbc2b27306a2ad4afa7cc58540c214c4be (patch)
treea9c36de4cb6eeb74ca215f2626fd13a094a625a5 /contrib/omega/OmegaSyntax.v
parent6a2eeb9e43b18c780168b80b2950da3e5850e942 (diff)
Fichiers contrib/*/*.ml4 remplacent les contrib/*/*.v
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@2725 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'contrib/omega/OmegaSyntax.v')
-rw-r--r--contrib/omega/OmegaSyntax.v35
1 files changed, 0 insertions, 35 deletions
diff --git a/contrib/omega/OmegaSyntax.v b/contrib/omega/OmegaSyntax.v
deleted file mode 100644
index a7f67f181..000000000
--- a/contrib/omega/OmegaSyntax.v
+++ /dev/null
@@ -1,35 +0,0 @@
-(***********************************************************************)
-(* v * The Coq Proof Assistant / The Coq Development Team *)
-(* <O___,, * INRIA-Rocquencourt & LRI-CNRS-Orsay *)
-(* \VV/ *************************************************************)
-(* // * This file is distributed under the terms of the *)
-(* * GNU Lesser General Public License Version 2.1 *)
-(***********************************************************************)
-(**************************************************************************)
-(* *)
-(* Omega: a solver of quantifier-free problems in Presburger Arithmetic *)
-(* *)
-(* Pierre Crégut (CNET, Lannion, France) *)
-(* *)
-(**************************************************************************)
-
-(* $Id$ *)
-
-Grammar vernac vernac : ast :=
- omega_sett [ "Set" "Omega" "Time" "." ] -> [(OmegaFlag "+time")]
-| omega_sets [ "Set" "Omega" "System" "." ] -> [(OmegaFlag "+system")]
-| omega_seta [ "Set" "Omega" "Action" "." ] -> [(OmegaFlag "+action")]
-| omega_unst [ "Unset" "Omega" "Time" "." ] -> [(OmegaFlag "-time")]
-| omega_unss [ "Unset" "Omega" "System" "." ] -> [(OmegaFlag "-system")]
-| omega_unsa [ "Unset" "Omega" "Action" "." ] -> [(OmegaFlag "-action")]
-| omega_swit [ "Switch" "Omega" "Time" "." ] -> [(OmegaFlag "time")]
-| omega_swis [ "Switch" "Omega" "System" "." ] -> [(OmegaFlag "system")]
-| omega_swia [ "Switch" "Omega" "Action" "." ] -> [(OmegaFlag "action")]
-| omega_set [ "Set" "Omega" stringarg($id) "." ] -> [(OmegaFlag $id)].
-
-
-Grammar tactic simple_tactic : ast :=
- omega [ "Omega" ] -> [(Omega)].
-
-Syntax tactic level 0:
- omega [ << (Omega) >> ] -> ["Omega"].