mb event system 7 Sections EventSystems Doc
IF YOU CAN SEE THIS go to /sfa/Nuprl/Shared/Xindentation_hack_doc.html
Def a = b == eqof(IdDeq)(a,b)

is mentioned by

Def d(i;j) == mu(k.x.n(x)^k+1(i) = j)+1[rdist]
Def trigger1(loc;T;A;P;i;k;a;x)
Def == [(recognizer1(loc;T;A;P;k;i;"trigger";x)); 
Def == [if loc = i ma-single-pre1("trigger";;a;Unit;x,v.x) else  fi]
[trigger1]
Def recognizer1(loc;T;A;P;k;i;r;x)
Def == if loc = i
Def == if [r :  initially r = false
Def == if [only members of [k] affect r :
Def == if [ma-single-effect1(r;;x;A;k;T;r,x,vP(x,v r)]
Def == else nil fi
[recognizer1]
Def send-once(loc;T;A;a;f;tg;l;x)
Def == [(once(loc;a;source(l))); 
Def == [if loc = source(l)
Def == [if ma-single-sends1(A; Unit; Tx; locl(a); ltg; (a,b. [(f(a))]))
Def == [else  fi]
[send-once]
Def once(loc;a;i)
Def == if loc = i
Def == if [ma-single-pre-init1("done";;false;a;Unit;x,v.x); 
Def == if [only members of [locl(a)] affect "done" :
Def == if [ma-single-effect0("done";;locl(a);Unit;x,v. true)]
Def == else nil fi
[once]
Def Dconstant(loc;T;c;x;i)
Def == if loc = i [x : T initially x = c; only members of nil affect x :T]
Def == else nil fi
[Dconstant]

In prior sections: mb event system 2 mb event system 5 mb event system 3 mb event system 4 mb event system 6

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

mb event system 7 Sections EventSystems Doc