File: make_local.v

package info (click to toggle)
coq 8.3.pl4%2Bdfsg-2
  • links: PTS, VCS
  • area: main
  • in suites: wheezy
  • size: 18,404 kB
  • sloc: ml: 134,418; lisp: 2,734; ansic: 1,968; sh: 1,215; makefile: 655
file content (10 lines) | stat: -rw-r--r-- 276 bytes parent folder | download | duplicates (6) 
1
2
3
4
5
6
7
8
9
10
 
(* Used in Import.v to test the locality flag *)

Definition f (A:Type) (a:A) := a.

Local Arguments Scope f [type_scope type_scope].
Local Implicit Arguments f [A].

(* Used in ImportedCoercion.v to test the locality flag *)

Local Coercion g (b:bool) := if b then 0 else 1.