← Back to branch summary

~ubuntu-branches/ubuntu/wily/coq-doc/wily

« back to all changes in this revision

Viewing changes to theories/Program/Utils.v

  • Committer: Package Import Robot
  • Author(s): Stéphane Glondu
  • Date: 2012-01-03 23:42:48 UTC
  • mfrom: (1.2.4)
  • Revision ID: package-import@ubuntu.com-20120103234248-p9r8h1579n67v55a
Tags: 8.3pl3-1
New upstream release

Show diffs side-by-side

added added

removed removed

Lines of Context:
theories/Program/Utils.v
1
1
(************************************************************************)
2
2
(*  v      *   The Coq Proof Assistant  /  The Coq Development Team     *)
3
 
(* <O___,, *   INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2010     *)
 
3
(* <O___,, *   INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2011     *)
4
4
(*   \VV/  **************************************************************)
5
5
(*    //   *      This file is distributed under the terms of the       *)
6
6
(*         *       GNU Lesser General Public License Version 2.1        *)
7
7
(************************************************************************)
8
8
 
9
 
(*i $Id: Utils.v 13323 2010-07-24 15:57:30Z herbelin $ i*)
 
9
(*i $Id: Utils.v 14641 2011-11-06 11:59:10Z herbelin $ i*)
10
10
 
11
11
(** Various syntaxic shortands that are useful with [Program]. *)
12
12
 
28
28
 
29
29
(** Abbreviation for first projection and hiding of proofs of subset objects. *)
30
30
 
31
 
Notation " ` t " := (proj1_sig t) (at level 10, t at next level) : program_scope.
 
31
Notation " `  t " := (proj1_sig t) (at level 10, t at next level) : program_scope.
32
32
 
33
33
(** Coerces objects to their support before comparing them. *)
34
34
 
55
55
Extract Inductive sumbool => "bool" [ "true" "false" ].
56
56
(* Extract Inductive prod "'a" "'b" => " 'a * 'b " [ "(,)" ]. *)
57
57
(* Extract Inductive sigT => "prod" [ "" ]. *)
58
 
*)
 
 
b'\\ No newline at end of file'
 
58
*)