Section foo.
Variable A : Type.
Record bar (X : Type) := mk_bar {
a : X * A;
b : A;
c := (a,7);
_ : X;
_ : X
}.
Inductive baz (X : Type) (Y : Type) : nat -> Type :=
| K1 x (e : 0=1) (f := 3) of x=x:>X : baz X Y O
| K2 n of n=n & baz X nat 0 : baz X Y (n+1).

Axiom Q : nat -> Prop.
Axiom Qx : forall x, Q x.
Axiom my_ind :
forall P : nat -> Prop, P O -> (forall n m (w : P n /\ P m), P (n+m)) ->
forall w, P w.