1. T : IdIdType
2. TA : IdIdType
3. M : IdLnkIdType
4. i:Id(x:IdT(i,x))
5. i:Idaction(w-action-dec(TA;M;i))
6. i:Id({m:Msg(M)| source(mlnk(m)) = i } List)
7. Top
8. l : IdLnk
9. Msg(M) List
10. ms : {x:Msg(M)| (ms.mlnk(ms) = l)(x) }
  2of(ms)  t:IdM(l,t)

1

10. l1 : IdLnk 11. m1 : t:IdM(l1,t) 12. l1 = l   m1  t:IdM(l,t)

4 steps

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