Def w-action-dec(TA;M;i)(k)
Def == kindcase(k;a.TA(i,a);l,tg.if destination(l) = i M(l,tg) else Void fi)

is mentioned by

Def Action(i) == action(w-action-dec(w.TA;w.M;i))	[w-action]
Def World Def == T:IdIdType Def == TA:IdIdType Def == M:IdLnkIdType Def == (i:Id(x:IdT(i,x)))(i:Idaction(w-action-dec(TA;M;i))) Def == (i:Id({m:Msg(M)| source(mlnk(m)) = i } List))Top	[world]

Try larger context: EventSystems IF YOU CAN SEE THIS go to /sfa/Nuprl/Shared/Xindentation_hack_doc.html