mb event system 2 Sections EventSystems Doc
IF YOU CAN SEE THIS go to /sfa/Nuprl/Shared/Xindentation_hack_doc.html
Def lnk(k) == 1of(outl(k))

is mentioned by

Thm* E:Type, eq:EqDecider(E), T,V:(IdIdType), M:(IdLnkIdType),
Thm* loc:(EId), k:(EKnd), v:(e:Eeventtype(k;loc;V;M;e)),
Thm* w,a:(x:Ide:ET(loc(e),x)), snds:(l:IdLnkE(Msg_sub(lM) List)),
Thm* sndr:({e:E| isrcv(k(e)) }E), i:(e:{e:E| isrcv(k(e)) }||snds
Thm* sndr:({e:E| isrcv(k(e)) }E), i:(e:{e:E| isrcv(k(e)) }||(lnk(k(e))
Thm* sndr:({e:E| isrcv(k(e)) }E), i:(e:{e:E| isrcv(k(e)) }||,sndr(e))||),
Thm* f:(E), prd:({e':Ef(e') }E), cl:(EEProp), p:ESAxioms{i:l}
Thm* f:(E), prd:({e':Ef(e') }E), cl:(EEProp), p:ESAxioms(E;
Thm* f:(E), prd:({e':Ef(e') }E), cl:(EEProp), p:ESAxioms(T;
Thm* f:(E), prd:({e':Ef(e') }E), cl:(EEProp), p:ESAxioms(M;
Thm* f:(E), prd:({e':Ef(e') }E), cl:(EEProp), p:ESAxioms(loc;
Thm* f:(E), prd:({e':Ef(e') }E), cl:(EEProp), p:ESAxioms(k;
Thm* f:(E), prd:({e':Ef(e') }E), cl:(EEProp), p:ESAxioms(v;
Thm* f:(E), prd:({e':Ef(e') }E), cl:(EEProp), p:ESAxioms(w;
Thm* f:(E), prd:({e':Ef(e') }E), cl:(EEProp), p:ESAxioms(a;
Thm* f:(E), prd:({e':Ef(e') }E), cl:(EEProp), p:ESAxioms(snds;
Thm* f:(E), prd:({e':Ef(e') }E), cl:(EEProp), p:ESAxioms(sndr;
Thm* f:(E), prd:({e':Ef(e') }E), cl:(EEProp), p:ESAxioms(i;
Thm* f:(E), prd:({e':Ef(e') }E), cl:(EEProp), p:ESAxioms(f;
Thm* f:(E), prd:({e':Ef(e') }E), cl:(EEProp), p:ESAxioms(prd;
Thm* f:(E), prd:({e':Ef(e') }E), cl:(EEProp), p:ESAxioms(cl).
Thm* mk-es(EeqTVMlockvwasndssndrifprdclp ES
[mk-es_wf]
Thm* E:Type{i}, T,V:(IdIdType{i}), M:(IdLnkIdType{i}), loc:(EId),
Thm* kind:(EKnd), val:(e:Eeventtype(kind;loc;V;M;e)),
Thm* when,after:(x:Ide:ET(loc(e),x)),
Thm* sends:(l:IdLnkE(Msg_sub(lM) List)),
Thm* sender:({e:E| isrcv(kind(e)) }E),
Thm* index:(e:{e:E| isrcv(kind(e)) }||sends(lnk(kind(e)),sender(e))||),
Thm* first:(E), pred:({e':Efirst(e') }E), causl:(EEProp{i}).
Thm* ESAxioms{i:l}
Thm* ESAxioms(E;
Thm* ESAxioms(T;
Thm* ESAxioms(M;
Thm* ESAxioms(loc;
Thm* ESAxioms(kind;
Thm* ESAxioms(val;
Thm* ESAxioms(when;
Thm* ESAxioms(after;
Thm* ESAxioms(sends;
Thm* ESAxioms(sender;
Thm* ESAxioms(index;
Thm* ESAxioms(first;
Thm* ESAxioms(pred;
Thm* ESAxioms(causl)
Thm*  Prop{i'}
[ESAxioms_wf]
Thm* i:Id, k:Knd. has-src(i;k isrcv(k) & source(lnk(k)) = i[assert-has-src]
Def lnk(e) == lnk(kind(e))[es-lnk]
Def ES
Def == E:Type
Def == EqDecider(E)(T:IdIdType
Def == EqDecider(E)(V:IdIdType
Def == EqDecider(E)(M:IdLnkIdType
Def == EqDecider(E)(Top(loc:EId
Def == EqDecider(E)(Top(kind:EKnd
Def == EqDecider(E)(Top(val:(e:Eeventtype(kind;loc;V;M;e))
Def == EqDecider(E)(Top(when:(x:Ide:ET(loc(e),x))
Def == EqDecider(E)(Top(after:(x:Ide:ET(loc(e),x))
Def == EqDecider(E)(Top(sends:(l:IdLnkE(Msg_sub(lM) List))
Def == EqDecider(E)(Top(sender:{e:Eisrcv(kind(e)) }E
Def == EqDecider(E)(Top(index:(e:{e:Eisrcv(kind(e)) }||sends
Def == EqDecider(E)(Top(index:(e:{e:Eisrcv(kind(e)) }||(lnk(kind(e))
Def == EqDecider(E)(Top(index:(e:{e:Eisrcv(kind(e)) }||,sender(e))||)
Def == EqDecider(E)(Top(first:E
Def == EqDecider(E)(Top(pred:{e':E(first(e')) }E
Def == EqDecider(E)(Top(causl:EEProp
Def == EqDecider(E)(Top(ESAxioms{i:l}
Def == EqDecider(E)(Top(ESAxioms(E;
Def == EqDecider(E)(Top(ESAxioms(T;
Def == EqDecider(E)(Top(ESAxioms(M;
Def == EqDecider(E)(Top(ESAxioms(loc;
Def == EqDecider(E)(Top(ESAxioms(kind;
Def == EqDecider(E)(Top(ESAxioms(val;
Def == EqDecider(E)(Top(ESAxioms(when;
Def == EqDecider(E)(Top(ESAxioms(after;
Def == EqDecider(E)(Top(ESAxioms(sends;
Def == EqDecider(E)(Top(ESAxioms(sender;
Def == EqDecider(E)(Top(ESAxioms(index;
Def == EqDecider(E)(Top(ESAxioms(first;
Def == EqDecider(E)(Top(ESAxioms(pred;
Def == EqDecider(E)(Top(ESAxioms(causl)
Def == EqDecider(E)(Top(Top))
[event_system]
Def ESAxioms{i:l}
Def ESAxioms(E;
Def ESAxioms(T;
Def ESAxioms(M;
Def ESAxioms(loc;
Def ESAxioms(kind;
Def ESAxioms(val;
Def ESAxioms(when;
Def ESAxioms(after;
Def ESAxioms(sends;
Def ESAxioms(sender;
Def ESAxioms(index;
Def ESAxioms(first;
Def ESAxioms(pred;
Def ESAxioms(causl)
Def == (e,e':Eloc(e) = loc(e' Id  causl(e,e' e = e'  causl(e',e))
Def == & (e:E(first(e))  (e':Eloc(e') = loc(e Id  causl(e',e)))
Def == & (e:E
Def == & ((first(e))
Def == & (
Def == & (loc(pred(e)) = loc(e Id & causl(pred(e),e)
Def == & (& (e':E
Def == & (& (loc(e') = loc(e Id  (causl(pred(e),e') & causl(e',e))))
Def == & (e:E
Def == & ((first(e))  (x:Id. when(x,e) = after(x,pred(e))  T(loc(e),x)))
Def == & (Trans e,e':Ecausl(e,e'))
Def == & SWellFounded(causl(e,e'))
Def == & (e:E
Def == & (isrcv(kind(e))
Def == & (
Def == & ((sends(lnk(kind(e)),sender(e)))[(index(e))]
Def == & (=
Def == & (msg(lnk(kind(e));tag(kind(e));val(e))
Def == & ( Msg(M))
Def == & (e:Eisrcv(kind(e))  causl(sender(e),e))
Def == & (e,e':E.
Def == & (causl(e,e')
Def == & (
Def == & ((first(e')) & causl(e,pred(e'))  e = pred(e')
Def == & ( isrcv(kind(e')) & causl(e,sender(e'))  e = sender(e'))
Def == & (e:Eisrcv(kind(e))  loc(e) = destination(lnk(kind(e))))
Def == & (e:El:IdLnk.
Def == & (loc(e) = source(l sends(l,e) = nil  Msg_sub(lM) List)
Def == & (e,e':E.
Def == & (isrcv(kind(e))
Def == & (
Def == & (isrcv(kind(e'))
Def == & (
Def == & (lnk(kind(e)) = lnk(kind(e'))
Def == & (
Def == & ((causl(e,e')
Def == & ((
Def == & ((causl(sender(e),sender(e'))
Def == & (( sender(e) = sender(e' E & index(e)<index(e')))
Def == & (e:El:IdLnk, n:||sends(l,e)||.
Def == & (e':E
Def == & (isrcv(kind(e')) & lnk(kind(e')) = l & sender(e') = e & index(e') = n)
[ESAxioms]
Def has-src(i;k) == isrcv(k)source(lnk(k)) = i[has-src]
Def kindcase(k;a.f(a);l,t.g(l;t))
Def == if islocal(k) f(act(k)) else g(lnk(k);tag(k)) fi
[kindcase]

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

mb event system 2 Sections EventSystems Doc