definition
spec_trans :: "(action, nat set \ bool)transition set" where "spec_trans =
{tr. let s = fst(tr); used = fst s; c = snd s;
t = snd(snd(tr)); used' = fst t; c' = snd t in case fst(snd(tr))
of
New \<Rightarrow> used' = used \<and> c' |
Loc l \<Rightarrow> c \<and> l \<notin> used \<and> used'= used \<union> {l} \<and> \<not>c' |
Free l \<Rightarrow> used'=used - {l} \<and> c'=c}"
definition
spec_ioa :: "(action, nat set \ bool)ioa" where "spec_ioa = (spec_sig, {({},False)}, spec_trans,{},{})"
end
¤ Die Informationen auf dieser Webseite wurden
nach bestem Wissen sorgfältig zusammengestellt. Es wird jedoch weder Vollständigkeit, noch Richtigkeit,
noch Qualität der bereit gestellten Informationen zugesichert.0.4Bemerkung:
¤
Die Informationen auf dieser Webseite wurden
nach bestem Wissen sorgfältig zusammengestellt. Es wird jedoch weder Vollständigkeit, noch Richtigkeit,
noch Qualität der bereit gestellten Informationen zugesichert.
Bemerkung:
Die farbliche Syntaxdarstellung ist noch experimentell.
