diff options
author | herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2002-05-29 10:59:23 +0000 |
---|---|---|
committer | herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2002-05-29 10:59:23 +0000 |
commit | 668b15bbc2b27306a2ad4afa7cc58540c214c4be (patch) | |
tree | a9c36de4cb6eeb74ca215f2626fd13a094a625a5 /contrib/omega/OmegaSyntax.v | |
parent | 6a2eeb9e43b18c780168b80b2950da3e5850e942 (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.v | 35 |
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"]. |