%% table = [ [vars] [mode0] [mode1] [mode2] [mode3] [mode4] ]
/gestionsolidmode {
5 dict begin
/table exch def
dup xcheck {
/mode exch def
} {
dup isarray {
/tableaffectation exch def
/mode -1 def
} {
/mode defaultsolidmode def
} ifelse
} ifelse
/vars table 0 get def
/nbvars vars length def
mode 0 ge {
/tableaffectation table mode 1 add 5 min get def
} if
0 1 nbvars 1 sub {
/i exch def
vars i get
tableaffectation i get
} for
nbvars
end
{def} repeat
} def
|