is
8 a" h K& |1 D' f i:real;
- \: z$ m5 x; K3 k1 D1 }& x a,b:integer;
# d4 i4 L0 ? y$ |do
* V; I( d$ u0 {% v i:=z_uniform(2,0,1);
" N. o: n' g( v$ @ if i<0.67 then
& v2 v+ ?8 @' {7 g: B, h from a:=1;. c/ t4 v) v4 F
until a>6 loop1 q/ D1 b( n2 I6 o5 r8 [) Q: w
.models.pan.create(.Models.Frame2.SingleProc);
* Y% {$ G% H4 G. F( Z) ] a:=a+1;5 ~' u5 f8 {5 A. N* D' u8 B* N) [
end;
0 E4 h) x+ O6 M9 R8 V else
8 [ s' t1 Y! q6 \2 q4 F: l9 h2 u from b:=1
% Y5 A3 F- v6 W9 M% p until b>8 loop2 ^+ A _' S. k X% W6 M( B
.models.ban.create(.Models.Frame2.SingleProc);
+ q, x, S1 ^) ~0 \7 { b:=b+1;+ k+ ` B% m9 c* T; m
end;
, m' y' d5 ~1 W end;. n0 Q% v$ y4 ^# `$ @" C
end;* Z+ O& m: g: w' T0 m$ S b
|