
temp3=!randint 1,2

!if $temp3=1

coord=abscisse



x1=!randint $xm+1,$xM-1
z1=!randitem $niveaux

c=$x1

temp1=!replace x by ($x1) in $fonc_m
temp2=!solve $temp1=$z1 for y=$ym to $yM

lincor=line $x1,$ym,$x1,$yM,black

!else


coord=ordonne



y1=!randint $ym+1,$yM-1
z1=!randitem $niveaux

c=$y1

temp1=!replace y by ($y1) in $fonc_m
temp2=!solve $temp1=$z1 for x=$xm to $xM


lincor=line $xm,$y1,$xM,$y1,black

!endif

nsol=!itemcnt $temp2

