(148steps total) PrintForm Definitions Lemmas mb event system 6 Sections EventSystems Doc
IF YOU CAN SEE THIS go to /sfa/Nuprl/Shared/Xindentation_hack_doc.html
At: sends-rule

  i:Id, k:Knd, l:IdLnk, ds:x:Id fp-> Type, da:a:Knd fp-> Type,
  f:(tg:IdState(ds)ma-valtype(dak)(da(rcv(ltg))?Void List)) List.
  source(l) = i
  
  d-single-sends(idsdaklf
  realizes es.(x:Id. vartype(i;xds(x)?Top)
  realizes es.& (e:E. 
  realizes es.& (loc(e) = i  Id  (valtype(er ma-valtype(da; kind(e))))
  realizes es.& (e:E. 
  realizes es.& (isrcv(e)
  realizes es.& (
  realizes es.& (lnk(e) = l  IdLnk  (valtype(er ma-valtype(da; kind(e))))
  realizes es.& ({m:Msg| source(mlnk(m)) = i } r Msg
  realizes es.& (((l,tgda(rcv(ltg))?Top)))
  realizes es.& (e:E. 
  realizes es.& (loc(e) = i  Id
  realizes es.& (
  realizes es.& (kind(e) = k  Knd
  realizes es.& (
  realizes es.& (sends(l;e)
  realizes es.& (=
  realizes es.& (tagged-messages(l;z.(z when e);val(e);f)
  realizes es.& ( Msg((l,tgda(rcv(ltg))?Top)) List)


By: Auto
THEN
BackThru
Thm* D:Dsys, P:({es:ES| es is an event system of D }Prop{i'}).
Thm* D realizes2 es.P(es D realizes es.P(es)
THENA
Try (Complete Auto)


Generated subgoals:

1 1. i : Id
2. k : Knd
3. l : IdLnk
4. ds : x:Id fp-> Type{i}
5. da : a:Knd fp-> Type{i}
6. f : (tg:IdState(ds)ma-valtype(dak)(da(rcv(ltg))?Void List)) List
7. source(l) = i
  (es.(x:Id. vartype(i;xds(x)?Top)
  (& (e:E. loc(e) = i  Id  (valtype(er ma-valtype(da; kind(e))))
  (& (e:E. 
  (& (isrcv(e)
  (& (
  (& (lnk(e) = l  IdLnk  (valtype(er ma-valtype(da; kind(e))))
  (& ({m:Msg| source(mlnk(m)) = i } r Msg((l,tgda(rcv(ltg))?Top)))
  (& (e:E. 
  (& (loc(e) = i  Id
  (& (
  (& (kind(e) = k  Knd
  (& (
  (& (sends(l;e)
  (& (=
  (& (tagged-messages(l;z.(z when e);val(e);f)
  (& ( Msg((l,tgda(rcv(ltg))?Top)) List))
   {es:ES| es is an event system of d-single-sends(idsdaklf) }
   Prop{i'}

7 steps
2 1. i : Id
2. k : Knd
3. l : IdLnk
4. ds : x:Id fp-> Type
5. da : a:Knd fp-> Type
6. f : (tg:IdState(ds)ma-valtype(dak)(da(rcv(ltg))?Void List)) List
7. source(l) = i
  d-single-sends(idsdaklf) realizes2 es.(x:Id. 
  d-single-sends(idsdaklf) realizes2 es.(vartype(i;xds(x)?Top)
  & (e:E. loc(e) = i  Id  (valtype(er ma-valtype(da; kind(e))))
  & (e:E. 
  & (isrcv(e lnk(e) = l  IdLnk  (valtype(er ma-valtype(da; kind(e))))
  & ({m:Msg| source(mlnk(m)) = i } r Msg((l,tgda(rcv(ltg))?Top)))
  & (e:E. 
  & (loc(e) = i  Id
  & (
  & (kind(e) = k  Knd
  & (
  & (sends(l;e)
  & (=
  & (tagged-messages(l;z.(z when e);val(e);f)
  & ( Msg((l,tgda(rcv(ltg))?Top)) List)

140 steps

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

(148steps total) PrintForm Definitions Lemmas mb event system 6 Sections EventSystems Doc