Commit 420f78b2caeaaddc6fe484565b2d0e49c66888e5 - coq

+40

-0

CHANGES less more

	0	Changes from V8.4pl3 to V8.4pl4
	1	===============================
	2
	3	WARNING:
	4	The current logic of Coq is now known to be inconsistent with
	5	Axiom prop_extensionality : forall A B:Prop, (A <-> B) -> A = B.
	6	For more details, see:
	7	https://gforge.inria.fr/plugins/scmgit/cgi-bin/gitweb.cgi?p=coq/coq.git;a=blob_plain;f=test-suite/failure/subterm2.v;hb=HEAD
	8	or
	9	https://gforge.inria.fr/plugins/scmgit/cgi-bin/gitweb.cgi?p=coq/coq.git;a=blob_plain;f=test-suite/failure/subterm3.v;hb=HEAD
	10
	11	Kernel
	12
	13	- Bug #3211: unsound check of elimination sort.
	14	- Fix guard condition for nested cofixpoints.
	15	- Bug #3243: Univ constraints of module subtyping were not propagated.
	16
	17	Tactics
	18
	19	- A new option "Set Stable Omega" ensures that repeated identical calls
	20	to omega will produce identical proof terms. This option is off by default
	21	for maximal compatibility, but should be pretty safe to activate.
	22	- The interpretation of the open_constr tactic argument was erroneously
	23	firing type classes resolution in some corner cases. This has been
	24	fixed. The tactic argument type open_constr_wTC is provided for retro
	25	compatibility purposes.
	26	- Fixing bug #3228 (fixing precedence of ltac variables over variables in
	27	env) introduces rare and justified tactic failure.
	28
	29	Bug fixes
	30
	31	- Solved bugs:
	32	#3260, #2697, #3037, #3262, #2900, #3131, #3238, #3204, #1758, #1039,
	33	#3144
	34	- micromega: solved an ambiguous symbol resolution.
	35	- Coq always uses / as separator between directories on all platforms.
	36	- remove trailing '\r' from file names returned by coqtop.
	37	- bug correction in proving inversion principles for Function.
	38	- ocamlbuild: minor fixes related to camlp4 and cross-compilation.
	39
0	40	Changes from V8.4pl2 to V8.4pl3
1	41	===============================
2	42

+1

-1

checker/check.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

checker/check_stat.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

checker/check_stat.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

checker/checker.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

checker/closure.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

checker/closure.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

checker/indtypes.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

checker/indtypes.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+11

-8

checker/inductive.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

276	276	(try conv env a1 a1'
277	277	with NotConvertible -> raise (LocalArity None));
278	278	srec (push_rel (na1,None,a1) env) t ar'
279		\| Prod (_,a1,a2), [] -> (* whnf of t was not needed here! *)
280		let ksort = match (whd_betadeltaiota env a2) with
281		\| Sort s -> family_of_sort s
	279	\| Prod (na1,a1,a2), [] -> (* whnf of t was not needed here! *)
	280	let env' = push_rel (na1,None,a1) env in
	281	let ksort = match (whd_betadeltaiota env' a2) with
	282	\| Sort s -> family_of_sort s
282	283	\| _ -> raise (LocalArity None) in
283	284	let dep_ind = build_dependent_inductive ind specif params in
284	285	(try conv env a1 dep_ind

288	289	\| Sort s', [] ->
289	290	check_allowed_sort (family_of_sort s') specif;
290	291	false
	292	\| _, (_,Some _,_ as d)::ar' ->
	293	srec (push_rel d env) (lift 1 pt') ar'
291	294	\| _ ->
292	295	raise (LocalArity None)
293	296	in

894	897	raise (CoFixGuardError (env,RecCallInTypeOfAbstraction a))
895	898
896	899	\| CoFix (j,(_,varit,vdefs as recdef)) ->
897		if (List.for_all (noccur_with_meta n nbfix) args)
	900	if List.for_all (noccur_with_meta n nbfix) args
898	901	then
899		let nbfix = Array.length vdefs in
900		if (array_for_all (noccur_with_meta n nbfix) varit) then
	902	if array_for_all (noccur_with_meta n nbfix) varit then
	903	let nbfix = Array.length vdefs in
901	904	let env' = push_rec_types recdef env in
902		(Array.iter (check_rec_call env' alreadygrd (n+1) vlra) vdefs;
	905	(Array.iter (check_rec_call env' alreadygrd (n+nbfix) vlra) vdefs;
903	906	List.iter (check_rec_call env alreadygrd n vlra) args)
904	907	else
905	908	raise (CoFixGuardError (env,RecCallInTypeOfDef c))

+1

-1

checker/inductive.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

checker/mod_checking.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

checker/modops.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

checker/modops.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

checker/reduction.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

checker/reduction.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

checker/safe_typing.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

checker/safe_typing.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

checker/subtyping.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

checker/subtyping.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

checker/term.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

checker/type_errors.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

checker/type_errors.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

checker/typeops.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

checker/typeops.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

checker/validate.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

config/coq_config.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+2

-2

configure less more

5	5	#
6	6	##################################
7	7
8		VERSION=8.4pl3
	8	VERSION=8.4pl4
9	9	VOMAGIC=08400
10	10	STATEMAGIC=58400
11	11	DATE=`LC_ALL=C LANG=C date +"%B %Y"`

110	110	coq_profile_flag=
111	111	coq_annotate_flag=
112	112	best_compiler=opt
113		cflags="-fno-defer-pop -Wall -Wno-unused"
	113	cflags="-Wall -Wno-unused"
114	114	natdynlink=yes
115	115
116	116	local=false

+1

-1

dev/db_printers.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

dev/header less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

dev/top_printers.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

ide/command_windows.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

ide/command_windows.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

ide/config_lexer.mll less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+7

-1

ide/coq.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

50	50	let rec read_all_lines in_chan =
51	51	try
52	52	let arg = input_line in_chan in
	53	let len = String.length arg in
	54	let arg =
	55	if arg.[len - 1] = '\r' then
	56	String.sub arg 0 (len - 1)
	57	else arg
	58	in
53	59	arg::(read_all_lines in_chan)
54	60	with End_of_file -> []
55	61

+1

-1

ide/coq.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

ide/coq_commands.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

ide/coq_lex.mll less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

ide/coqide.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

ide/coqide.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

ide/coqide_main.ml4 less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

ide/gtk_parsing.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

ide/ideproof.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

ide/ideutils.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

ide/ideutils.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

ide/preferences.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

ide/preferences.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

ide/tags.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

ide/tags.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

ide/typed_notebook.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

ide/undo.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

ide/undo_lablgtk_ge212.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

ide/undo_lablgtk_ge26.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

ide/undo_lablgtk_lt26.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

ide/utf8_convert.mll less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

interp/constrextern.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

interp/constrextern.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+2

-2

interp/constrintern.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

1115	1115	(try
1116	1116	let n = Recordops.find_projection_nparams ref + 1 in
1117	1117	if nargs <> n then
1118		user_err_loc (loc,"",str "Projection has not the right number of explicit parameters.");
	1118	user_err_loc (loc,"",str "Projection does not have the right number of explicit parameters.");
1119	1119	with Not_found ->
1120	1120	user_err_loc
1121	1121	(loc,"",pr_global_env Idset.empty ref ++ str " is not a registered projection."))

+1

-1

interp/constrintern.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

interp/coqlib.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

interp/coqlib.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

interp/dumpglob.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

interp/dumpglob.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+17

-13

interp/genarg.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

31	31	\| ConstrArgType
32	32	\| ConstrMayEvalArgType
33	33	\| QuantHypArgType
34		\| OpenConstrArgType of bool
	34	\| OpenConstrArgType of bool * bool (* casted, TC resolution *)
35	35	\| ConstrWithBindingsArgType
36	36	\| BindingsArgType
37	37	\| RedExprArgType

155	155	let globwit_constr_may_eval = ConstrMayEvalArgType
156	156	let wit_constr_may_eval = ConstrMayEvalArgType
157	157
158		let rawwit_open_constr_gen b = OpenConstrArgType b
159		let globwit_open_constr_gen b = OpenConstrArgType b
160		let wit_open_constr_gen b = OpenConstrArgType b
161
162		let rawwit_open_constr = rawwit_open_constr_gen false
163		let globwit_open_constr = globwit_open_constr_gen false
164		let wit_open_constr = wit_open_constr_gen false
165
166		let rawwit_casted_open_constr = rawwit_open_constr_gen true
167		let globwit_casted_open_constr = globwit_open_constr_gen true
168		let wit_casted_open_constr = wit_open_constr_gen true
	158	let rawwit_open_constr_gen (b1,b2) = OpenConstrArgType (b1,b2)
	159	let globwit_open_constr_gen (b1,b2) = OpenConstrArgType (b1,b2)
	160	let wit_open_constr_gen (b1,b2) = OpenConstrArgType (b1,b2)
	161
	162	let rawwit_open_constr = rawwit_open_constr_gen (false,false)
	163	let globwit_open_constr = globwit_open_constr_gen (false,false)
	164	let wit_open_constr = wit_open_constr_gen (false,false)
	165
	166	let rawwit_casted_open_constr = rawwit_open_constr_gen (true,false)
	167	let globwit_casted_open_constr = globwit_open_constr_gen (true,false)
	168	let wit_casted_open_constr = wit_open_constr_gen (true,false)
	169
	170	let rawwit_open_constr_wTC = rawwit_open_constr_gen (false,true)
	171	let globwit_open_constr_wTC = globwit_open_constr_gen (false,true)
	172	let wit_open_constr_wTC = wit_open_constr_gen (false,true)
169	173
170	174	let rawwit_constr_with_bindings = ConstrWithBindingsArgType
171	175	let globwit_constr_with_bindings = ConstrWithBindingsArgType

+9

-5

interp/genarg.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

182	182	val globwit_constr_may_eval : ((glob_constr_and_expr,evaluable_global_reference and_short_name or_var,glob_constr_pattern_and_expr) may_eval,glevel) abstract_argument_type
183	183	val wit_constr_may_eval : (constr,tlevel) abstract_argument_type
184	184
185		val rawwit_open_constr_gen : bool -> (open_constr_expr,rlevel) abstract_argument_type
186		val globwit_open_constr_gen : bool -> (open_glob_constr,glevel) abstract_argument_type
187		val wit_open_constr_gen : bool -> (open_constr,tlevel) abstract_argument_type
	185	val rawwit_open_constr_gen : bool * bool -> (open_constr_expr,rlevel) abstract_argument_type
	186	val globwit_open_constr_gen : bool * bool -> (open_glob_constr,glevel) abstract_argument_type
	187	val wit_open_constr_gen : bool * bool -> (open_constr,tlevel) abstract_argument_type
188	188
189	189	val rawwit_open_constr : (open_constr_expr,rlevel) abstract_argument_type
190	190	val globwit_open_constr : (open_glob_constr,glevel) abstract_argument_type

193	193	val rawwit_casted_open_constr : (open_constr_expr,rlevel) abstract_argument_type
194	194	val globwit_casted_open_constr : (open_glob_constr,glevel) abstract_argument_type
195	195	val wit_casted_open_constr : (open_constr,tlevel) abstract_argument_type
	196
	197	val rawwit_open_constr_wTC : (open_constr_expr,rlevel) abstract_argument_type
	198	val globwit_open_constr_wTC : (open_glob_constr,glevel) abstract_argument_type
	199	val wit_open_constr_wTC : (open_constr,tlevel) abstract_argument_type
196	200
197	201	val rawwit_constr_with_bindings : (constr_expr with_bindings,rlevel) abstract_argument_type
198	202	val globwit_constr_with_bindings : (glob_constr_and_expr with_bindings,glevel) abstract_argument_type

279	283	\| ConstrArgType
280	284	\| ConstrMayEvalArgType
281	285	\| QuantHypArgType
282		\| OpenConstrArgType of bool
	286	\| OpenConstrArgType of bool * bool
283	287	\| ConstrWithBindingsArgType
284	288	\| BindingsArgType
285	289	\| RedExprArgType

+1

-1

interp/implicit_quantifiers.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

interp/implicit_quantifiers.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

interp/modintern.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

interp/modintern.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

interp/notation.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

interp/notation.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

interp/ppextend.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

interp/ppextend.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

interp/reserve.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

interp/reserve.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

interp/smartlocate.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

interp/smartlocate.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

interp/syntax_def.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

interp/syntax_def.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

interp/topconstr.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

interp/topconstr.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

kernel/cbytecodes.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

kernel/cbytecodes.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

kernel/cbytegen.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

kernel/cemitcodes.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

kernel/closure.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

kernel/closure.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

kernel/conv_oracle.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

kernel/conv_oracle.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

kernel/cooking.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

kernel/cooking.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

kernel/csymtable.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

kernel/csymtable.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

kernel/declarations.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

kernel/declarations.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

kernel/entries.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

kernel/entries.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

kernel/environ.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

kernel/environ.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

kernel/esubst.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

kernel/esubst.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

kernel/indtypes.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

kernel/indtypes.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+18

-16

kernel/inductive.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

295	295	try conv env a1 a1'
296	296	with NotConvertible -> raise (LocalArity None) in
297	297	srec (push_rel (na1,None,a1) env) t ar' (union_constraints u univ)
298		\| Prod (_,a1,a2), [] -> (* whnf of t was not needed here! *)
299		let ksort = match kind_of_term (whd_betadeltaiota env a2) with
300		\| Sort s -> family_of_sort s
301		\| _ -> raise (LocalArity None) in
302		let dep_ind = build_dependent_inductive ind specif params in
303		let univ =
304		try conv env a1 dep_ind
305		with NotConvertible -> raise (LocalArity None) in
306		check_allowed_sort ksort specif;
307		union_constraints u univ
	298	(* The last Prod domain is the type of the scrutinee *)
	299	\| Prod (na1,a1,a2), [] -> (* whnf of t was not needed here! *)
	300	let env' = push_rel (na1,None,a1) env in
	301	let ksort = match kind_of_term (whd_betadeltaiota env' a2) with
	302	\| Sort s -> family_of_sort s
	303	\| _ -> raise (LocalArity None) in
	304	let dep_ind = build_dependent_inductive ind specif params in
	305	let univ =
	306	try conv env a1 dep_ind
	307	with NotConvertible -> raise (LocalArity None) in
	308	check_allowed_sort ksort specif;
	309	union_constraints u univ
308	310	\| _, (_,Some _,_ as d)::ar' ->
309		srec (push_rel d env) (lift 1 pt') ar' u
	311	srec (push_rel d env) (lift 1 pt') ar' u
310	312	\| _ ->
311	313	raise (LocalArity None)
312	314	in

894	896	raise (CoFixGuardError (env,RecCallInTypeOfAbstraction a))
895	897
896	898	\| CoFix (j,(_,varit,vdefs as recdef)) ->
897		if (List.for_all (noccur_with_meta n nbfix) args)
	899	if List.for_all (noccur_with_meta n nbfix) args
898	900	then
899		let nbfix = Array.length vdefs in
900		if (array_for_all (noccur_with_meta n nbfix) varit) then
	901	if array_for_all (noccur_with_meta n nbfix) varit then
	902	let nbfix = Array.length vdefs in
901	903	let env' = push_rec_types recdef env in
902		(Array.iter (check_rec_call env' alreadygrd (n+1) vlra) vdefs;
	904	(Array.iter (check_rec_call env' alreadygrd (n+nbfix) vlra) vdefs;
903	905	List.iter (check_rec_call env alreadygrd n vlra) args)
904	906	else
905	907	raise (CoFixGuardError (env,RecCallInTypeOfDef c))

+1

-1

kernel/inductive.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

kernel/mod_subst.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

kernel/mod_subst.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

kernel/mod_typing.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

kernel/mod_typing.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

kernel/modops.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

kernel/modops.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

kernel/names.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

kernel/names.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

kernel/pre_env.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

kernel/pre_env.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

kernel/reduction.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

kernel/reduction.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

kernel/retroknowledge.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

kernel/retroknowledge.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+2

-2

kernel/safe_typing.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

405	405	in
406	406	let newenv = oldsenv.env in
407	407	let newenv = set_engagement_opt senv.engagement newenv in
408		let senv'= {senv with env=newenv} in
	408	let senv'= {senv with env = newenv; univ = cst} in
409	409	let senv' =
410	410	List.fold_left
411	411	(fun env (_,mb) -> full_add_module mb env)

+1

-1

kernel/safe_typing.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

kernel/sign.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

kernel/sign.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

kernel/subtyping.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

kernel/subtyping.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

kernel/term.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

kernel/term.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

kernel/term_typing.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

kernel/term_typing.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

kernel/type_errors.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

kernel/type_errors.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

kernel/typeops.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

kernel/typeops.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

kernel/univ.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

kernel/univ.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

kernel/vconv.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

kernel/vm.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

lib/bigint.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

lib/bigint.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

lib/compat.ml4 less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

lib/dnet.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

lib/dnet.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

lib/dyn.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

lib/dyn.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+13

-15

lib/envars.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

7	7
8	8	(* This file gathers environment variables needed by Coq to run (such
9	9	as coqlib) *)
	10
	11	let (//) s1 s2 = s1 ^ "/" ^ s2
10	12
11	13	let coqbin =
12	14	System.canonical_path_name (Filename.dirname Sys.executable_name)

26	28
27	29	let reldir instdir testfile oth =
28	30	let rpath = if Coq_config.local then [] else instdir in
29		let out = List.fold_left Filename.concat coqroot rpath in
30		if Sys.file_exists (Filename.concat out testfile) then out else oth ()
	31	let out = List.fold_left (//) coqroot rpath in
	32	if Sys.file_exists (out//testfile) then out else oth ()
31	33
32	34	let guess_coqlib () =
33	35	let file = "states/initial.coq" in

37	39	\| Some coqlib -> coqlib
38	40	\| None -> coqroot
39	41	in
40		if Sys.file_exists (Filename.concat coqlib file)
	42	if Sys.file_exists (coqlib//file)
41	43	then coqlib
42	44	else Util.error "cannot guess a path for Coq libraries; please use -coqlib option")
43	45

53	55	Util.split_string_at sep p
54	56
55	57	let xdg_data_home =
56		Filename.concat
57		(System.getenv_else "XDG_DATA_HOME" (Filename.concat System.home ".local/share"))
58		"coq"
	58	(System.getenv_else "XDG_DATA_HOME" (System.home//".local/share"))//"coq"
59	59
60	60	let xdg_config_home =
61		Filename.concat
62		(System.getenv_else "XDG_CONFIG_HOME" (Filename.concat System.home ".config"))
63		"coq"
	61	(System.getenv_else "XDG_CONFIG_HOME" (System.home//".config"))//"coq"
64	62
65	63	let xdg_data_dirs =
66	64	(try
67		List.map (fun dir -> Filename.concat dir "coq") (path_to_list (Sys.getenv "XDG_DATA_DIRS"))
	65	List.map (fun dir -> dir//"coq") (path_to_list (Sys.getenv "XDG_DATA_DIRS"))
68	66	with Not_found -> ["/usr/local/share/coq";"/usr/share/coq"])
69	67	@ (match Coq_config.datadir with \|None -> [] \|Some datadir -> [datadir])
70	68

83	81	match l with
84	82	\| [] -> raise Not_found
85	83	\| p :: tl ->
86		if Sys.file_exists (Filename.concat p f)
	84	if Sys.file_exists (p//f)
87	85	then p
88	86	else which tl f
89	87

107	105	then Coq_config.camllib
108	106	else
109	107	let camlbin = camlbin () in
110		let com = (Filename.concat camlbin "ocamlc") ^ " -where" in
	108	let com = (camlbin//"ocamlc") ^ " -where" in
111	109	let _,res = System.run_command (fun x -> x) (fun _ -> ()) com in
112	110	Util.strip res
113	111

116	114	if !Flags.boot then Coq_config.camlp4bin else
117	115	try guess_camlp4bin () with e when e <> Sys.Break ->
118	116	let cb = camlbin () in
119		if Sys.file_exists (Filename.concat cb (exe Coq_config.camlp4)) then cb
	117	if Sys.file_exists (cb//(exe Coq_config.camlp4)) then cb
120	118	else Coq_config.camlp4bin
121	119
122	120	let camlp4lib () =

124	122	then Coq_config.camlp4lib
125	123	else
126	124	let camlp4bin = camlp4bin () in
127		let com = (Filename.concat camlp4bin Coq_config.camlp4) ^ " -where" in
	125	let com = (camlp4bin//Coq_config.camlp4) ^ " -where" in
128	126	let ex,res = System.run_command (fun x -> x) (fun _ -> ()) com in
129	127	match ex with
130	128	\|Unix.WEXITED 0 -> Util.strip res

+1

-1

lib/envars.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

lib/explore.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

lib/explore.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

lib/flags.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

lib/flags.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

lib/gmap.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

lib/gmap.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

lib/gmapl.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

lib/gmapl.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

lib/hashcons.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

lib/hashcons.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

lib/hashtbl_alt.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

lib/hashtbl_alt.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

lib/heap.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

lib/heap.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

lib/option.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

lib/option.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

lib/pp.ml4 less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

lib/pp.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

lib/pp_control.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

lib/pp_control.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

lib/profile.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

lib/profile.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

lib/rtree.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

lib/rtree.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

lib/system.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

lib/system.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

lib/tries.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

lib/unionfind.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

lib/unionfind.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

lib/util.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

library/assumptions.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

library/assumptions.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

library/decl_kinds.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

library/decl_kinds.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

library/declare.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

library/declare.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

library/declaremods.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

library/declaremods.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

library/decls.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

library/decls.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

library/dischargedhypsmap.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

library/dischargedhypsmap.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

library/global.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

library/global.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

library/goptions.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

library/goptions.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

library/goptionstyp.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

library/heads.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

library/heads.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

library/impargs.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

library/impargs.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

library/lib.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

library/lib.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

library/libnames.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

library/libnames.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

library/libobject.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

library/libobject.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

library/library.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

library/library.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

library/nameops.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

library/nameops.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

library/nametab.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

library/nametab.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

library/states.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

library/states.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

library/summary.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

library/summary.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+4

-4

parsing/argextend.ml4 less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

31	31	\| ConstrMayEvalArgType -> <:expr< Genarg.rawwit_constr_may_eval >>
32	32	\| QuantHypArgType -> <:expr< Genarg.rawwit_quant_hyp >>
33	33	\| RedExprArgType -> <:expr< Genarg.rawwit_red_expr >>
34		\| OpenConstrArgType b -> <:expr< Genarg.rawwit_open_constr_gen $mlexpr_of_bool b$ >>
	34	\| OpenConstrArgType (b1,b2) -> <:expr< Genarg.rawwit_open_constr_gen ($mlexpr_of_bool b1$,$mlexpr_of_bool b2$) >>
35	35	\| ConstrWithBindingsArgType -> <:expr< Genarg.rawwit_constr_with_bindings >>
36	36	\| BindingsArgType -> <:expr< Genarg.rawwit_bindings >>
37	37	\| List0ArgType t -> <:expr< Genarg.wit_list0 $make_rawwit loc t$ >>

61	61	\| ConstrArgType -> <:expr< Genarg.globwit_constr >>
62	62	\| ConstrMayEvalArgType -> <:expr< Genarg.globwit_constr_may_eval >>
63	63	\| RedExprArgType -> <:expr< Genarg.globwit_red_expr >>
64		\| OpenConstrArgType b -> <:expr< Genarg.globwit_open_constr_gen $mlexpr_of_bool b$ >>
	64	\| OpenConstrArgType (b1,b2) -> <:expr< Genarg.globwit_open_constr_gen ($mlexpr_of_bool b1$,$mlexpr_of_bool b2$) >>
65	65	\| ConstrWithBindingsArgType -> <:expr< Genarg.globwit_constr_with_bindings >>
66	66	\| BindingsArgType -> <:expr< Genarg.globwit_bindings >>
67	67	\| List0ArgType t -> <:expr< Genarg.wit_list0 $make_globwit loc t$ >>

91	91	\| ConstrArgType -> <:expr< Genarg.wit_constr >>
92	92	\| ConstrMayEvalArgType -> <:expr< Genarg.wit_constr_may_eval >>
93	93	\| RedExprArgType -> <:expr< Genarg.wit_red_expr >>
94		\| OpenConstrArgType b -> <:expr< Genarg.wit_open_constr_gen $mlexpr_of_bool b$ >>
	94	\| OpenConstrArgType (b1,b2) -> <:expr< Genarg.wit_open_constr_gen ($mlexpr_of_bool b1$,$mlexpr_of_bool b2$) >>
95	95	\| ConstrWithBindingsArgType -> <:expr< Genarg.wit_constr_with_bindings >>
96	96	\| BindingsArgType -> <:expr< Genarg.wit_bindings >>
97	97	\| List0ArgType t -> <:expr< Genarg.wit_list0 $make_wit loc t$ >>

+1

-1

parsing/egrammar.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

parsing/egrammar.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

parsing/extend.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

parsing/extend.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

parsing/extrawit.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

parsing/extrawit.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

parsing/g_constr.ml4 less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

parsing/g_ltac.ml4 less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

parsing/g_prim.ml4 less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

parsing/g_proofs.ml4 less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+5

-2

parsing/g_tactic.ml4 less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

197	197
198	198	GEXTEND Gram
199	199	GLOBAL: simple_tactic constr_with_bindings quantified_hypothesis
200		bindings red_expr int_or_var open_constr casted_open_constr
	200	bindings red_expr int_or_var open_constr casted_open_constr open_constr_wTC
201	201	simple_intropattern;
202	202
203	203	int_or_var:

216	216	\| id = METAIDENT -> MetaId (loc,id) ] ]
217	217	;
218	218	open_constr:
	219	[ [ c = constr -> ((),c) ] ]
	220	;
	221	open_constr_wTC:
219	222	[ [ c = constr -> ((),c) ] ]
220	223	;
221	224	casted_open_constr:

+3

-2

parsing/g_vernac.ml4 less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

413	413	VernacRequireFrom (export, None, filename)
414	414	\| IDENT "Import"; qidl = LIST1 global -> VernacImport (false,qidl)
415	415	\| IDENT "Export"; qidl = LIST1 global -> VernacImport (true,qidl)
416		\| IDENT "Include"; e = module_expr_inl; l = LIST0 ext_module_expr ->
	416	\| IDENT "Include"; e = module_type_inl; l = LIST0 ext_module_expr ->
417	417	VernacInclude(e::l)
418	418	\| IDENT "Include"; "Type"; e = module_type_inl; l = LIST0 ext_module_type ->
419	419	Flags.if_verbose

841	841	-> PrintCoercionPaths (s,t)
842	842	\| IDENT "Canonical"; IDENT "Projections" -> PrintCanonicalConversions
843	843	\| IDENT "Tables" -> PrintTables
	844	\| IDENT "Options" -> PrintTables (* A Synonymous to Tables *)
844	845	\| IDENT "Hint" -> PrintHintGoal
845	846	\| IDENT "Hint"; qid = smart_global -> PrintHint qid
846	847	\| IDENT "Hint"; "*" -> PrintHintDb

+1

-1

parsing/g_xml.ml4 less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

parsing/lexer.ml4 less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

parsing/lexer.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+5

-3

parsing/pcoq.ml4 less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

379	379	(* Entries that can be refered via the string -> Gram.entry table *)
380	380	(* Typically for tactic user extensions *)
381	381	let open_constr =
382		make_gen_entry utactic (rawwit_open_constr_gen false) "open_constr"
	382	make_gen_entry utactic (rawwit_open_constr_gen (false,false)) "open_constr"
383	383	let casted_open_constr =
384		make_gen_entry utactic (rawwit_open_constr_gen true) "casted_open_constr"
	384	make_gen_entry utactic (rawwit_open_constr_gen (true,false)) "casted_open_constr"
	385	let open_constr_wTC =
	386	make_gen_entry utactic (rawwit_open_constr_gen (false,true)) "open_constr_wTC"
385	387	let constr_with_bindings =
386	388	make_gen_entry utactic rawwit_constr_with_bindings "constr_with_bindings"
387	389	let bindings =

+2

-1

parsing/pcoq.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

210	210	sig
211	211	open Glob_term
212	212	val open_constr : open_constr_expr Gram.entry
	213	val open_constr_wTC : open_constr_expr Gram.entry
213	214	val casted_open_constr : open_constr_expr Gram.entry
214	215	val constr_with_bindings : constr_expr with_bindings Gram.entry
215	216	val bindings : constr_expr bindings Gram.entry

+1

-1

parsing/ppconstr.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

parsing/ppconstr.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+4

-4

parsing/pptactic.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

148	148	\| RedExprArgType ->
149	149	pr_red_expr (prc,prlc,pr_or_by_notation prref,prpat)
150	150	(out_gen rawwit_red_expr x)
151		\| OpenConstrArgType b -> prc (snd (out_gen (rawwit_open_constr_gen b) x))
	151	\| OpenConstrArgType (b1,b2) -> prc (snd (out_gen (rawwit_open_constr_gen (b1,b2)) x))
152	152	\| ConstrWithBindingsArgType ->
153	153	pr_with_bindings prc prlc (out_gen rawwit_constr_with_bindings x)
154	154	\| BindingsArgType ->

194	194	pr_red_expr
195	195	(prc,prlc,pr_or_var (pr_and_short_name pr_evaluable_reference),prpat)
196	196	(out_gen globwit_red_expr x)
197		\| OpenConstrArgType b -> prc (snd (out_gen (globwit_open_constr_gen b) x))
	197	\| OpenConstrArgType (b1,b2) -> prc (snd (out_gen (globwit_open_constr_gen (b1,b2)) x))
198	198	\| ConstrWithBindingsArgType ->
199	199	pr_with_bindings prc prlc (out_gen globwit_constr_with_bindings x)
200	200	\| BindingsArgType ->

235	235	\| RedExprArgType ->
236	236	pr_red_expr (prc,prlc,pr_evaluable_reference,prpat)
237	237	(out_gen wit_red_expr x)
238		\| OpenConstrArgType b -> prc (snd (out_gen (wit_open_constr_gen b) x))
	238	\| OpenConstrArgType (b1,b2) -> prc (snd (out_gen (wit_open_constr_gen (b1,b2)) x))
239	239	\| ConstrWithBindingsArgType ->
240	240	let (c,b) = (out_gen wit_constr_with_bindings x).Evd.it in
241	241	pr_with_bindings prc prlc (c,b)

+1

-1

parsing/pptactic.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

parsing/ppvernac.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

parsing/ppvernac.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

parsing/prettyp.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

parsing/prettyp.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+5

-5

parsing/printer.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

204	204	\| None -> (mt ())
205	205	\| Some c ->
206	206	(* Force evaluation *)
207		let pb = pr_lconstr_env env c in
	207	let pb = pr_lconstr_core true env c in
208	208	let pb = if isCast c then surround pb else pb in
209	209	(str" := " ++ pb ++ cut () ) in
210		let pt = pr_ltype_env env typ in
	210	let pt = pr_ltype_core true env typ in
211	211	let ptyp = (str" : " ++ pt) in
212	212	(pr_id id ++ hov 0 (pbody ++ ptyp))
213	213

216	216	\| None -> mt ()
217	217	\| Some c ->
218	218	(* Force evaluation *)
219		let pb = pr_lconstr_env env c in
	219	let pb = pr_lconstr_core true env c in
220	220	let pb = if isCast c then surround pb else pb in
221	221	(str":=" ++ spc () ++ pb ++ spc ()) in
222		let ptyp = pr_ltype_env env typ in
	222	let ptyp = pr_ltype_core true env typ in
223	223	match na with
224	224	\| Anonymous -> hov 0 (str"<>" ++ spc () ++ pbody ++ str":" ++ spc () ++ ptyp)
225	225	\| Name id -> hov 0 (pr_id id ++ spc () ++ pbody ++ str":" ++ spc () ++ ptyp)

+1

-1

parsing/printer.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

parsing/printmod.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

parsing/printmod.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

parsing/q_constr.ml4 less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+2

-2

parsing/q_coqast.ml4 less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

188	188	\| Genarg.VarArgType -> <:expr< Genarg.VarArgType >>
189	189	\| Genarg.StringArgType -> <:expr< Genarg.StringArgType >>
190	190	\| Genarg.QuantHypArgType -> <:expr< Genarg.QuantHypArgType >>
191		\| Genarg.OpenConstrArgType b -> <:expr< Genarg.OpenConstrArgType $mlexpr_of_bool b$ >>
	191	\| Genarg.OpenConstrArgType (b1,b2) -> <:expr< Genarg.OpenConstrArgType ($mlexpr_of_bool b1$, $mlexpr_of_bool b2$) >>
192	192	\| Genarg.ConstrWithBindingsArgType -> <:expr< Genarg.ConstrWithBindingsArgType >>
193	193	\| Genarg.BindingsArgType -> <:expr< Genarg.BindingsArgType >>
194	194	\| Genarg.RedExprArgType -> <:expr< Genarg.RedExprArgType >>

+1

-1

parsing/q_util.ml4 less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

parsing/q_util.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

parsing/tacextend.ml4 less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

parsing/tactic_printer.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

parsing/tactic_printer.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

parsing/tok.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

parsing/tok.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

parsing/vernacextend.ml4 less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/cc/ccalgo.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/cc/ccalgo.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/cc/ccproof.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/cc/ccproof.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/cc/cctac.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/cc/cctac.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/cc/g_congruence.ml4 less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/decl_mode/decl_expr.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/decl_mode/decl_interp.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/decl_mode/decl_interp.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/decl_mode/decl_mode.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/decl_mode/decl_mode.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/decl_mode/decl_proof_instr.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/decl_mode/decl_proof_instr.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/decl_mode/g_decl_mode.ml4 less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/decl_mode/ppdecl_proof.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/extraction/ExtrOcamlBasic.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/extraction/ExtrOcamlBigIntConv.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/extraction/ExtrOcamlIntConv.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/extraction/ExtrOcamlNatBigInt.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/extraction/ExtrOcamlNatInt.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/extraction/ExtrOcamlString.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/extraction/ExtrOcamlZBigInt.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/extraction/ExtrOcamlZInt.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/extraction/big.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/extraction/common.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/extraction/common.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/extraction/extract_env.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/extraction/extract_env.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/extraction/extraction.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/extraction/extraction.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/extraction/g_extraction.ml4 less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/extraction/haskell.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/extraction/haskell.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/extraction/miniml.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/extraction/mlutil.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/extraction/mlutil.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/extraction/modutil.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/extraction/modutil.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/extraction/ocaml.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/extraction/ocaml.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/extraction/scheme.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/extraction/scheme.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/extraction/table.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/extraction/table.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/field/LegacyField.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/field/LegacyField_Compl.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/field/LegacyField_Tactic.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/field/LegacyField_Theory.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/field/field.ml4 less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/firstorder/formula.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/firstorder/formula.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/firstorder/g_ground.ml4 less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/firstorder/ground.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/firstorder/ground.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/firstorder/instances.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/firstorder/instances.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/firstorder/rules.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/firstorder/rules.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/firstorder/sequent.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/firstorder/sequent.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/firstorder/unify.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/firstorder/unify.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/fourier/Fourier.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/fourier/Fourier_util.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/fourier/fourier.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/fourier/fourierR.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/fourier/g_fourier.ml4 less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/funind/Recdef.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+3

-3

plugins/funind/functional_principles_proofs.ml less more

187	187
188	188
189	189	let find_rectype env c =
190		let (t, l) = decompose_app (Reduction.whd_betadeltaiota env c) in
	190	let (t, l) = decompose_app (Reduction.whd_betaiotazeta c) in
191	191	match kind_of_term t with
192	192	\| Ind ind -> (t, l)
193	193	\| Construct _ -> (t,l)

575	575	onLastHypId (fun heq_id -> tclTHENLIST [
576	576	(* Then the new hypothesis *)
577	577	tclMAP introduction_no_check dyn_infos.rec_hyps;
578		(* observe_tac "after_introduction" *)(fun g' ->
	578	observe_tac "after_introduction" (fun g' ->
579	579	(* We get infos on the equations introduced*)
580	580	let new_term_value_eq = pf_type_of g' (mkVar heq_id) in
581	581	(* compute the new value of the body *)

602	602	}
603	603	in
604	604	clean_goal_with_heq ptes_infos continue_tac new_infos g'
605		)])
	605	)])
606	606	]
607	607	g
608	608

+1

-1

plugins/funind/g_indfun.ml4 less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+27

-24

plugins/funind/invfun.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

71	71	raise reraise;;
72	72
73	73
74		let observe_tac s tac g =
75		if do_observe ()
76		then do_observe_tac (str s) tac g
	74
	75	let observe_tac_msg s tac g =
	76	if do_observe ()
	77	then do_observe_tac s tac g
77	78	else tac g
	79
	80	let observe_tac s tac g =
	81	observe_tac_msg (str s) tac g
78	82
79	83	(* [nf_zeta] $\zeta$-normalization of a term *)
80	84	let nf_zeta =

286	290	branches
287	291	in
288	292	(* before building the full intro pattern for the principle *)
289		let pat = Some (dummy_loc,Genarg.IntroOrAndPattern intro_pats) in
290	293	let eq_ind = Coqlib.build_coq_eq () in
291	294	let eq_construct = mkConstruct((destInd eq_ind),1) in
292	295	(* The next to referencies will be used to find out which constructor to apply in each branch *)
293	296	let ind_number = ref 0
294	297	and min_constr_number = ref 0 in
295	298	(* The tactic to prove the ith branch of the principle *)
	299	let this_branche_ids empty add i =
	300	List.fold_right
	301	(fun (_,pat) acc ->
	302	match pat with
	303	\| Genarg.IntroIdentifier id -> add id acc
	304	\| _ -> anomaly "Not an identifier"
	305	)
	306	(List.nth intro_pats (pred i))
	307	empty
	308	in
296	309	let prove_branche i g =
297	310	(* We get the identifiers of this branch *)
298		let this_branche_ids =
299		List.fold_right
300		(fun (_,pat) acc ->
301		match pat with
302		\| Genarg.IntroIdentifier id -> Idset.add id acc
303		\| _ -> anomaly "Not an identifier"
304		)
305		(List.nth intro_pats (pred i))
306		Idset.empty
307		in
308	311	(* and get the real args of the branch by unfolding the defined constant *)
309	312	let pre_args,pre_tac =
310	313	List.fold_right
311	314	(fun (id,b,t) (pre_args,pre_tac) ->
312		if Idset.mem id this_branche_ids
	315	if Idset.mem id (this_branche_ids Idset.empty Idset.add i)
313	316	then
314	317	match b with
315		\| None -> (id::pre_args,pre_tac)
	318	\| None ->
	319	(id::pre_args,pre_tac)
316	320	\| Some b ->
317	321	(pre_args,
318	322	tclTHEN (h_reduce (Glob_term.Unfold([Glob_term.all_occurrences_expr,EvalVarRef id])) allHyps) pre_tac

346	350	when
347	351	(eq_constr eq eq_ind) &&
348	352	array_exists (eq_constr graph') graphs_constr ->
349		((mkApp(mkVar hid,[\|args.(2);(mkApp(eq_construct,[\|args.(0);args.(2)\|]))\|]))
350		::args.(2)::acc)
	353	((mkApp(mkVar hid,[\|args.(2);(mkApp(eq_construct,[\|args.(0);args.(2)\|]))\|]))
	354	::args.(2)::acc)
351	355	\| _ -> mkVar hid :: acc
352	356	end
353	357	\| _ -> mkVar hid :: acc

389	393	\| [res;hres] -> res,hres
390	394	\| _ -> assert false
391	395	in
392		observe (str "constructor := " ++ Printer.pr_lconstr_env (pf_env g) app_constructor);
	396	observe_tac_msg (str "constructor := " ++ Printer.pr_lconstr_env (pf_env g) app_constructor)
393	397	(
394	398	tclTHENSEQ
395	399	[

454	458	fun g ->
455	459	observe
456	460	(pr_constr_with_binding (Printer.pr_lconstr_env (pf_env g)) (mkVar principle_id,bindings));
457		functional_induction false (applist(funs_constr.(i),List.map mkVar args_names))
458		(Some (mkVar principle_id,bindings))
459		pat g
	461	h_apply false false [dummy_loc,(mkVar principle_id,bindings)] g
460	462	))
461		(fun i g -> observe_tac ("proving branche "^string_of_int i) (prove_branche i) g )
	463	(fun i g -> observe_tac ("proving branche "^string_of_int i)
	464	(tclTHEN (tclMAP h_intro (this_branche_ids [] (fun a b -> a::b) i)) (prove_branche i)) g )
462	465	]
463	466	g
464	467

+1

-1

plugins/funind/merge.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+2

-2

plugins/funind/recdef.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

912	912	\| App(_,_) ->
913	913	let (f,_) = decompose_app t in
914	914	eq_constr f (well_founded ())
915		\| _ -> assert false
	915	\| _ -> false
916	916	in
917	917	let compare t1 t2 =
918	918	let b1,b2= is_well_founded t1,is_well_founded t2 in

+1

-1

plugins/micromega/CheckerMaker.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/micromega/Env.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/micromega/EnvRing.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/micromega/MExtraction.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/micromega/OrderedRing.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/micromega/Psatz.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/micromega/QMicromega.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/micromega/RMicromega.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/micromega/Refl.v less more

0	0	(* -- coding: utf-8 -- *)
1	1	(************************************************************************)
2	2	(* v * The Coq Proof Assistant / The Coq Development Team *)
3		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	3	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
4	4	(* \VV/ **************************************************************)
5	5	(* // * This file is distributed under the terms of the *)
6	6	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/micromega/RingMicromega.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/micromega/Tauto.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/micromega/VarMap.v less more

0	0	(* -- coding: utf-8 -- *)
1	1	(************************************************************************)
2	2	(* v * The Coq Proof Assistant / The Coq Development Team *)
3		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	3	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
4	4	(* \VV/ **************************************************************)
5	5	(* // * This file is distributed under the terms of the *)
6	6	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/micromega/ZCoeff.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/micromega/ZMicromega.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/micromega/certificate.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+19

-15

plugins/micromega/coq_micromega.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

274	274	*)
275	275
276	276	let logic_dir = ["Coq";"Logic";"Decidable"]
277		let coq_modules =
278		init_modules @
279		[logic_dir] @ arith_modules @ zarith_base_modules @
280		[ ["Coq";"Lists";"List"];
	277
	278	let mic_modules =
	279	[
	280	["Coq";"Lists";"List"];
281	281	["ZMicromega"];
282	282	["Tauto"];
283	283	["RingMicromega"];

292	292	["Coq";"Reals" ; "Rpow_def"];
293	293	["LRing_normalise"]]
294	294
	295	let coq_modules =
	296	init_modules @
	297	[logic_dir] @ arith_modules @ zarith_base_modules @ mic_modules
	298
295	299	let bin_module = [["Coq";"Numbers";"BinNums"]]
296	300
297	301	let r_modules =

311	315	let bin_constant = gen_constant_in_modules "ZMicromega" bin_module
312	316	let r_constant = gen_constant_in_modules "ZMicromega" r_modules
313	317	let z_constant = gen_constant_in_modules "ZMicromega" z_modules
314		(* let constant = gen_constant_in_modules "Omicron" coq_modules *)
	318	let m_constant = gen_constant_in_modules "ZMicromega" mic_modules
315	319
316	320	let coq_and = lazy (init_constant "and")
317	321	let coq_or = lazy (init_constant "or")

353	357	let coq_Qmake = lazy (constant "Qmake")
354	358
355	359	let coq_Rcst = lazy (constant "Rcst")
356		let coq_C0 = lazy (constant "C0")
357		let coq_C1 = lazy (constant "C1")
358		let coq_CQ = lazy (constant "CQ")
359		let coq_CZ = lazy (constant "CZ")
360		let coq_CPlus = lazy (constant "CPlus")
361		let coq_CMinus = lazy (constant "CMinus")
362		let coq_CMult = lazy (constant "CMult")
363		let coq_CInv = lazy (constant "CInv")
364		let coq_COpp = lazy (constant "COpp")
	360	let coq_C0 = lazy (m_constant "C0")
	361	let coq_C1 = lazy (m_constant "C1")
	362	let coq_CQ = lazy (m_constant "CQ")
	363	let coq_CZ = lazy (m_constant "CZ")
	364	let coq_CPlus = lazy (m_constant "CPlus")
	365	let coq_CMinus = lazy (m_constant "CMinus")
	366	let coq_CMult = lazy (m_constant "CMult")
	367	let coq_CInv = lazy (m_constant "CInv")
	368	let coq_COpp = lazy (m_constant "COpp")
365	369
366	370
367	371	let coq_R0 = lazy (constant "R0")

+1

-1

plugins/micromega/csdpcert.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/micromega/g_micromega.ml4 less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/micromega/mutils.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/micromega/persistent_cache.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/micromega/polynomial.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/micromega/sos.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/micromega/sos_types.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/nsatz/Nsatz.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/nsatz/ideal.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/nsatz/nsatz.ml4 less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/nsatz/polynom.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/nsatz/polynom.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/omega/Omega.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/omega/OmegaPlugin.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/omega/PreOmega.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+55

-14

plugins/omega/coq_omega.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

48	48	let display_action_flag = ref false
49	49	let old_style_flag = ref false
50	50
	51	(* Should we reset all variable labels between two runs of omega ? *)
	52
	53	let reset_flag = ref false
	54
	55	(* Historical version of Coq do not perform such resets, and this
	56	implies that omega is slightly non-deterministic: successive runs of
	57	omega on the same problem may lead to distinct proof-terms.
	58	At the very least, these terms will differ on the inner
	59	variable names, but they could even be non-convertible :
	60	the OmegaSolver relies on Hashtbl.iter, it can hence find a different
	61	solution when variable indices differ.
	62
	63	Starting from Coq 8.4pl4, omega may be made stable via the option
	64	[Set Stable Omega]. In the 8.4 branch, this option is unset by default
	65	for compatibility. In Coq >= 8.5, this option is set by default.
	66	*)
	67
51	68	let read f () = !f
52	69	let write f x = f:=x
53	70

80	97	optread = read old_style_flag;
81	98	optwrite = write old_style_flag }
82	99
	100	let _ =
	101	declare_bool_option
	102	{ optsync = true;
	103	optdepr = false;
	104	optname = "Omega automatic reset of generated names";
	105	optkey = ["Stable";"Omega"];
	106	optread = read reset_flag;
	107	optwrite = write reset_flag }
83	108
84	109	let all_time = timing "Omega "
85	110	let solver_time = timing "Solver "

88	113	let simpl_time = timing "Simpl "
89	114	let generalize_time = timing "Generalize"
90	115
	116	let intref, reset_all_references =
	117	let refs = ref [] in
	118	(fun n -> let r = ref n in refs := (r,n) :: !refs; r),
	119	(fun () -> List.iter (fun (r,n) -> r:=n) !refs)
	120
91	121	let new_identifier =
92		let cpt = ref 0 in
	122	let cpt = intref 0 in
93	123	(fun () -> let s = "Omega" ^ string_of_int !cpt in incr cpt; id_of_string s)
94	124
95	125	let new_identifier_state =
96		let cpt = ref 0 in
	126	let cpt = intref 0 in
97	127	(fun () -> let s = make_ident "State" (Some !cpt) in incr cpt; s)
98	128
99	129	let new_identifier_var =
100		let cpt = ref 0 in
	130	let cpt = intref 0 in
101	131	(fun () -> let s = "Zvar" ^ string_of_int !cpt in incr cpt; id_of_string s)
102	132
103	133	let new_id =
104		let cpt = ref 0 in fun () -> incr cpt; !cpt
	134	let cpt = intref 0 in fun () -> incr cpt; !cpt
105	135
106	136	let new_var_num =
107		let cpt = ref 1000 in (fun () -> incr cpt; !cpt)
	137	let cpt = intref 1000 in (fun () -> incr cpt; !cpt)
108	138
109	139	let new_var =
110		let cpt = ref 0 in fun () -> incr cpt; Nameops.make_ident "WW" (Some !cpt)
	140	let cpt = intref 0 in fun () -> incr cpt; Nameops.make_ident "WW" (Some !cpt)
111	141
112	142	let display_var i = Printf.sprintf "X%d" i
113	143
114		let intern_id,unintern_id =
	144	let intern_id,unintern_id,reset_intern_tables =
115	145	let cpt = ref 0 in
116	146	let table = Hashtbl.create 7 and co_table = Hashtbl.create 7 in
117	147	(fun (name : identifier) ->

123	153	(fun idx ->
124	154	try Hashtbl.find co_table idx with Not_found ->
125	155	let v = new_var () in
126		Hashtbl.add table v idx; Hashtbl.add co_table idx v; v)
	156	Hashtbl.add table v idx; Hashtbl.add co_table idx v; v),
	157	(fun () -> cpt := 0; Hashtbl.clear table)
127	158
128	159	let mk_then = tclTHENLIST
129	160

140	171	in
141	172	loop
142	173
143		let tag_hypothesis,tag_of_hyp, hyp_of_tag =
	174	let tag_hypothesis,tag_of_hyp, hyp_of_tag, clear_tags =
144	175	let l = ref ([]:(identifier * int) list) in
145	176	(fun h id -> l := (h,id):: !l),
146	177	(fun h -> try List.assoc h !l with Not_found -> failwith "tag_hypothesis"),
147		(fun h -> try rev_assoc h !l with Not_found -> failwith "tag_hypothesis")
148
149		let hide_constr,find_constr,clear_tables,dump_tables =
	178	(fun h -> try rev_assoc h !l with Not_found -> failwith "tag_hypothesis"),
	179	(fun () -> l := [])
	180
	181	let hide_constr,find_constr,clear_constr_tables,dump_tables =
150	182	let l = ref ([]:(constr * (identifier * identifier * bool)) list) in
151	183	(fun h id eg b -> l := (h,(id,eg,b)):: !l),
152	184	(fun h -> try list_assoc_f eq_constr h !l with Not_found -> failwith "find_contr"),
153	185	(fun () -> l := []),
154	186	(fun () -> !l)
	187
	188	let reset_all () =
	189	if !reset_flag then begin
	190	reset_all_references ();
	191	reset_intern_tables ();
	192	clear_tags ();
	193	clear_constr_tables ()
	194	end
155	195
156	196	(* Lazy evaluation is used for Coq constants, because this code
157	197	is evaluated before the compiled modules are loaded.

1387	1427	tclTHEN (tclTRY (clear [id])) (intro_using id)
1388	1428
1389	1429	let coq_omega gl =
1390		clear_tables ();
	1430	clear_constr_tables ();
1391	1431	let tactic_normalisation, system =
1392	1432	List.fold_left (destructure_omega gl) ([],[]) (pf_hyps_types gl) in
1393	1433	let prelude,sys =

1813	1853
1814	1854	let omega_solver gl =
1815	1855	Coqlib.check_required_library ["Coq";"omega";"Omega"];
	1856	reset_all ();
1816	1857	let result = destructure_goal gl in
1817	1858	(* if !display_time_flag then begin text_time ();
1818	1859	flush Pervasives.stdout end; *)

+1

-1

plugins/omega/g_omega.ml4 less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/omega/omega.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/quote/Quote.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/quote/g_quote.ml4 less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/quote/quote.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/ring/LegacyArithRing.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/ring/LegacyNArithRing.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/ring/LegacyRing.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/ring/LegacyRing_theory.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/ring/LegacyZArithRing.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/ring/Ring_abstract.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/ring/Ring_normalize.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/ring/Setoid_ring.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/ring/Setoid_ring_normalize.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/ring/Setoid_ring_theory.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/ring/g_ring.ml4 less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/ring/ring.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/rtauto/Bintree.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/rtauto/Rtauto.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/rtauto/g_rtauto.ml4 less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/rtauto/proof_search.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/rtauto/proof_search.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/rtauto/refl_tauto.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/rtauto/refl_tauto.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/setoid_ring/ArithRing.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/setoid_ring/BinList.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/setoid_ring/Cring.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/setoid_ring/Field.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/setoid_ring/Field_tac.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/setoid_ring/Field_theory.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/setoid_ring/InitialRing.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/setoid_ring/NArithRing.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/setoid_ring/Ncring.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/setoid_ring/Ncring_initial.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/setoid_ring/Ncring_polynom.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/setoid_ring/Ncring_tac.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/setoid_ring/Ring.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/setoid_ring/Ring_base.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/setoid_ring/Ring_polynom.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/setoid_ring/Ring_theory.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/setoid_ring/ZArithRing.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/setoid_ring/newring.ml4 less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/subtac/eterm.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/subtac/g_subtac.ml4 less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/subtac/subtac.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+3

-3

plugins/subtac/subtac_cases.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

410	410	let _ = e_cumul pb.env pb.isevars indt typ in
411	411	current
412	412	else
413		(evd_comb2 (Coercion.inh_conv_coerce_to dummy_loc pb.env)
	413	(evd_comb2 (Coercion.inh_conv_coerce_to true dummy_loc pb.env)
414	414	pb.isevars (make_judge current typ) (mk_tycon_type indt)).uj_val in
415	415	let sigma = !(pb.isevars) in
416	416	let typ = IsInd (indt,find_rectype pb.env sigma indt) in

1477	1477	let inh_conv_coerce_to_tycon loc env isevars j tycon =
1478	1478	match tycon with
1479	1479	\| Some p ->
1480		let (evd',j) = Coercion.inh_conv_coerce_to loc env !isevars j p in
	1480	let (evd',j) = Coercion.inh_conv_coerce_to true loc env !isevars j p in
1481	1481	isevars := evd';
1482	1482	j
1483	1483	\| None -> j

+1

-1

plugins/subtac/subtac_cases.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/subtac/subtac_classes.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/subtac/subtac_classes.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+4

-4

plugins/subtac/subtac_coercion.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

357	357	(hj,typ_cl) p)
358	358	with e when Errors.noncritical e -> anomaly "apply_coercion"
359	359
360		let inh_app_fun env isevars j =
	360	let inh_app_fun _ env isevars j =
361	361	let isevars = ref isevars in
362	362	let t = hnf env !isevars j.uj_type in
363	363	match kind_of_term t with

480	480	\| Some (init, cur) ->
481	481	(evd, cj)
482	482
483		let inh_conv_coerce_to = inh_conv_coerce_to_gen false
484		let inh_conv_coerce_rigid_to = inh_conv_coerce_to_gen true
	483	let inh_conv_coerce_to _ = inh_conv_coerce_to_gen false
	484	let inh_conv_coerce_rigid_to _ = inh_conv_coerce_to_gen true
485	485
486	486	let inh_conv_coerces_to loc env isevars t ((abs, t') as _tycon) =
487	487	let nabsinit, nabs =

+2

-2

plugins/subtac/subtac_pretyping.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

62	62	(* str " in environment: " ++ my_print_env env); *)
63	63
64	64	let interp env isevars c tycon =
65		let j = pretype tycon env isevars ([],[]) c in
	65	let j = pretype true tycon env isevars ([],[]) c in
66	66	let _ = isevars := Evarutil.nf_evar_map !isevars in
67	67	let evd = consider_remaining_unif_problems env !isevars in
68	68	(* let unevd = undefined_evars evd in *)

+14

-11

plugins/subtac/subtac_pretyping_F.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

86	86	done
87	87
88	88	(* coerce to tycon if any *)
89		let inh_conv_coerce_to_tycon loc env evdref j = function
	89	let inh_conv_coerce_to_tycon resolve_tc loc env evdref j = function
90	90	\| None -> j
91		\| Some t -> evd_comb2 (Coercion.inh_conv_coerce_to loc env) evdref j t
	91	\| Some t -> evd_comb2 (Coercion.inh_conv_coerce_to resolve_tc loc env) evdref j t
92	92
93	93	let push_rels vars env = List.fold_right push_rel vars env
94	94

187	187	(* [pretype tycon env evdref lvar lmeta cstr] attempts to type [cstr] *)
188	188	(* in environment [env], with existential variables [( evdref)] and *)
189	189	(* the type constraint tycon *)
190		let rec pretype (tycon : type_constraint) env evdref lvar c =
	190	let rec pretype resolve_tc (tycon : type_constraint) env evdref lvar c =
191	191	(* let _ = try Subtac_utils.trace (str "pretype " ++ Subtac_utils.my_print_glob_constr env c ++ *)
192	192	(* str " with tycon " ++ Evarutil.pr_tycon env tycon) *)
193	193	(* with _ -> () *)
194	194	(* in *)
	195	let pretype = pretype resolve_tc in
	196	let pretype_type = pretype_type resolve_tc in
	197	let inh_conv_coerce_to_tycon = inh_conv_coerce_to_tycon resolve_tc in
195	198	match c with
196	199	\| GRef (loc,ref) ->
197	200	inh_conv_coerce_to_tycon loc env evdref

334	337	\| [] -> resj
335	338	\| c::rest ->
336	339	let argloc = loc_of_glob_constr c in
337		let resj = evd_comb1 (Coercion.inh_app_fun env) evdref resj in
	340	let resj = evd_comb1 (Coercion.inh_app_fun resolve_tc env) evdref resj in
338	341	let resty = whd_betadeltaiota env !evdref resj.uj_type in
339	342	match kind_of_term resty with
340	343	\| Prod (na,c1,c2) ->

556	559	inh_conv_coerce_to_tycon loc env evdref cj tycon
557	560
558	561	(* [pretype_type valcon env evdref lvar c] coerces [c] into a type *)
559		and pretype_type valcon env evdref lvar = function
	562	and pretype_type resolve_tc valcon env evdref lvar = function
560	563	\| GHole loc ->
561	564	(match valcon with
562	565	\| Some v ->

576	579	{ utj_val = e_new_evar evdref env ~src:loc (mkSort s);
577	580	utj_type = s})
578	581	\| c ->
579		let j = pretype empty_tycon env evdref lvar c in
	582	let j = pretype resolve_tc empty_tycon env evdref lvar c in
580	583	let loc = loc_of_glob_constr c in
581	584	let tj = evd_comb1 (Coercion.inh_coerce_to_sort loc env) evdref j in
582	585	match valcon with

591	594	let c' = match kind with
592	595	\| OfType exptyp ->
593	596	let tycon = match exptyp with None -> empty_tycon \| Some t -> mk_tycon t in
594		(pretype tycon env evdref lvar c).uj_val
	597	(pretype resolve_classes tycon env evdref lvar c).uj_val
595	598	\| IsType ->
596		(pretype_type empty_valcon env evdref lvar c).utj_val
	599	(pretype_type resolve_classes empty_valcon env evdref lvar c).utj_val
597	600	in
598	601	if resolve_classes then
599	602	(try

615	618
616	619	let understand_judgment sigma env c =
617	620	let evdref = ref (create_evar_defs sigma) in
618		let j = pretype empty_tycon env evdref ([],[]) c in
	621	let j = pretype true empty_tycon env evdref ([],[]) c in
619	622	let evd = consider_remaining_unif_problems env !evdref in
620	623	let j = j_nf_evar evd j in
621	624	check_evars env sigma evd (mkCast(j.uj_val,DEFAULTcast, j.uj_type));
622	625	j
623	626
624	627	let understand_judgment_tcc evdref env c =
625		let j = pretype empty_tycon env evdref ([],[]) c in
	628	let j = pretype true empty_tycon env evdref ([],[]) c in
626	629	j_nf_evar !evdref j
627	630
628	631	(* Raw calls to the unsafe inference machine: boolean says if we must

+1

-1

plugins/syntax/nat_syntax.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/syntax/numbers_syntax.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/syntax/r_syntax.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/syntax/z_syntax.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

plugins/xml/dumptree.ml4 less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

pretyping/arguments_renaming.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

pretyping/arguments_renaming.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+3

-3

pretyping/cases.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

390	390	let _ = e_cumul pb.env pb.evdref indt typ in
391	391	current
392	392	else
393		(evd_comb2 (Coercion.inh_conv_coerce_to dummy_loc pb.env)
	393	(evd_comb2 (Coercion.inh_conv_coerce_to true dummy_loc pb.env)
394	394	pb.evdref (make_judge current typ) (mk_tycon_type indt)).uj_val in
395	395	let sigma = !(pb.evdref) in
396	396	(current,try_find_ind pb.env sigma indt names))

1679	1679	let inh_conv_coerce_to_tycon loc env evdref j tycon =
1680	1680	match tycon with
1681	1681	\| Some p ->
1682		let (evd',j) = Coercion.inh_conv_coerce_to loc env !evdref j p in
	1682	let (evd',j) = Coercion.inh_conv_coerce_to true loc env !evdref j p in
1683	1683	evdref := evd';
1684	1684	j
1685	1685	\| None -> j

+1

-1

pretyping/cases.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

pretyping/cbv.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

pretyping/cbv.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

pretyping/classops.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

pretyping/classops.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+14

-10

pretyping/coercion.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

35	35	inserts a coercion into [j], if needed, in such a way it gets as
36	36	type a product; it returns [j] if no coercion is applicable *)
37	37	val inh_app_fun :
38		env -> evar_map -> unsafe_judgment -> evar_map * unsafe_judgment
	38	bool -> env -> evar_map -> unsafe_judgment -> evar_map * unsafe_judgment
39	39
40	40	(* [inh_coerce_to_sort env evd j] coerces [j] to a type; i.e. it
41	41	inserts a coercion into [j], if needed, in such a way it gets as

56	56	(* [inh_conv_coerce_to loc env evd j t] coerces [j] to an object of type
57	57	[t]; i.e. it inserts a coercion into [j], if needed, in such a way [t] and
58	58	[j.uj_type] are convertible; it fails if no coercion is applicable *)
59		val inh_conv_coerce_to : loc ->
	59	val inh_conv_coerce_to : bool -> loc ->
60	60	env -> evar_map -> unsafe_judgment -> type_constraint_type -> evar_map * unsafe_judgment
61	61
62		val inh_conv_coerce_rigid_to : loc ->
	62	val inh_conv_coerce_rigid_to : bool -> loc ->
63	63	env -> evar_map -> unsafe_judgment -> type_constraint_type -> evar_map * unsafe_judgment
64	64
65	65	(* [inh_conv_coerces_to loc env evd t t'] checks if an object of type [t]

139	139	lookup_path_to_fun_from env evd j.uj_type in
140	140	(evd,apply_coercion env evd p j t)
141	141
142		let inh_app_fun env evd j =
	142	let inh_app_fun resolve_tc env evd j =
143	143	try inh_app_fun env evd j
144		with Not_found ->
	144	with
	145	\| Not_found when not resolve_tc -> (evd, j)
	146	\| Not_found ->
145	147	try inh_app_fun env (saturate_evd env evd) j
146	148	with Not_found -> (evd, j)
147	149

220	222	\| _ -> raise NoCoercion
221	223
222	224	(* Look for cj' obtained from cj by inserting coercions, s.t. cj'.typ = t *)
223		let inh_conv_coerce_to_gen rigidonly loc env evd cj (n, t) =
	225	let inh_conv_coerce_to_gen resolve_tc rigidonly loc env evd cj (n, t) =
224	226	match n with
225	227	None ->
226	228	let (evd', val') =
227	229	try
228	230	inh_conv_coerce_to_fail loc env evd rigidonly (Some cj.uj_val) cj.uj_type t
229		with NoCoercion ->
	231	with
	232	\| NoCoercion when not resolve_tc -> error_actual_type_loc loc env evd cj t
	233	\| NoCoercion ->
230	234	let evd = saturate_evd env evd in
231	235	try
232	236	inh_conv_coerce_to_fail loc env evd rigidonly (Some cj.uj_val) cj.uj_type t

237	241	(evd',{ uj_val = val'; uj_type = t })
238	242	\| Some (init, cur) -> (evd, cj)
239	243
240		let inh_conv_coerce_to = inh_conv_coerce_to_gen false
241		let inh_conv_coerce_rigid_to = inh_conv_coerce_to_gen true
	244	let inh_conv_coerce_to resolve_tc = inh_conv_coerce_to_gen resolve_tc false
	245	let inh_conv_coerce_rigid_to resolve_tc = inh_conv_coerce_to_gen resolve_tc true
242	246
243	247
244	248	let inh_conv_coerces_to loc env (evd : evar_map) t (abs, t') =

+12

-8

pretyping/coercion.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

17	17	module type S = sig
18	18	(** {6 Coercions. } *)
19	19
20		(** [inh_app_fun env isevars j] coerces [j] to a function; i.e. it
	20	(** [inh_app_fun resolve_tc env isevars j] coerces [j] to a function; i.e. it
21	21	inserts a coercion into [j], if needed, in such a way it gets as
22		type a product; it returns [j] if no coercion is applicable *)
	22	type a product; it returns [j] if no coercion is applicable.
	23	resolve_tc=false disables resolving type classes (as the last
	24	resort before failing) *)
23	25	val inh_app_fun :
24		env -> evar_map -> unsafe_judgment -> evar_map * unsafe_judgment
	26	bool -> env -> evar_map -> unsafe_judgment -> evar_map * unsafe_judgment
25	27
26	28	(** [inh_coerce_to_sort env isevars j] coerces [j] to a type; i.e. it
27	29	inserts a coercion into [j], if needed, in such a way it gets as

39	41	val inh_coerce_to_prod : loc ->
40	42	env -> evar_map -> type_constraint_type -> evar_map * type_constraint_type
41	43
42		(** [inh_conv_coerce_to loc env isevars j t] coerces [j] to an object of type
	44	(** [inh_conv_coerce_to resolve_tc loc env isevars j t] coerces [j] to an object of type
43	45	[t]; i.e. it inserts a coercion into [j], if needed, in such a way [t] and
44		[j.uj_type] are convertible; it fails if no coercion is applicable *)
45		val inh_conv_coerce_to : loc ->
	46	[j.uj_type] are convertible; it fails if no coercion is applicable.
	47	resolve_tc=false disables resolving type classes (as the last
	48	resort before failing) *)
	49	val inh_conv_coerce_to : bool -> loc ->
46	50	env -> evar_map -> unsafe_judgment -> type_constraint_type -> evar_map * unsafe_judgment
47	51
48		val inh_conv_coerce_rigid_to : loc ->
	52	val inh_conv_coerce_rigid_to : bool -> loc ->
49	53	env -> evar_map -> unsafe_judgment -> type_constraint_type -> evar_map * unsafe_judgment
50	54
51	55	(** [inh_conv_coerces_to loc env isevars t t'] checks if an object of type [t]

+1

-1

pretyping/detyping.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

pretyping/detyping.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+19

-1

pretyping/evarconv.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

18	18	open Evarutil
19	19	open Libnames
20	20	open Evd
	21
	22	let debug_unification = ref (false)
	23	let _ = Goptions.declare_bool_option {
	24	Goptions.optsync = true; Goptions.optdepr = false;
	25	Goptions.optname =
	26	"Print states sended to Evarconv unification";
	27	Goptions.optkey = ["Debug";"Unification"];
	28	Goptions.optread = (fun () -> !debug_unification);
	29	Goptions.optwrite = (fun a -> debug_unification:=a);
	30	}
	31
21	32
22	33	type flex_kind_of_term =
23	34	\| Rigid of constr

209	220	in
210	221
211	222	(* Evar must be undefined since we have flushed evars *)
	223	let () = if !debug_unification then
	224	let open Pp in
	225	let pr_state (tm,l) =
	226	h 0 (Termops.print_constr tm ++ str "\|" ++ cut ()
	227	++ prlist_with_sep pr_semicolon
	228	(fun x -> hov 1 (Termops.print_constr x)) l) in
	229	pp (v 0 (pr_state appr1 ++ cut () ++ pr_state appr2 ++ cut ()) ++ fnl ()) in
212	230	match (flex_kind_of_term term1 l1, flex_kind_of_term term2 l2) with
213	231	\| Flexible (sp1,al1 as ev1), Flexible (sp2,al2 as ev2) ->
214	232	let f1 i =

+1

-1

pretyping/evarconv.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+26

-11

pretyping/evarutil.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

1179	1179	* such that "hyps' \|- ?e : T"
1180	1180	*)
1181	1181
1182		let filter_candidates evd evk filter candidates =
	1182	let filter_effective_candidates evi filter candidates =
	1183	match filter with
	1184	\| None -> candidates
	1185	\| Some filter ->
	1186	let ids = List.map pi1 (list_filter_with filter (evar_context evi)) in
	1187	List.filter (fun a -> list_subset (Idset.elements (collect_vars a)) ids)
	1188	candidates
	1189
	1190	let filter_candidates evd evk filter candidates_update =
1183	1191	let evi = Evd.find_undefined evd evk in
1184		let candidates = match candidates with
	1192	let candidates = match candidates_update with
1185	1193	\| None -> evi.evar_candidates
1186		\| Some _ -> candidates in
1187		match candidates,filter with
1188		\| None,_ \| _, None -> candidates
1189		\| Some l, Some filter ->
1190		let ids = List.map pi1 (list_filter_with filter (evar_context evi)) in
1191		Some (List.filter (fun a ->
1192		list_subset (Idset.elements (collect_vars a)) ids) l)
	1194	\| Some _ -> candidates_update
	1195	in
	1196	match candidates with
	1197	\| None -> None
	1198	\| Some l ->
	1199	let l' = filter_effective_candidates evi filter l in
	1200	if List.length l = List.length l' && candidates_update = None then
	1201	None
	1202	else
	1203	Some l'
1193	1204
1194	1205	let closure_of_filter evd evk filter =
1195	1206	let evi = Evd.find_undefined evd evk in

1529	1540
1530	1541	exception NotInvertibleUsingOurAlgorithm of constr
1531	1542	exception NotEnoughInformationToProgress of (identifier * evar_projection) list
	1543	exception NotEnoughInformationEvarEvar of constr
1532	1544	exception OccurCheckIn of evar_map * constr
1533	1545
1534	1546	let rec invert_definition conv_algo choose env evd (evk,argsv as ev) rhs =

1607	1619	with
1608	1620	\| EvarSolvedOnTheFly (evd,t) -> evdref:=evd; imitate envk t
1609	1621	\| CannotProject filter' ->
1610		assert !progress;
	1622	if not !progress then
	1623	raise (NotEnoughInformationEvarEvar t);
1611	1624	(* Make the virtual left evar real *)
1612	1625	let ty = get_type_of env' !evdref t in
1613	1626	let (evd,evar'',ev'') =

1713	1726	with
1714	1727	\| NotEnoughInformationToProgress sols ->
1715	1728	postpone_non_unique_projection env evd ev sols rhs
	1729	\| NotEnoughInformationEvarEvar t ->
	1730	add_conv_pb (Reduction.CONV,env,mkEvar ev,t) evd
1716	1731	\| NotInvertibleUsingOurAlgorithm t ->
1717	1732	error_not_clean env evd evk t (evar_source evk evd)
1718	1733	\| OccurCheckIn (evd,rhs) ->

+1

-1

pretyping/evarutil.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

pretyping/evd.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

pretyping/evd.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-22

pretyping/glob_term.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

358	358	PatCstr (loc,cstr,args,na)
359	359	\| _ -> raise Not_found
360	360
361		let rec cases_pattern_of_glob_constr na = function
362		\| GVar (loc,id) when na<>Anonymous ->
363		(* Unable to manage the presence of both an alias and a variable *)
364		raise Not_found
365		\| GVar (loc,id) -> PatVar (loc,Name id)
366		\| GHole (loc,_) -> PatVar (loc,na)
367		\| GRef (loc,ConstructRef cstr) ->
368		PatCstr (loc,cstr,[],na)
369		\| GApp (loc,GRef (_,ConstructRef (ind,_ as cstr)),args) ->
370		let mib,_ = Global.lookup_inductive ind in
371		let nparams = mib.Declarations.mind_nparams in
372		if nparams > List.length args then
373		user_err_loc (loc,"",Pp.str "Invalid notation for pattern.");
374		let params,args = list_chop nparams args in
375		List.iter (function GHole _ -> ()
376		\| _ -> user_err_loc (loc,"",Pp.str"Invalid notation for pattern."))
377		params;
378		let args = List.map (cases_pattern_of_glob_constr Anonymous) args in
379		PatCstr (loc,cstr,args,na)
380		\| _ -> raise Not_found
381
382	361	(* Turn a closed cases pattern into a glob_constr *)
383	362	let rec glob_constr_of_closed_cases_pattern_aux = function
384	363	\| PatCstr (loc,cstr,[],Anonymous) ->

+1

-1

pretyping/glob_term.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

pretyping/indrec.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

pretyping/indrec.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

pretyping/inductiveops.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

pretyping/inductiveops.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

pretyping/matching.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

pretyping/matching.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

pretyping/namegen.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

pretyping/namegen.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

pretyping/pattern.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

pretyping/pattern.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

pretyping/pretype_errors.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

pretyping/pretype_errors.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+24

-19

pretyping/pretyping.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

199	199	* Unused outside, but useful for debugging
200	200	*)
201	201	val pretype :
202		type_constraint -> env -> evar_map ref ->
	202	bool -> type_constraint -> env -> evar_map ref ->
203	203	ltac_var_map -> glob_constr -> unsafe_judgment
204	204
205	205	val pretype_type :
206		val_constraint -> env -> evar_map ref ->
	206	bool -> val_constraint -> env -> evar_map ref ->
207	207	ltac_var_map -> glob_constr -> unsafe_type_judgment
208	208
209	209	val pretype_gen :

258	258	done
259	259
260	260	(* coerce to tycon if any *)
261		let inh_conv_coerce_to_tycon loc env evdref j = function
	261	let inh_conv_coerce_to_tycon resolve_tc loc env evdref j = function
262	262	\| None -> j
263		\| Some t -> evd_comb2 (Coercion.inh_conv_coerce_to loc env) evdref j t
	263	\| Some t -> evd_comb2 (Coercion.inh_conv_coerce_to resolve_tc loc env) evdref j t
264	264
265	265	let push_rels vars env = List.fold_right push_rel vars env
266	266

296	296	let c = substl subst c in
297	297	{ uj_val = c; uj_type = protected_get_type_of env sigma c }
298	298	with Not_found ->
299		(* Check if [id] is a section or goal variable *)
300		try
301		let (_,_,typ) = lookup_named id env in
302		{ uj_val = mkVar id; uj_type = typ }
303		with Not_found ->
304		(* [id] not found, build nice error message if [id] yet known from ltac *)
	299	(* if [id] an ltac variable not bound to a term *)
	300	(* build a nice error message *)
305	301	try
306	302	match List.assoc id unbndltacvars with
307	303	\| None -> user_err_loc (loc,"",
308	304	str "Variable " ++ pr_id id ++ str " should be bound to a term.")
309	305	\| Some id0 -> Pretype_errors.error_var_not_found_loc loc id0
	306	with Not_found ->
	307	(* Check if [id] is a section or goal variable *)
	308	try
	309	let (_,_,typ) = lookup_named id env in
	310	{ uj_val = mkVar id; uj_type = typ }
310	311	with Not_found ->
311	312	(* [id] not found, standard error message *)
312	313	error_var_not_found_loc loc id

345	346	(* [pretype tycon env evdref lvar lmeta cstr] attempts to type [cstr] *)
346	347	(* in environment [env], with existential variables [evdref] and *)
347	348	(* the type constraint tycon *)
348		let rec pretype (tycon : type_constraint) env evdref lvar = function
	349	let rec pretype resolve_tc (tycon : type_constraint) env evdref lvar t =
	350	let pretype = pretype resolve_tc in
	351	let pretype_type = pretype_type resolve_tc in
	352	let inh_conv_coerce_to_tycon = inh_conv_coerce_to_tycon resolve_tc in
	353	match t with
349	354	\| GRef (loc,ref) ->
350	355	inh_conv_coerce_to_tycon loc env evdref
351	356	(pretype_ref loc evdref env ref)

458	463	\| [] -> resj
459	464	\| c::rest ->
460	465	let argloc = loc_of_glob_constr c in
461		let resj = evd_comb1 (Coercion.inh_app_fun env) evdref resj in
	466	let resj = evd_comb1 (Coercion.inh_app_fun resolve_tc env) evdref resj in
462	467	let resty = whd_betadeltaiota env !evdref resj.uj_type in
463	468	match kind_of_term resty with
464	469	\| Prod (na,c1,c2) ->

695	700	in inh_conv_coerce_to_tycon loc env evdref cj tycon
696	701
697	702	(* [pretype_type valcon env evdref lvar c] coerces [c] into a type *)
698		and pretype_type valcon env evdref lvar = function
	703	and pretype_type resolve_tc valcon env evdref lvar = function
699	704	\| GHole loc ->
700	705	(match valcon with
701	706	\| Some v ->

715	720	{ utj_val = e_new_evar evdref env ~src:loc (mkSort s);
716	721	utj_type = s})
717	722	\| c ->
718		let j = pretype empty_tycon env evdref lvar c in
	723	let j = pretype resolve_tc empty_tycon env evdref lvar c in
719	724	let loc = loc_of_glob_constr c in
720	725	let tj = evd_comb1 (Coercion.inh_coerce_to_sort loc env) evdref j in
721	726	match valcon with

730	735	let c' = match kind with
731	736	\| OfType exptyp ->
732	737	let tycon = match exptyp with None -> empty_tycon \| Some t -> mk_tycon t in
733		(pretype tycon env evdref lvar c).uj_val
	738	(pretype resolve_classes tycon env evdref lvar c).uj_val
734	739	\| IsType ->
735		(pretype_type empty_valcon env evdref lvar c).utj_val
	740	(pretype_type resolve_classes empty_valcon env evdref lvar c).utj_val
736	741	in
737	742	resolve_evars env evdref fail_evar resolve_classes;
738	743	let c = if expand_evar then nf_evar !evdref c' else c' in

746	751
747	752	let understand_judgment sigma env c =
748	753	let evdref = ref sigma in
749		let j = pretype empty_tycon env evdref ([],[]) c in
	754	let j = pretype true empty_tycon env evdref ([],[]) c in
750	755	resolve_evars env evdref true true;
751	756	let j = j_nf_evar !evdref j in
752	757	check_evars env sigma !evdref (mkCast(j.uj_val,DEFAULTcast, j.uj_type));
753	758	j
754	759
755	760	let understand_judgment_tcc evdref env c =
756		let j = pretype empty_tycon env evdref ([],[]) c in
	761	let j = pretype true empty_tycon env evdref ([],[]) c in
757	762	resolve_evars env evdref false true;
758	763	j_nf_evar !evdref j
759	764

+3

-3

pretyping/pretyping.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

92	92	(/)
93	93	(** Internal of Pretyping... *)
94	94	val pretype :
95		type_constraint -> env -> evar_map ref ->
	95	bool -> type_constraint -> env -> evar_map ref ->
96	96	ltac_var_map -> glob_constr -> unsafe_judgment
97	97
98	98	val pretype_type :
99		val_constraint -> env -> evar_map ref ->
	99	bool -> val_constraint -> env -> evar_map ref ->
100	100	ltac_var_map -> glob_constr -> unsafe_type_judgment
101	101
102	102	val pretype_gen :

+1

-1

pretyping/recordops.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

pretyping/recordops.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

pretyping/reductionops.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

pretyping/reductionops.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

pretyping/retyping.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

pretyping/retyping.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

pretyping/tacred.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

pretyping/tacred.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

pretyping/term_dnet.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

pretyping/term_dnet.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

pretyping/termops.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

pretyping/termops.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

pretyping/typeclasses.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

pretyping/typeclasses.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

pretyping/typeclasses_errors.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

pretyping/typeclasses_errors.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

pretyping/typing.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

pretyping/typing.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+2

-2

pretyping/unification.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

793	793
794	794	let try_to_coerce env evd c cty tycon =
795	795	let j = make_judge c cty in
796		let (evd',j') = inh_conv_coerce_rigid_to dummy_loc env evd j tycon in
	796	let (evd',j') = inh_conv_coerce_rigid_to true dummy_loc env evd j tycon in
797	797	let evd' = Evarconv.consider_remaining_unif_problems env evd' in
798	798	let evd' = Evd.map_metas_fvalue (nf_evar evd') evd' in
799	799	(evd',j'.uj_val)

+1

-1

pretyping/unification.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

pretyping/vnorm.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

pretyping/vnorm.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

proofs/clenv.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

proofs/clenv.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

proofs/clenvtac.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

proofs/clenvtac.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

proofs/evar_refiner.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

proofs/evar_refiner.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+2

-2

proofs/goal.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

154	154	let j = Environ.make_judge t my_type in
155	155	let tycon = Evarutil.mk_tycon_type typ in
156	156	let (new_defs,j') =
157		Coercion.Default.inh_conv_coerce_to (Util.dummy_loc) env !rdefs j tycon
	157	Coercion.Default.inh_conv_coerce_to true (Util.dummy_loc) env !rdefs j tycon
158	158	in
159	159	rdefs := new_defs;
160	160	j'.Environ.uj_val

+1

-1

proofs/goal.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

proofs/logic.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

proofs/logic.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

proofs/pfedit.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

proofs/pfedit.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

proofs/proof.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

proofs/proof.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

proofs/proof_global.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

proofs/proof_global.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

proofs/proof_type.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

proofs/proof_type.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

proofs/proofview.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

proofs/proofview.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

proofs/redexpr.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

proofs/redexpr.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

proofs/refiner.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

proofs/refiner.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

proofs/tacexpr.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

proofs/tacmach.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

proofs/tacmach.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

proofs/tactic_debug.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

proofs/tactic_debug.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+7

-9

scripts/coqc.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

56	56	let rec make_compilation_args = function
57	57	\| [] -> []
58	58	\| file :: fl ->
59		let dirname = Filename.dirname file in
60		let basename = Filename.basename file in
61		let modulename =
62		if Filename.check_suffix basename ".v" then
63		Filename.chop_suffix basename ".v"
	59	let name_no_suffix =
	60	if Filename.check_suffix file ".v" then
	61	Filename.chop_suffix file ".v"
64	62	else
65		basename
	63	file
66	64	in
	65	let modulename = Filename.basename name_no_suffix in
67	66	check_module_name modulename;
68		let file = Filename.concat dirname modulename in
69	67	(if !verbose then "-compile-verbose" else "-compile")
70		:: file :: (make_compilation_args fl)
	68	:: name_no_suffix :: (make_compilation_args fl)
71	69
72	70	(* compilation of files [files] with command [command] and args [args] *)
73	71

+1

-1

scripts/coqmktop.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

states/MakeInitial.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+8

-2

tactics/auto.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

893	893	(str"apply " ++ pr_constr c ++ str" ; trivial")
894	894	\| Unfold_nth c -> (str"unfold " ++ pr_evaluable_reference c)
895	895	\| Extern tac ->
896		(str "(external) " ++ Pptactic.pr_glob_tactic (Global.env()) tac)
	896	let env =
	897	try
	898	let (_, env) = Pfedit.get_current_goal_context () in
	899	env
	900	with e when Errors.noncritical e -> Global.env ()
	901	in
	902	(str "(external) " ++ Pptactic.pr_glob_tactic env tac)
897	903
898	904	let pr_hint (id, v) =
899	905	(pr_autotactic v.code ++ str"(level " ++ int v.pri ++ str", id " ++ int id ++ str ")" ++ spc ())

+1

-1

tactics/auto.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

tactics/autorewrite.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

tactics/autorewrite.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

tactics/btermdn.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

tactics/btermdn.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

tactics/class_tactics.ml4 less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

tactics/contradiction.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

tactics/contradiction.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

tactics/eauto.ml4 less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

tactics/eauto.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

tactics/elim.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

tactics/elim.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

tactics/elimschemes.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

tactics/elimschemes.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

tactics/eqdecide.ml4 less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

tactics/eqschemes.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

tactics/eqschemes.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

tactics/equality.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

tactics/equality.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

tactics/evar_tactics.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

tactics/evar_tactics.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

tactics/extraargs.ml4 less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

tactics/extraargs.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+32

-5

tactics/extratactics.ml4 less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

29	29	[ "admit" ] -> [ admit_as_an_axiom ]
30	30	END
31	31
32		let replace_in_clause_maybe_by (sigma1,c1) c2 in_hyp tac =
	32
	33
	34	let classes_dirpath =
	35	make_dirpath (List.map id_of_string ["Classes";"Coq"])
	36
	37	let init_setoid () =
	38	if Libnames.is_dirpath_prefix_of classes_dirpath (Lib.cwd ()) then ()
	39	else Coqlib.check_required_library ["Coq";"Setoids";"Setoid"]
	40
	41
	42	let occurrences_of occs =
	43	let loccs = match occs with
	44	\| n::_ as nl when n < 0 -> (false,List.map (fun n -> ArgArg (abs n)) nl)
	45	\| nl ->
	46	if List.exists (fun n -> n < 0) nl then
	47	error "Illegal negative occurrence number.";
	48	(true, List.map (fun n -> (ArgArg n)) nl)
	49	in
	50	init_setoid ();
	51	{onhyps = Some []; concl_occs =loccs}
	52
	53	let replace_in_clause_maybe_by (sigma1,c1) c2 cl tac =
33	54	Refiner.tclWITHHOLES false
34		(replace_in_clause_maybe_by c1 c2 (glob_in_arg_hyp_to_clause in_hyp))
	55	(replace_in_clause_maybe_by c1 c2 cl)
35	56	sigma1
36	57	(Option.map Tacinterp.eval_tactic tac)
37	58

43	64
44	65	TACTIC EXTEND replace
45	66	["replace" open_constr(c1) "with" constr(c2) in_arg_hyp(in_hyp) by_arg_tac(tac) ]
46		-> [ replace_in_clause_maybe_by c1 c2 in_hyp tac ]
47		END
	67	-> [ replace_in_clause_maybe_by c1 c2 (glob_in_arg_hyp_to_clause in_hyp) tac ]
	68	END
	69
	70	TACTIC EXTEND replace_at
	71	["replace" open_constr(c1) "with" constr(c2) "at" occurrences(occs) by_arg_tac(tac) ]
	72	-> [ replace_in_clause_maybe_by c1 c2 (occurrences_of occs) tac ]
	73	END
	74
48	75
49	76	TACTIC EXTEND replace_term_left
50	77	[ "replace" "->" open_constr(c) in_arg_hyp(in_hyp) ]

+1

-1

tactics/extratactics.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

tactics/hiddentac.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

tactics/hiddentac.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

tactics/hipattern.ml4 less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

tactics/hipattern.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

tactics/inv.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

tactics/inv.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

tactics/leminv.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

tactics/nbtermdn.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

tactics/nbtermdn.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

tactics/refine.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

tactics/refine.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+2

-2

tactics/rewrite.ml4 less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

276	276
277	277	open Tacinterp
278	278	let decompose_applied_relation_expr env sigma flags (is, (c,l)) left2right =
279		let sigma, cbl = Tacinterp.interp_open_constr_with_bindings is env sigma (c,l) in
	279	let sigma, cbl = Tacinterp.interp_open_constr_with_bindings false is env sigma (c,l) in
280	280	decompose_applied_relation env sigma flags (Some (is, (c,l))) cbl left2right
281	281
282	282	let rewrite_db = "rewrite"

+33

-26

tactics/tacinterp.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

966	966	(intern_quantified_hypothesis ist (out_gen rawwit_quant_hyp x))
967	967	\| RedExprArgType ->
968	968	in_gen globwit_red_expr (intern_red_expr ist (out_gen rawwit_red_expr x))
969		\| OpenConstrArgType b ->
970		in_gen (globwit_open_constr_gen b)
971		((),intern_constr ist (snd (out_gen (rawwit_open_constr_gen b) x)))
	969	\| OpenConstrArgType (b1,b2) ->
	970	in_gen (globwit_open_constr_gen (b1,b2))
	971	((),intern_constr ist (snd (out_gen (rawwit_open_constr_gen (b1,b2)) x)))
972	972	\| ConstrWithBindingsArgType ->
973	973	in_gen globwit_constr_with_bindings
974	974	(intern_constr_with_bindings ist (out_gen rawwit_constr_with_bindings x))

1289	1289	let interp_open_constr_gen kind ist =
1290	1290	interp_gen kind ist false true false false
1291	1291
1292		let interp_open_constr ccl ist =
1293		interp_gen (OfType ccl) ist false true false (ccl<>None)
	1292	(* wTC is for retrocompatibility: TC resolution started only if needed *)
	1293	let interp_open_constr ccl wTC ist e s t =
	1294	try interp_gen (OfType ccl) ist false true false (ccl<>None) e s t
	1295	with ex when Pretype_errors.precatchable_exception ex && ccl = None && wTC ->
	1296	interp_gen (OfType ccl) ist false true false true e s t
1294	1297
1295	1298	let interp_pure_open_constr ist =
1296	1299	interp_gen (OfType None) ist false false false false

1332	1335
1333	1336	let interp_open_constr_list =
1334	1337	interp_constr_in_compound_list (fun x -> x) (fun x -> x)
1335		(interp_open_constr None)
	1338	(interp_open_constr None false)
1336	1339
1337	1340	let interp_auto_lemmas ist env sigma lems =
1338	1341	let local_sigma, lems = interp_open_constr_list ist env sigma lems in

1525	1528	with Not_found -> NamedHyp id
1526	1529
1527	1530	let interp_binding ist env sigma (loc,b,c) =
1528		let sigma, c = interp_open_constr None ist env sigma c in
	1531	let sigma, c = interp_open_constr None false ist env sigma c in
1529	1532	sigma, (loc,interp_binding_name ist b,c)
1530	1533
1531	1534	let interp_bindings ist env sigma = function

1540	1543
1541	1544	let interp_constr_with_bindings ist env sigma (c,bl) =
1542	1545	let sigma, bl = interp_bindings ist env sigma bl in
1543		let sigma, c = interp_open_constr None ist env sigma c in
	1546	let sigma, c = interp_open_constr None false ist env sigma c in
1544	1547	sigma, (c,bl)
1545	1548
1546		let interp_open_constr_with_bindings ist env sigma (c,bl) =
	1549	let interp_open_constr_with_bindings wTC ist env sigma (c,bl) =
1547	1550	let sigma, bl = interp_bindings ist env sigma bl in
1548		let sigma, c = interp_open_constr None ist env sigma c in
	1551	let sigma, c = interp_open_constr None wTC ist env sigma c in
1549	1552	sigma, (c, bl)
1550	1553
1551	1554	let loc_of_bindings = function

1553	1556	\| ImplicitBindings l -> loc_of_glob_constr (fst (list_last l))
1554	1557	\| ExplicitBindings l -> pi1 (list_last l)
1555	1558
1556		let interp_open_constr_with_bindings_loc ist env sigma ((c,_),bl as cb) =
	1559	let interp_open_constr_with_bindings_loc wTC ist env sigma ((c,_),bl as cb) =
1557	1560	let loc1 = loc_of_glob_constr c in
1558	1561	let loc2 = loc_of_bindings bl in
1559	1562	let loc = if loc2 = dummy_loc then loc1 else join_loc loc1 loc2 in
1560		let sigma, cb = interp_open_constr_with_bindings ist env sigma cb in
	1563	let sigma, cb = interp_open_constr_with_bindings wTC ist env sigma cb in
1561	1564	sigma, (loc,cb)
1562	1565
1563	1566	let interp_induction_arg ist gl arg =

1753	1756	let mk_constr_value ist gl c =
1754	1757	let (sigma,c_interp) = pf_interp_constr ist gl c in
1755	1758	sigma,VConstr ([],c_interp)
1756		let mk_open_constr_value ist gl c =
1757		let (sigma,c_interp) = pf_apply (interp_open_constr None ist) gl c in
	1759	let mk_open_constr_value wTC ist gl c =
	1760	let (sigma,c_interp) = pf_apply (interp_open_constr None wTC ist) gl c in
1758	1761	sigma,VConstr ([],c_interp)
1759	1762	let mk_hyp_value ist gl c = VConstr ([],mkVar (interp_hyp ist gl c))
1760	1763	let mk_int_or_var_value ist c = VInteger (interp_int_or_var ist c)

2131	2134	let (sigma,r_interp) = pf_interp_red_expr ist gl (out_gen globwit_red_expr x) in
2132	2135	evdref := sigma;
2133	2136	in_gen wit_red_expr r_interp
2134		\| OpenConstrArgType casted ->
2135		in_gen (wit_open_constr_gen casted)
2136		(interp_open_constr (if casted then Some (pf_concl gl) else None)
	2137	\| OpenConstrArgType (casted,wTC) ->
	2138	in_gen (wit_open_constr_gen (casted,wTC))
	2139	(interp_open_constr (if casted then Some (pf_concl gl) else None) wTC
2137	2140	ist (pf_env gl) (project gl)
2138		(snd (out_gen (globwit_open_constr_gen casted) x)))
	2141	(snd (out_gen (globwit_open_constr_gen (casted,wTC)) x)))
2139	2142	\| ConstrWithBindingsArgType ->
2140	2143	in_gen wit_constr_with_bindings
2141	2144	(pack_sigma (interp_constr_with_bindings ist (pf_env gl) (project gl)

2331	2334	(h_vm_cast_no_check c_interp)
2332	2335	\| TacApply (a,ev,cb,cl) ->
2333	2336	let sigma, l =
2334		list_fold_map (interp_open_constr_with_bindings_loc ist env) sigma cb
	2337	list_fold_map (interp_open_constr_with_bindings_loc true ist env) sigma cb
2335	2338	in
2336	2339	let tac = match cl with
2337	2340	\| None -> h_apply a ev

2546	2549	(* Equality and inversion *)
2547	2550	\| TacRewrite (ev,l,cl,by) ->
2548	2551	let l = List.map (fun (b,m,c) ->
2549		let f env sigma = interp_open_constr_with_bindings ist env sigma c in
	2552	let f env sigma = interp_open_constr_with_bindings false ist env sigma c in
2550	2553	(b,m,f)) l in
2551	2554	let cl = interp_clause ist gl cl in
2552	2555	Equality.general_multi_multi_rewrite ev l cl

2609	2612	let (sigma,v) = mk_constr_value ist gl (out_gen globwit_constr x) in
2610	2613	evdref := sigma;
2611	2614	v
2612		\| OpenConstrArgType false ->
2613		let (sigma,v) = mk_open_constr_value ist gl (snd (out_gen globwit_open_constr x)) in
	2615	\| OpenConstrArgType (false,true) ->
	2616	let (sigma,v) = mk_open_constr_value true ist gl (snd (out_gen globwit_open_constr_wTC x)) in
	2617	evdref := sigma;
	2618	v
	2619	\| OpenConstrArgType (false,false) ->
	2620	let (sigma,v) = mk_open_constr_value false ist gl (snd (out_gen globwit_open_constr x)) in
2614	2621	evdref := sigma;
2615	2622	v
2616	2623	\| ConstrMayEvalArgType ->

3012	3019	(out_gen globwit_quant_hyp x))
3013	3020	\| RedExprArgType ->
3014	3021	in_gen globwit_red_expr (subst_redexp subst (out_gen globwit_red_expr x))
3015		\| OpenConstrArgType b ->
3016		in_gen (globwit_open_constr_gen b)
3017		((),subst_glob_constr subst (snd (out_gen (globwit_open_constr_gen b) x)))
	3022	\| OpenConstrArgType (b1,b2) ->
	3023	in_gen (globwit_open_constr_gen (b1,b2))
	3024	((),subst_glob_constr subst (snd (out_gen (globwit_open_constr_gen (b1,b2)) x)))
3018	3025	\| ConstrWithBindingsArgType ->
3019	3026	in_gen globwit_constr_with_bindings
3020	3027	(subst_glob_with_bindings subst (out_gen globwit_constr_with_bindings x))

+3

-2

tactics/tacinterp.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

133	133
134	134	val interp_bindings : interp_sign -> Environ.env -> Evd.evar_map -> glob_constr_and_expr Glob_term.bindings -> Evd.evar_map * constr Glob_term.bindings
135	135
136		val interp_open_constr_with_bindings : interp_sign -> Environ.env -> Evd.evar_map ->
	136	(* first arguments mean wTC (with type classes resolution) *)
	137	val interp_open_constr_with_bindings : bool -> interp_sign -> Environ.env -> Evd.evar_map ->
137	138	glob_constr_and_expr Glob_term.with_bindings -> Evd.evar_map * constr Glob_term.with_bindings
138	139
139	140	(** Initial call for interpretation *)

+1

-1

tactics/tactic_option.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

tactics/tactic_option.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

tactics/tacticals.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

tactics/tacticals.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

tactics/tactics.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

tactics/tactics.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

tactics/tauto.ml4 less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

tactics/termdn.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

tactics/termdn.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

test-suite/bench/lists-100.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

test-suite/bench/lists_100.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

test-suite/failure/Tauto.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

test-suite/failure/clash_cons.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

test-suite/failure/fixpoint1.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

test-suite/failure/guard.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

test-suite/failure/illtype1.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

test-suite/failure/positivity.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

test-suite/failure/redef.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

test-suite/failure/search.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

test-suite/ideal-features/Apply.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

test-suite/misc/berardi_test.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+8

-8

test-suite/output/Naming.out less more

10	10	x1 : nat
11	11	x4 : nat
12	12	x0 : nat
13		H : forall x x3 : nat, x + x1 = x4 + x3
	13	H : forall x5 x6 : nat, x5 + x1 = x4 + x6
14	14	============================
15	15	x + x1 = x4 + x0
16	16	1 subgoal

50	50	x1 : nat
51	51	x4 : nat
52	52	x0 : nat
53		H : forall x x3 : nat,
54		x + x1 = x4 + x3 ->
55		forall x0 x4 x5 S0 : nat, x0 + S0 = x4 + x5 + (S x + x1)
	53	H : forall x5 x6 : nat,
	54	x5 + x1 = x4 + x6 ->
	55	forall x7 x8 x9 S : nat, x7 + S = x8 + x9 + (Datatypes.S x5 + x1)
56	56	H0 : x + x1 = x4 + x0
57	57	============================
58	58	forall x5 x6 x7 S : nat, x5 + S = x6 + x7 + Datatypes.S x

63	63	x1 : nat
64	64	x4 : nat
65	65	x0 : nat
66		H : forall x x3 : nat,
67		x + x1 = x4 + x3 ->
68		forall x0 x4 x5 S0 : nat, x0 + S0 = x4 + x5 + (S x + x1)
	66	H : forall x5 x6 : nat,
	67	x5 + x1 = x4 + x6 ->
	68	forall x7 x8 x9 S : nat, x7 + S = x8 + x9 + (Datatypes.S x5 + x1)
69	69	H0 : x + x1 = x4 + x0
70	70	x5 : nat
71	71	x6 : nat

77	77
78	78	x3 : nat
79	79	a : nat
80		H : a = 0 -> forall a : nat, a = 0
	80	H : a = 0 -> forall a0 : nat, a0 = 0
81	81	============================
82	82	a = 0

+1

-1

test-suite/success/Check.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

test-suite/success/Field.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

test-suite/success/LegacyField.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

test-suite/success/Tauto.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

test-suite/success/TestRefine.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

test-suite/success/eauto.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

test-suite/success/eqdecide.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

test-suite/success/extraction.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

test-suite/success/inds_type_sec.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

test-suite/success/induct.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

test-suite/success/mutual_ind.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

test-suite/success/unfold.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

test-suite/typeclasses/NewSetoid.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Arith/Arith.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Arith/Arith_base.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Arith/Between.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Arith/Bool_nat.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Arith/Compare.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Arith/Compare_dec.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Arith/Div2.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Arith/EqNat.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Arith/Euclid.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Arith/Even.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Arith/Factorial.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Arith/Gt.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Arith/Le.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Arith/Lt.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Arith/Max.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Arith/Min.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Arith/Minus.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Arith/Mult.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Arith/Peano_dec.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Arith/Wf_nat.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Bool/Bool.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Bool/BoolEq.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Bool/Bvector.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Bool/DecBool.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Bool/IfProp.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Bool/Sumbool.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Bool/Zerob.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Classes/EquivDec.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Classes/Equivalence.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Classes/Init.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Classes/Morphisms.v less more

0	0	(* -- coding: utf-8 -- *)
1	1	(************************************************************************)
2	2	(* v * The Coq Proof Assistant / The Coq Development Team *)
3		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	3	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
4	4	(* \VV/ **************************************************************)
5	5	(* // * This file is distributed under the terms of the *)
6	6	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Classes/Morphisms_Prop.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Classes/Morphisms_Relations.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Classes/RelationClasses.v less more

0	0	(* -- coding: utf-8 -- *)
1	1	(************************************************************************)
2	2	(* v * The Coq Proof Assistant / The Coq Development Team *)
3		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	3	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
4	4	(* \VV/ **************************************************************)
5	5	(* // * This file is distributed under the terms of the *)
6	6	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Classes/SetoidClass.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Classes/SetoidDec.v less more

0	0	(* -- coding: utf-8 -- *)
1	1	(************************************************************************)
2	2	(* v * The Coq Proof Assistant / The Coq Development Team *)
3		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	3	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
4	4	(* \VV/ **************************************************************)
5	5	(* // * This file is distributed under the terms of the *)
6	6	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Classes/SetoidTactics.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Init/Datatypes.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Init/Logic.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Init/Logic_Type.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Init/Notations.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Init/Peano.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Init/Prelude.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Init/Specif.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Init/Tactics.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Init/Wf.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Lists/List.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Lists/ListSet.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Lists/ListTactics.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Lists/StreamMemo.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Lists/Streams.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Logic/Berardi.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Logic/ChoiceFacts.v less more

0	0	(* -- coding: utf-8 -- *)
1	1	(************************************************************************)
2	2	(* v * The Coq Proof Assistant / The Coq Development Team *)
3		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	3	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
4	4	(* \VV/ **************************************************************)
5	5	(* // * This file is distributed under the terms of the *)
6	6	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Logic/Classical.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Logic/ClassicalChoice.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Logic/ClassicalDescription.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Logic/ClassicalEpsilon.v less more

0	0	(* -- coding: utf-8 -- *)
1	1	(************************************************************************)
2	2	(* v * The Coq Proof Assistant / The Coq Development Team *)
3		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	3	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
4	4	(* \VV/ **************************************************************)
5	5	(* // * This file is distributed under the terms of the *)
6	6	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Logic/ClassicalFacts.v less more

0	0	(* -- coding: utf-8 -- *)
1	1	(************************************************************************)
2	2	(* v * The Coq Proof Assistant / The Coq Development Team *)
3		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	3	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
4	4	(* \VV/ **************************************************************)
5	5	(* // * This file is distributed under the terms of the *)
6	6	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Logic/ClassicalUniqueChoice.v less more

0	0	(* -- coding: utf-8 -- *)
1	1	(************************************************************************)
2	2	(* v * The Coq Proof Assistant / The Coq Development Team *)
3		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	3	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
4	4	(* \VV/ **************************************************************)
5	5	(* // * This file is distributed under the terms of the *)
6	6	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Logic/Classical_Pred_Set.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Logic/Classical_Pred_Type.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Logic/Classical_Prop.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Logic/Classical_Type.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Logic/ConstructiveEpsilon.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Logic/Decidable.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Logic/Description.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Logic/Diaconescu.v less more

0	0	(* -- coding: utf-8 -- *)
1	1	(************************************************************************)
2	2	(* v * The Coq Proof Assistant / The Coq Development Team *)
3		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	3	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
4	4	(* \VV/ **************************************************************)
5	5	(* // * This file is distributed under the terms of the *)
6	6	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Logic/Epsilon.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Logic/Eqdep.v less more

0	0	(* -- coding: utf-8 -- *)
1	1	(************************************************************************)
2	2	(* v * The Coq Proof Assistant / The Coq Development Team *)
3		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	3	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
4	4	(* \VV/ **************************************************************)
5	5	(* // * This file is distributed under the terms of the *)
6	6	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Logic/EqdepFacts.v less more

0	0	(* -- coding: utf-8 -- *)
1	1	(************************************************************************)
2	2	(* v * The Coq Proof Assistant / The Coq Development Team *)
3		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	3	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
4	4	(* \VV/ **************************************************************)
5	5	(* // * This file is distributed under the terms of the *)
6	6	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Logic/Eqdep_dec.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Logic/ExtensionalityFacts.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Logic/FunctionalExtensionality.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Logic/Hurkens.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Logic/IndefiniteDescription.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Logic/JMeq.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Logic/ProofIrrelevance.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Logic/ProofIrrelevanceFacts.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Logic/RelationalChoice.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Logic/SetIsType.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/NArith/BinNat.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/NArith/BinNatDef.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/NArith/NArith.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/NArith/Ndec.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/NArith/Ndigits.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/NArith/Ndist.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/NArith/Ndiv_def.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/NArith/Ngcd_def.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/NArith/Nnat.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/NArith/Nsqrt_def.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/BigNumPrelude.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/BinNums.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/Cyclic/Abstract/CyclicAxioms.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/Cyclic/Abstract/NZCyclic.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/Cyclic/DoubleCyclic/DoubleAdd.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/Cyclic/DoubleCyclic/DoubleBase.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/Cyclic/DoubleCyclic/DoubleCyclic.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/Cyclic/DoubleCyclic/DoubleDiv.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/Cyclic/DoubleCyclic/DoubleDivn1.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/Cyclic/DoubleCyclic/DoubleLift.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/Cyclic/DoubleCyclic/DoubleMul.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/Cyclic/DoubleCyclic/DoubleSqrt.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/Cyclic/DoubleCyclic/DoubleSub.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/Cyclic/DoubleCyclic/DoubleType.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/Cyclic/Int31/Cyclic31.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/Cyclic/Int31/Int31.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/Cyclic/Int31/Ring31.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/Cyclic/ZModulo/ZModulo.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/Integer/Abstract/ZAdd.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/Integer/Abstract/ZAddOrder.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/Integer/Abstract/ZAxioms.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/Integer/Abstract/ZBase.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/Integer/Abstract/ZBits.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/Integer/Abstract/ZDivEucl.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/Integer/Abstract/ZDivFloor.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/Integer/Abstract/ZDivTrunc.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/Integer/Abstract/ZGcd.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/Integer/Abstract/ZLcm.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/Integer/Abstract/ZLt.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/Integer/Abstract/ZMaxMin.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/Integer/Abstract/ZMul.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/Integer/Abstract/ZMulOrder.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/Integer/Abstract/ZParity.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/Integer/Abstract/ZPow.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/Integer/Abstract/ZProperties.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/Integer/Abstract/ZSgnAbs.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/Integer/BigZ/BigZ.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/Integer/BigZ/ZMake.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/Integer/Binary/ZBinary.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/Integer/NatPairs/ZNatPairs.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/Integer/SpecViaZ/ZSig.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/Integer/SpecViaZ/ZSigZAxioms.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/NaryFunctions.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/NatInt/NZAdd.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/NatInt/NZAddOrder.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/NatInt/NZAxioms.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/NatInt/NZBase.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/NatInt/NZBits.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/NatInt/NZDiv.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/NatInt/NZDomain.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/NatInt/NZGcd.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/NatInt/NZLog.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/NatInt/NZMul.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/NatInt/NZMulOrder.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/NatInt/NZOrder.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/NatInt/NZParity.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/NatInt/NZPow.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/NatInt/NZProperties.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/NatInt/NZSqrt.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/Natural/Abstract/NAdd.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/Natural/Abstract/NAddOrder.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/Natural/Abstract/NAxioms.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/Natural/Abstract/NBase.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/Natural/Abstract/NBits.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/Natural/Abstract/NDefOps.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/Natural/Abstract/NDiv.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/Natural/Abstract/NGcd.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/Natural/Abstract/NIso.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/Natural/Abstract/NLcm.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/Natural/Abstract/NLog.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/Natural/Abstract/NMaxMin.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/Natural/Abstract/NMulOrder.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/Natural/Abstract/NOrder.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/Natural/Abstract/NParity.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/Natural/Abstract/NPow.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/Natural/Abstract/NProperties.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/Natural/Abstract/NSqrt.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/Natural/Abstract/NStrongRec.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/Natural/Abstract/NSub.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/Natural/BigN/BigN.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/Natural/BigN/NMake.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/Natural/BigN/NMake_gen.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/Natural/BigN/Nbasic.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/Natural/Binary/NBinary.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/Natural/Peano/NPeano.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/Natural/SpecViaZ/NSig.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/Natural/SpecViaZ/NSigNAxioms.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/NumPrelude.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/Rational/BigQ/BigQ.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/Rational/BigQ/QMake.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Numbers/Rational/SpecViaQ/QSig.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/PArith/BinPos.v less more

0	0	(* -- coding: utf-8 -- *)
1	1	(************************************************************************)
2	2	(* v * The Coq Proof Assistant / The Coq Development Team *)
3		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	3	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
4	4	(* \VV/ **************************************************************)
5	5	(* // * This file is distributed under the terms of the *)
6	6	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/PArith/BinPosDef.v less more

0	0	(* -- coding: utf-8 -- *)
1	1	(************************************************************************)
2	2	(* v * The Coq Proof Assistant / The Coq Development Team *)
3		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	3	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
4	4	(* \VV/ **************************************************************)
5	5	(* // * This file is distributed under the terms of the *)
6	6	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/PArith/PArith.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/PArith/POrderedType.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/PArith/Pnat.v less more

0	0	(* -- coding: utf-8 -- *)
1	1	(************************************************************************)
2	2	(* v * The Coq Proof Assistant / The Coq Development Team *)
3		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	3	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
4	4	(* \VV/ **************************************************************)
5	5	(* // * This file is distributed under the terms of the *)
6	6	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Program/Basics.v less more

0	0	(* -- coding: utf-8 -- *)
1	1	(************************************************************************)
2	2	(* v * The Coq Proof Assistant / The Coq Development Team *)
3		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	3	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
4	4	(* \VV/ **************************************************************)
5	5	(* // * This file is distributed under the terms of the *)
6	6	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Program/Combinators.v less more

0	0	(* -- coding: utf-8 -- *)
1	1	(************************************************************************)
2	2	(* v * The Coq Proof Assistant / The Coq Development Team *)
3		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	3	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
4	4	(* \VV/ **************************************************************)
5	5	(* // * This file is distributed under the terms of the *)
6	6	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Program/Equality.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Program/Program.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Program/Subset.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Program/Syntax.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Program/Tactics.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Program/Utils.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Program/Wf.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/QArith/QArith.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/QArith/QArith_base.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/QArith/QOrderedType.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/QArith/Qabs.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/QArith/Qcanon.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/QArith/Qfield.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/QArith/Qminmax.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/QArith/Qpower.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/QArith/Qreals.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/QArith/Qreduction.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/QArith/Qring.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/QArith/Qround.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Reals/Alembert.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Reals/AltSeries.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Reals/ArithProp.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Reals/Binomial.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Reals/Cauchy_prod.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Reals/Cos_plus.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Reals/Cos_rel.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Reals/DiscrR.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Reals/Exp_prop.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Reals/Integration.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Reals/LegacyRfield.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Reals/MVT.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+8

-0

theories/Reals/Machin.v less more

	0	(************************************************************************)
	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
	3	(* \VV/ **************************************************************)
	4	(* // * This file is distributed under the terms of the *)
	5	(* * GNU Lesser General Public License Version 2.1 *)
	6	(************************************************************************)
	7
0	8	Require Import Fourier.
1	9	Require Import Rbase.
2	10	Require Import Rtrigo1.

+1

-1

theories/Reals/NewtonInt.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Reals/PSeries_reg.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Reals/PartSum.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Reals/RIneq.v less more

0	0	(* -- coding: utf-8 -- *)
1	1	(************************************************************************)
2	2	(* v * The Coq Proof Assistant / The Coq Development Team *)
3		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	3	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
4	4	(* \VV/ **************************************************************)
5	5	(* // * This file is distributed under the terms of the *)
6	6	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Reals/RList.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Reals/ROrderedType.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Reals/R_Ifp.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Reals/R_sqr.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Reals/R_sqrt.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Reals/Ranalysis.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Reals/Ranalysis1.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Reals/Ranalysis2.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Reals/Ranalysis3.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Reals/Ranalysis4.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+9

-1

theories/Reals/Ranalysis5.v less more

	0	(************************************************************************)
	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
	3	(* \VV/ **************************************************************)
	4	(* // * This file is distributed under the terms of the *)
	5	(* * GNU Lesser General Public License Version 2.1 *)
	6	(************************************************************************)
	7
0	8	Require Import Rbase.
1	9	Require Import Ranalysis_reg.
2	10	Require Import Rfunctions.

1344	1352	field ; apply Rgt_not_eq ; apply Rabs_pos_lt ; assumption.
1345	1353	assumption.
1346	1354	field. assumption.
1347		Qed.⏎
	1355	Qed.

+1

-1

theories/Reals/Ranalysis_reg.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+8

-0

theories/Reals/Ratan.v less more

	0	(************************************************************************)
	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
	3	(* \VV/ **************************************************************)
	4	(* // * This file is distributed under the terms of the *)
	5	(* * GNU Lesser General Public License Version 2.1 *)
	6	(************************************************************************)
	7
0	8	Require Import Fourier.
1	9	Require Import Rbase.
2	10	Require Import PSeries_reg.

+1

-1

theories/Reals/Raxioms.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Reals/Rbase.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Reals/Rbasic_fun.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Reals/Rcomplete.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Reals/Rdefinitions.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Reals/Rderiv.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Reals/Reals.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Reals/Rfunctions.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Reals/Rgeom.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Reals/RiemannInt.v less more

0	0	(* -- coding: utf-8 -- *)
1	1	(************************************************************************)
2	2	(* v * The Coq Proof Assistant / The Coq Development Team *)
3		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	3	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
4	4	(* \VV/ **************************************************************)
5	5	(* // * This file is distributed under the terms of the *)
6	6	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Reals/RiemannInt_SF.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Reals/Rlimit.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Reals/Rlogic.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Reals/Rminmax.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Reals/Rpow_def.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Reals/Rpower.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Reals/Rprod.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Reals/Rseries.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Reals/Rsigma.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Reals/Rsqrt_def.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Reals/Rtopology.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Reals/Rtrigo.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Reals/Rtrigo1.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Reals/Rtrigo_alt.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Reals/Rtrigo_calc.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Reals/Rtrigo_def.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Reals/Rtrigo_fun.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Reals/Rtrigo_reg.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Reals/SeqProp.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Reals/SeqSeries.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Reals/SplitAbsolu.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Reals/SplitRmult.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Reals/Sqrt_reg.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Relations/Operators_Properties.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Relations/Relation_Definitions.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Relations/Relation_Operators.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Relations/Relations.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Setoids/Setoid.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Sets/Classical_sets.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Sets/Constructive_sets.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Sets/Cpo.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Sets/Ensembles.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Sets/Finite_sets.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Sets/Finite_sets_facts.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Sets/Image.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Sets/Infinite_sets.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Sets/Integers.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Sets/Multiset.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Sets/Partial_Order.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Sets/Permut.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Sets/Powerset.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Sets/Powerset_Classical_facts.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Sets/Powerset_facts.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Sets/Relations_1.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Sets/Relations_1_facts.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Sets/Relations_2.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Sets/Relations_2_facts.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Sets/Relations_3.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Sets/Relations_3_facts.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Sets/Uniset.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Sorting/Heap.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Sorting/Mergesort.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Sorting/PermutEq.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Sorting/PermutSetoid.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Sorting/Permutation.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Sorting/Sorted.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Sorting/Sorting.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Strings/Ascii.v less more

0	0	(* -- coding: utf-8 -- *)
1	1	(************************************************************************)
2	2	(* v * The Coq Proof Assistant / The Coq Development Team *)
3		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	3	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
4	4	(* \VV/ **************************************************************)
5	5	(* // * This file is distributed under the terms of the *)
6	6	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Strings/String.v less more

0	0	(* -- coding: utf-8 -- *)
1	1	(************************************************************************)
2	2	(* v * The Coq Proof Assistant / The Coq Development Team *)
3		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	3	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
4	4	(* \VV/ **************************************************************)
5	5	(* // * This file is distributed under the terms of the *)
6	6	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Unicode/Utf8.v less more

0	0	(* -- coding:utf-8 -- *)
1	1	(************************************************************************)
2	2	(* v * The Coq Proof Assistant / The Coq Development Team *)
3		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	3	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
4	4	(* \VV/ **************************************************************)
5	5	(* // * This file is distributed under the terms of the *)
6	6	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Unicode/Utf8_core.v less more

0	0	(* -- coding:utf-8 -- *)
1	1	(************************************************************************)
2	2	(* v * The Coq Proof Assistant / The Coq Development Team *)
3		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	3	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
4	4	(* \VV/ **************************************************************)
5	5	(* // * This file is distributed under the terms of the *)
6	6	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Wellfounded/Disjoint_Union.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Wellfounded/Inclusion.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Wellfounded/Inverse_Image.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Wellfounded/Lexicographic_Exponentiation.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Wellfounded/Lexicographic_Product.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Wellfounded/Transitive_Closure.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Wellfounded/Union.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Wellfounded/Well_Ordering.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/Wellfounded/Wellfounded.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/ZArith/BinInt.v less more

0	0	(* -- coding: utf-8 -- *)
1	1	(************************************************************************)
2	2	(* v * The Coq Proof Assistant / The Coq Development Team *)
3		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	3	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
4	4	(* \VV/ **************************************************************)
5	5	(* // * This file is distributed under the terms of the *)
6	6	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/ZArith/BinIntDef.v less more

0	0	(* -- coding: utf-8 -- *)
1	1	(************************************************************************)
2	2	(* v * The Coq Proof Assistant / The Coq Development Team *)
3		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	3	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
4	4	(* \VV/ **************************************************************)
5	5	(* // * This file is distributed under the terms of the *)
6	6	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/ZArith/Wf_Z.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/ZArith/ZArith.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/ZArith/ZArith_base.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/ZArith/ZArith_dec.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/ZArith/ZOdiv.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/ZArith/ZOdiv_def.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/ZArith/Zabs.v less more

0	0	(* -- coding: utf-8 -- *)
1	1	(************************************************************************)
2	2	(* v * The Coq Proof Assistant / The Coq Development Team *)
3		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	3	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
4	4	(* \VV/ **************************************************************)
5	5	(* // * This file is distributed under the terms of the *)
6	6	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/ZArith/Zbool.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/ZArith/Zcompare.v less more

0	0	(* -- coding: utf-8 -- *)
1	1	(************************************************************************)
2	2	(* v * The Coq Proof Assistant / The Coq Development Team *)
3		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	3	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
4	4	(* \VV/ **************************************************************)
5	5	(* // * This file is distributed under the terms of the *)
6	6	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/ZArith/Zcomplements.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/ZArith/Zdigits.v less more

0	0	(* -- coding: utf-8 -- *)
1	1	(************************************************************************)
2	2	(* v * The Coq Proof Assistant / The Coq Development Team *)
3		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	3	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
4	4	(* \VV/ **************************************************************)
5	5	(* // * This file is distributed under the terms of the *)
6	6	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/ZArith/Zdiv.v less more

0	0	(* -- coding: utf-8 -- *)
1	1	(************************************************************************)
2	2	(* v * The Coq Proof Assistant / The Coq Development Team *)
3		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	3	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
4	4	(* \VV/ **************************************************************)
5	5	(* // * This file is distributed under the terms of the *)
6	6	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/ZArith/Zeuclid.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/ZArith/Zeven.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/ZArith/Zgcd_alt.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/ZArith/Zhints.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/ZArith/Zlogarithm.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/ZArith/Zmax.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/ZArith/Zmin.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/ZArith/Zminmax.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/ZArith/Zmisc.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/ZArith/Znat.v less more

0	0	(* -- coding: utf-8 -- *)
1	1	(************************************************************************)
2	2	(* v * The Coq Proof Assistant / The Coq Development Team *)
3		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	3	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
4	4	(* \VV/ **************************************************************)
5	5	(* // * This file is distributed under the terms of the *)
6	6	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/ZArith/Znumtheory.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/ZArith/Zorder.v less more

0	0	(* -- coding: utf-8 -- *)
1	1	(************************************************************************)
2	2	(* v * The Coq Proof Assistant / The Coq Development Team *)
3		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	3	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
4	4	(* \VV/ **************************************************************)
5	5	(* // * This file is distributed under the terms of the *)
6	6	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/ZArith/Zpow_alt.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/ZArith/Zpow_def.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/ZArith/Zpow_facts.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/ZArith/Zpower.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/ZArith/Zquot.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/ZArith/Zsqrt_compat.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/ZArith/Zwf.v less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

theories/ZArith/auxiliary.v less more

0	0	(* -- coding: utf-8 -- *)
1	1	(************************************************************************)
2	2	(* v * The Coq Proof Assistant / The Coq Development Team *)
3		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	3	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
4	4	(* \VV/ **************************************************************)
5	5	(* // * This file is distributed under the terms of the *)
6	6	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

tools/compat5.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

tools/compat5.mlp less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

tools/compat5b.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

tools/compat5b.mlp less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

tools/coq_makefile.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

tools/coq_tex.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

tools/coqdep.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

tools/coqdep_boot.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

tools/coqdep_common.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

tools/coqdep_common.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

tools/coqdep_lexer.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

tools/coqdep_lexer.mll less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

tools/coqdoc/alpha.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

tools/coqdoc/alpha.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

tools/coqdoc/cdglobals.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

tools/coqdoc/cpretty.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

tools/coqdoc/cpretty.mll less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

tools/coqdoc/index.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

tools/coqdoc/index.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

tools/coqdoc/main.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

tools/coqdoc/output.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

tools/coqdoc/output.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

tools/coqdoc/tokens.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

tools/coqdoc/tokens.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

tools/coqwc.mll less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

tools/fake_ide.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

tools/gallina.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

tools/gallina_lexer.mll less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

toplevel/auto_ind_decl.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

toplevel/auto_ind_decl.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

toplevel/autoinstance.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

toplevel/autoinstance.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

toplevel/backtrack.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

toplevel/backtrack.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

toplevel/cerrors.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

toplevel/cerrors.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

toplevel/class.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

toplevel/class.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

toplevel/classes.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

toplevel/classes.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

toplevel/command.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

toplevel/command.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+2

-2

toplevel/coqinit.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

9	9	open System
10	10	open Toplevel
11	11
12		let (/) = Filename.concat
	12	let (/) s1 s2 = s1 ^ "/" ^ s2
13	13
14	14	let set_debug () = Flags.debug := true
15	15

+1

-1

toplevel/coqinit.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

toplevel/coqtop.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

toplevel/coqtop.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

toplevel/discharge.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

toplevel/discharge.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

toplevel/himsg.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

toplevel/himsg.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

toplevel/ide_intf.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

toplevel/ide_intf.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

toplevel/ide_slave.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

toplevel/ide_slave.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

toplevel/ind_tables.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

toplevel/ind_tables.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

toplevel/indschemes.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

toplevel/indschemes.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

toplevel/interface.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

toplevel/lemmas.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

toplevel/lemmas.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

toplevel/libtypes.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

toplevel/libtypes.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

toplevel/metasyntax.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

toplevel/metasyntax.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

toplevel/mltop.ml4 less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

toplevel/mltop.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

toplevel/record.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

toplevel/record.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

toplevel/search.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

toplevel/search.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

toplevel/toplevel.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

toplevel/toplevel.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

toplevel/usage.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

toplevel/usage.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

toplevel/vernac.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

toplevel/vernac.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

toplevel/vernacentries.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

toplevel/vernacentries.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

toplevel/vernacexpr.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

toplevel/vernacinterp.ml less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

toplevel/vernacinterp.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

toplevel/whelp.ml4 less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)

+1

-1

toplevel/whelp.mli less more

0	0	(************************************************************************)
1	1	(* v * The Coq Proof Assistant / The Coq Development Team *)
2		(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2012 *)
	2	(* <O___,, * INRIA - CNRS - LIX - LRI - PPS - Copyright 1999-2014 *)
3	3	(* \VV/ **************************************************************)
4	4	(* // * This file is distributed under the terms of the *)
5	5	(* * GNU Lesser General Public License Version 2.1 *)