1. A : Type
2. B : Type
3. a : EqDecider(A)
4. b : EqDecider(B)
5. prod-deq-aux{\\\\v:l,i:l}(A;B;a;b)  (p,q:(AB). p = q  proddeq(a;b)(p,q))
  prod-deq(A;B;a;b) ~ prod-deq-aux{\\\\v:l,i:l}(A;B;a;b)

1

prod-deq(A;B;a;b) ~ (ext{proddeq_DASH_property}{i:l}(A,B,a,b))

1 step

About: IF YOU CAN SEE THIS go to /sfa/Nuprl/Shared/Xindentation_hack_doc.html