1 | 23. t: dec() 24. t A.da 25. t.lbl = kind(act) 26. [[I]] rho A.ds < > de e x mk_trace_env(l, te) 27. [[A]] rho de e.trans(x,act,x') 28. l ( [[A.da]] rho) List 29. v:vc{i:l}().
v < *vc_imp(mk_imp(A.init, I))* > ( a:dec(). a A.da & v = ioa_trans(A;a.lbl;I))

vc_mng(v;rho;A.ds;A.da;de;e;x;mk_trace_env(l, te)) 30. act ( [[A.da]] rho) 31. v:[[dec_lookup(A.da;kind(act))]] rho.
[[I action_pre(kind(act);A.pre)]] rho A.ds dec_lookup(A.da;kind(act)) de e x v mk_trace_env(l, te)

[[wp(A;kind(act);I)]] rho A.ds dec_lookup(A.da;kind(act)) de e x v tappend(mk_trace_env(l,
te); < kind(act),v > ) 32. r: rel() 33. p: pre() 34. p A.pre 35. p.kind = kind(act) 36. r = p.rel 37. p.kind = kind(act) [[p.rel]] rho A.ds dec_lookup(A.da;kind(act)) de e x value(act) mk_trace_env(l, te) |