%% gh
%% Tri insertion

%% échelle et étendue de l'image
60 setxunit
-.5 13 setxrange
-1.5 7.5 setyrange

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%% définitions des couleurs
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

/coul0 {0 0 0 0.5 setcmykcolor} def %gris
/coul1 {noir} def
/coul2 {orange} def
/coul3 {rouge} def
/coul4 {bleu} def

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%% les cases colorées
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

/fillstyle {coul2 fill} def 
0 0 7 1 frame*
0 5 6 6 frame*

/fillstyle {coul4 fill} def 
3 0 4 1 frame*
6 5 7 6 frame*

10.7 2 11.7 3 frame* % la case "garage"

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%% les cadres de tableau
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

coul1
[0 0 12 0 12 1 0 1 0 0] (-) ligne
[1 0 1 1] (-) ligne
[2 0 2 1] (-) ligne
[3 0 3 1] (-) ligne
[4 0 4 1] (-) ligne
[5 0 5 1] (-) ligne
[6 0 6 1] (-) ligne
[7 0 7 1] (-) ligne
[8 0 8 1] (-) ligne
[9 0 9 1] (-) ligne
[10 0 10 1] (-) ligne
[11 0 11 1] (-) ligne


[0 5 12 5 12 6 0 6 0 5] (-) ligne

[1 5 1 6] (-) ligne
[2 5 2 6] (-) ligne
[3 5 3 6] (-) ligne
[4 5 4 6] (-) ligne
[5 5 5 6] (-) ligne
[6 5 6 6] (-) ligne
[7 5 7 6] (-) ligne
[8 5 8 6] (-) ligne
[9 5 9 6] (-) ligne
[10 5 10 6] (-) ligne
[11 5 11 6] (-) ligne


% [10.7 2 11.7 2 11.7 3 10.7 3 10.7 2] (-) ligne % la case "garage"

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%% les indices
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
coul0
<latex>
$0$
</latex>
.5 1.5 [2.5 dup] cctexlabel
<latex>
$1$
</latex>
1.5 1.5 [2.5 dup] cctexlabel
<latex>
$2$
</latex>
2.5 1.5 [2.5 dup] cctexlabel
<latex>
$i$
</latex>
6.5 1.5 [2.5 dup] cctexlabel


coul0
<latex>
$0$
</latex>
.5 6.5 [2.5 dup] cctexlabel
<latex>
$1$
</latex>
1.5 6.5 [2.5 dup] cctexlabel
<latex>
$2$
</latex>
2.5 6.5 [2.5 dup] cctexlabel
<latex>
$i$
</latex>
6.5 6.5 [2.5 dup] cctexlabel

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%% les commentaires et flèches
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
coul1
1.5 setlinewidth
/arrowscale {2.5 dup} def

% trié haut
(node1) node
() 0 4.5 cctext
(node2) node
() 6 4.5 cctext
(node1) (node2) (<->) ncline
<latex>
triés
</latex>
3 4.5 [2.5 dup] dctexlabel

% trié bas
(node3) node
() 0 -.5 cctext
(node4) node
() 7 -.5 cctext
(node3) (node4) (<->) ncline
<latex>
triés
</latex>
3.5 -.5 [2.5 dup] dctexlabel

% case garage
(casei_haut) node
() 6.5 4.8 cctext
(garage) node
() 10.5 2.5 cctext
(ou_va_casei) node
() 3.5 1.2 cctext

% autres cases
(case5haut) node
() 5.5 4.8 cctext
(case4haut) node
() 4.5 4.8 cctext
(case3haut) node
() 3.5 4.8 cctext
(case6bas) node
() 6.5 1.2 cctext
(case5bas) node
() 5.5 1.2 cctext
(case4bas) node
() 4.5 1.2 cctext

% les transferts, dans l'ordre !
(casei_haut) (garage) (->) ncarc
(case5haut) (case6bas) (->) ncarc
(case4haut) (case5bas) (->) ncarc
(case3haut) (case4bas) (->) ncarc
(ou_va_casei) (garage) (<-) ncarc