aboutsummaryrefslogtreecommitdiff
path: root/test-suite/output/Inductive.v
blob: 9eec9a7dad6ed361680a89cdc8dafd954764b2fc (plain)
1
2
3
4
5
6
7
Fail Inductive list' (A:Set) : Set :=
| nil' : list' A
| cons' : A -> list' A -> list' (A*A).

(* Check printing of let-ins *)
#[universes(template)] Inductive foo (A : Type) (x : A) (y := x) := Foo.
Print foo.