is
. |. i5 D1 o6 @! W8 S$ x% O6 H @" Q i:real;
2 u. \' J) S# Y5 O9 } a,b:integer;3 b/ A- N6 A7 y" S5 V+ n
do
; k0 R+ l0 X( {: N0 i0 o2 E) c i:=z_uniform(2,0,1);
' i& A' u# U/ ?8 d4 [6 Q5 n if i<0.67 then
' ^9 d2 b) N) A3 b. _. H0 H# R from a:=1;
! F" U' v1 y3 @ until a>6 loop% _' r& t L7 Q9 O
.models.pan.create(.Models.Frame2.SingleProc);8 Q7 k* w8 v# K$ q# H
a:=a+1;
# r7 q8 O* F' Q ^ end;
! S; I+ Z5 Y; ~4 b else
* J/ R& Q8 y0 @* A" W4 T from b:=1
/ ^' D6 n! ^, x1 B& k( f5 O. ~ until b>8 loop
/ a% ~/ {! o& ? .models.ban.create(.Models.Frame2.SingleProc); }3 w" V& B( i
b:=b+1;* c. k+ J- V. D3 m2 j$ k( @
end;0 R: h" ^$ `2 \) f
end;
8 [4 { p# ~, l: T8 r% t, vend;
4 Q1 R$ _1 q7 u! G |