blob: b68902c8cc5904efef22994bc0072c4cb90e0582 (
plain)
1
2
3
4
5
6
7
|
(* -*- coq-prog-args: ("-g") -*- *)
Definition a := 0. #[ (* templatize *) universes( template) ]
Inductive mysum (A B:Type) : Type :=
| myinl : A -> mysum A B
| myinr : B -> mysum A B.
#[local]Definition b := 1.
|