#checkfile=exos/checkfile3.proc
checkfile=$checkdir/ineq.proc
!set n=$counter
!if $level =0
    R=$counter
!else
    R=$level
!endif        
math=0
questiontype=0
var1=0
var2=0
#var3=1
varlist=x
mytexsize=+2
keuze=!randitem 0,1
kans=!randitem 0,1
!if $R>0
    wims_rawmath_variables=x
    g=!randitem 2,3,4,5,6,7,8,9
    a=!randitem 1,2,3,4,5
    b=!randint 1,20
    tot=!exec pari A=$b/(1+$g^$a)\
    printtex(A)
    t1=!line 1 of $tot
    t2=!line 2 of $tot
    !if $keuze=1
	!if $kans=1
	    teken= &lt;
	    answer$n=!nospace 0 < x && x < $t1
	    texanswer$n=0 \\<\\ x \\<\\ $t2
	!else
	    teken= &le;
	    answer$n=!nospace 0 < x && x <= $t1
	    texanswer$n=0 \\<\\ x \le $t2    
	!endif    
    !else
	!if $kans=1
	    teken= &gt;
	    answer$n=!nospace $t1 < x && x < $b
	    texanswer$n=  $t2 \\<\\ x \\<\\ $b
	!else
	    teken= &ge;
	    answer$n=!nospace $t1 <= x && x < $b
	    texanswer$n=$t2 \le x \\<\\ $b
	!endif    
    !endif
    s1=!record 39 of lang/remarks.$taal
	#@ Los op:
    s2=!record 40 of lang/remarks.$taal
    #@  <ul><li>let op het Domein</li><li>let op de schrijfwijze: <br>schrijf >= voor &ge; <br>schrijf <= voor &le;</li></ul>
    s3=!record 142 of lang/remarks.$taal
    #@ Gegeven zijn de twee onderstaande logaritmische functies
    question$n=$s3<br><font size="-1">$s2</font><br>$s1 &nbsp;&nbsp;<font color=red size="+1">f(x) $teken g(x)</font>
    ff=^{$g}\log \left( x \right) + $a
    gg=^{$g}\log \left( $b - x \right)
    formula$n= \left\{ \begin{array}{cc} f\left( x \right) = & $ff  \\ \\  g\left( x \right) = & $gg \end{array}\right.

    F=$a + log10(x)/(log10($g))
    G=log10($b -x)/(log10($g))
    insplot_set=size 0.6,0.6;border ; autoscale ; zeroaxis linetype 3 ; tmargin 1 ; rmargin 1 ; grid ; xlabel "x-axis" ; ylabel "y-axis"

    !if $image=1
	plot=1
	draw=0
        image_settings$n=$insplot_set
	image$n= $F notitle , $G  notitle
    !else
	!if $teaching=1
	    !insplot $F notitle , $G notitle
	    helptext=!record 63 of $remarkdir/commonremarks.$taal
	    helptext=<a href="javascript:showimage();">$helptext
	!endif	    
    !endif
 !exit
!endif
