# parametres d'une equation cartesienne d'une droite
set CartEqn := a b c ;

# nombre d'obstacles
param nb_obs := 2;

# description des obstacles
param obs :=

 [1,*,*] :   a   b   c :=
         1   0   1  -6
         2  -1   0   4
         3   0  -1   4
         4   1   0  -6
                
 [2,*,*] :   a   b   c :=
         1  -1   1  -1
         2  -1  -1  14 
         3   1  -1  -1
         4   1   1 -17
 ;

end;