fact: Definition enum_trace (Alpha Beta : nat) : seq ((seq nat) * (seq nat)) := [seq (A, B) | A <- trace_seq Alpha, B <- trace_seq Beta].
imports: Misc Ccpo mathcomp(all_ssreflect) mathcomp(ssrint div rat ssralg ssrnum) tools subseq partition Yamanouchi stdtab Qmeasure