Source
%% auteur : Peric
0 12 setxrange
-6 6 setyrange
28.45 setxunit
/a 0.3 def
/b 0.4 def
/c 0.5 def
/nodesep 0 def
/treesep c def
30 setfontsize

0 0 Tr rootnode 
[right(9) TR [{/thislevelsep 2 def /thistreesep b def} 
 (9) TR [{/thislevelsep 2 def /thistreesep a def} 
 (9) TR
 (8) TR
 (7) TR
 (6) TR
 (5) TR
 (4) TR
 (3) TR
 (2) TR
 (1) TR
 (0) TR ]
 (8) TR
 (7) TR
 (6) TR
 (5) TR
 (4) TR
 (3) TR
 (2) TR
 (1) TR
 (0) TR ]
 (8) TR
 (7) TR
 (6) TR
 (5) TR
 (4) TR
 (3) TR
 (2) TR
 (1) TR
 (0) TR[{/thislevelsep 2 def /thistreesep b def} 
 (9) TR 
 (8) TR
 (7) TR
 (6) TR
 (5) TR
 (4) TR
 (3) TR
 (2) TR
 (1) TR
 (0) TR [{/thislevelsep 2 def /thistreesep a def} 
 (9) TR
 (8) TR
 (7) TR
 (6) TR
 (5) TR
 (4) TR
 (3) TR
 (2) TR
 (1) TR
 (0) TR ]]] tree

(B) node
() 9 0 cctext
%(A000) (A999) (-) ncbar
%7 0 times

/angleA 0 def
/angleB 180 def
(A000) (B) (-) nccurve
/angleA 180 def
/angleB 0 def
(B) (A999) (-) nccurve

<latex>
$10 \times 10 \times 10$\\
1000 possibilités
</latex>
9 0 crtexlabel

/h 1 def
/k 3 def
pointilles
[1 10] 0 setdash
[3 h 3 h neg] ligne
[5 k 5 k neg] ligne