|- !a P.
a IN ALPHA P ==>
(ALPHA (a --> P) = ALPHA P) /\
(TRACES (a --> P) = {[]} UNION {CONS a t | t IN TRACES P})
|- !a P.
a IN ALPHA P ==>
IS_PROCESS (ALPHA P,{[]} UNION {CONS a t | t IN TRACES P})
|- !P a. a IN ALPHA P ==> (ALPHA (a --> P) = ALPHA P)
|- !P a.
a IN ALPHA P ==>
(TRACES (a --> P) = {[]} UNION {CONS a t | t IN TRACES P})