next up previous contents
Next: Compose T12 with all Up: First Steps Previous: Compose T10 with all   Contents

Compose T11 with all

(dolist (x '(t1 t2 t3 t4 t5 t6 t7 t8 t9 t10 t11 t12))
   (print (list 't11 (list x (t11 (funcall x r))))))
We get the results:
(T11 (T1 ("BabaBABAAbbbb" . "AAbbb"))) 
(T11 (T2 ("abABAb" . "AAbbb"))) 
(T11 (T3 ("BaabaBABAb" . "AAbbb"))) 
(T11 (T4 ("BabaBA" . "AAbbbabaBAB"))) 
(T11 (T5 ("BabaBA" . "BBBaa"))) 
(T11 (T6 ("BabaBA" . "AbbbA"))) 
(T11 (T7 ("abaBAB" . "AAbbb"))) 
(T11 (T8 ("BabaBA" . "bAAbb"))) 
(T11 (T9 ("aBABab" . "AAbbb"))) 
(T11 (T10 ("BabaBA" . "AAAbbba"))) 
(T11 (T11 ("BBabaBAb" . "AAbbb"))) 
(T11 (T12 ("BabaBA" . "BAAbbbb")))


root 2004-05-05