" & Poznam(P) & " " & Colornam(C) & " "); for V in Valoare loop if D(P,C,V)=1.0 then Append(O,Valonam(V)); end if; end loop; Append(O,"
" & Ascii.Lf); return To_String(O); end Show_Distri; begin Append(O, "
Simulated probabilities of each card in each hand
" & "
" & Ascii.Lf); Append(O, "" & Ascii.Lf); for I in 1..4 loop Append(O, "" & ""); Append(O, "" & Ascii.Lf); end loop; Append(O, "" & Ascii.Lf); for V in Valoare loop Append(O,""); for C in Culoare loop Append(O,""); for P in Pozitie loop Append(O, ""); end loop; end loop; Append(O, "" & Ascii.Lf); end loop; Append(O, "
 N S E W "); Append(O, Valonam(V) & " " & Colornam(C)); Append(O," " & Ptrim(R.D(P,C,V)) & "
" & Ascii.Lf); Append(O, "
Simulated probabilities of each colour length in each hand
" & "
" & Ascii.Lf); Append(O, "" & Ascii.Lf); for I in 1..4 loop Append(O, "" & ""); Append(O, "" & Ascii.Lf); end loop; Append(O, "" & Ascii.Lf); for V in 0..13 loop Append(O,""); for C in Culoare loop Append(O,""); for P in Pozitie loop Append(O, ""); end loop; end loop; Append(O, "" & Ascii.Lf); end loop; Append(O, "
 N S E W "); Append(O, Integer'Image(V) & " " & Colornam(C)); Append(O," " & Ptrim(R.L(P,C,V)) & "
" & Ascii.Lf); Append(O, "
Simulated probabilities of honor "& "point numbers in each hand
" & "
" & Ascii.Lf); Append(O, "" & Ascii.Lf); Append(O, "" & ""); Append(O, "" & Ascii.Lf); Append(O, "" & Ascii.Lf); for V in 0..40 loop Append(O,""); Append(O,""); for P in Pozitie loop Append(O, ""); end loop; Append(O, "" & Ascii.Lf); end loop; Append(O, "
 N S E W "); Append(O, Integer'Image(V) & " "); Append(O," " & Ptrim(R.P(P,V)) & "
" & Ascii.Lf); Append(O, "
Simulated sample distributions
" & Ascii.Lf); for I in 1..R.Dsl loop Append(O, "

" & Integer'Image(I) & "
" & Ascii.Lf); Append(O, Show_Distri(R.Ds(I))); end loop; Append(O, "