is
( R0 b A$ H$ q7 n4 [ i:real;6 t+ D# f) A2 U
a,b:integer;; Q1 ~ W F+ F, Z
do
# k, K% o+ U& B) o! a i:=z_uniform(2,0,1);5 n3 S, E9 C1 {8 P& S9 x3 G
if i<0.67 then, q F) ~' G5 k7 Y3 F. k9 n
from a:=1;
# @) L2 x2 e; w) C until a>6 loop
2 ^3 ]: H* A7 |" d .models.pan.create(.Models.Frame2.SingleProc);6 `1 z0 s+ w) P6 e, L
a:=a+1;
$ h6 m2 t' c9 B* e end;
+ @: N6 X0 y& Y' [ else
4 M% |9 z3 C5 \9 B/ o5 y- _! I; z from b:=1, ~2 d7 T: y( f2 ^% U, J7 _; I
until b>8 loop
/ t4 { d( s2 n, J* f7 d .models.ban.create(.Models.Frame2.SingleProc);; T+ s: l, M7 L$ C! c
b:=b+1;
9 U) ^/ {, h$ { end;
/ L* T) _1 \1 @; L: x" \; p8 v end;/ d0 Q7 S8 P( x9 Y3 G& S6 d# B8 z
end;% L S2 m5 s1 a+ X5 H! O0 M5 v( A
|