is
" o; U& u' @! x ~ i:real;
1 I1 f7 L: g6 r0 O9 p) G) c a,b:integer;6 ^5 b; w4 ^8 m; {) n6 U1 F$ C2 @
do4 E i/ T4 F% f8 b# B' |
i:=z_uniform(2,0,1);
) [% c$ [- Q0 c1 j V9 _ if i<0.67 then4 Y+ D, }$ I, N# O f" o
from a:=1;% o; v1 ]7 p% c- e
until a>6 loop
' I! ?/ h+ H. }6 k* |6 d' R .models.pan.create(.Models.Frame2.SingleProc);
* S2 X4 T5 d8 |' J% o' V a:=a+1;- l4 T9 K- O$ z& F
end;) [, ^/ f" P9 ]3 y9 N% ]8 B
else( G1 w" t7 J2 e
from b:=1. n5 ]: X% r, ~4 m
until b>8 loop' x/ U {8 W& R& B
.models.ban.create(.Models.Frame2.SingleProc);6 f7 B4 V; \- n8 H9 M/ ~
b:=b+1;
6 A, Q' _+ [& g0 a% }1 d$ y end;
- W, [2 q2 K! j end;$ d* K7 H; i! \( g
end;" T4 x( W! @% { K
|