is
+ T4 d3 H. z! A0 m3 ^ l0 h i:real;
' f# S1 S; P" B( S1 J: x a,b:integer;
8 [3 O q& S* ?( kdo6 i5 k' |; \6 F/ r8 |" c1 ?! O
i:=z_uniform(2,0,1);) |# Z$ a: K" r. c& R. Z |. [
if i<0.67 then
( C( D4 u' B1 R& e$ t- l5 a from a:=1;
' u# r( [7 u( C6 u3 s: ~6 ] until a>6 loop
Y) ^! N8 N" { B4 s .models.pan.create(.Models.Frame2.SingleProc);
5 y8 G# ~4 X+ @ a:=a+1;2 F" ^% h/ X: Y/ C9 o/ U
end;
9 ]6 d$ Y/ x6 F- @5 I# x else. d3 p% H% B# ]
from b:=1
: i. _4 u; f4 f3 n9 ^ until b>8 loop
" d( Q$ v( H: |; c .models.ban.create(.Models.Frame2.SingleProc);
K0 I/ I' k* y$ j, i! L b:=b+1;
+ O3 }3 e+ a2 b$ p" U- R ?( T end;
: b0 w# I6 F2 j& k end;
0 p6 q+ K6 [4 o, `1 L" ~0 H; Eend;
+ W1 y' O* I3 z* Y- c |