mathviewpanel=$module_title:/:+:-:*:^
rounding=0
mathview=0
!readproc $remarkdir/rounding.$taal
image=0
questiontype=7
embed=0
n=$counter
!if $level=0
    R=$counter
!else
    R=$level
!endif
javascript=js/javainput.js
# produceerd een <tr>
XSIZE=650
smallfont=22
largefont=28
# applettext => letterlijke 
math=1
checkfile=$checkdir/simplify.proc
arglist=$empty
formula$n=$empty
question$n=!record 8 of lang/remarks.$taal
#@ herleid de volgende macht <br><font size=-1>dus schrijf anders</font>
sometext=!record 29 of lang/remarks.$taal
helptext=<a onmouseover="return escape('<img src=$module_dir/gifs/exo3.gif>')">$sometext</a>
# var1 is used for checking  "literal typing" of question
letters=x,y,a,b,c,d,f,h,k,m,p,z
letters=!shuffle $letters
x=!item 1 of $letters
y=!item 2 of $letters
z=!item 3 of $letters
a=!item 4 of $letters
getallen=!shuffle 2,3,4,5,6,7,8,-2,-3,-4,-5,-6,-7,-8
b=!item 1 of $getallen
c=!item 2 of $getallen
d=!item 3 of $getallen
e=!item 4 of $getallen

mytexsize=+2
!if $R=1
    var1=$x^$a/($x^($b*$a)) 
    answer$n=!exec maxima ratsimp($var1);
    formula=\frac{$x^{$a}}{$x^{$b\cdot $a}}
    tex=!texmath $(answer$n)
    texanswer$n=$formula \,\,=\,\, $tex
    varlist=!varlist $(answer$n)
    wims_rawmath_variables=$varlist
    applettext=$x^$a/($x^($b$a))=
    !if $wims_user=supervisor
	exotext=<font color=green>correct answer: $(answer$n)
    !endif
 !exit
!endif

!if $R=2
    var1=$x^($c*$a)/($x^($b*$a)) 
    answer$n=!exec maxima ratsimp($var1);
    formula=\frac{$x^{$c \cdot $a}}{$x^{$b\cdot $a}}
    tex=!texmath $(answer$n)
    texanswer$n=$formula \,\,=\,\, $tex
    varlist=!varlist $(answer$n)
    wims_rawmath_variables=$varlist
    applettext=$x^($c$a)/($x^($b$a))=
    !if $wims_user=supervisor
	exotext=<font color=green>correct answer: $(answer$n)
    !endif
 !exit
!endif

!if $R=3
    var1=$c*$x^($b*$a)/($x^($d*$a))
    answer$n=!exec maxima ratsimp($var1);
    formula=\frac{$c \cdot $x^{$b \cdot $a}}{$x^{$d \cdot $a}}
    tex=!texmath $(answer$n)
    texanswer$n=$formula \,\,=\,\, $tex
    varlist=!varlist $(answer$n)
    wims_rawmath_variables=$varlist
    applettext=$c*$x^($b$a)/($x^($d$a))=
    !if $wims_user=supervisor
	exotext=<font color=green>correct answer: $(answer$n)
    !endif
 !exit
!endif

!if $R>3
    var1=$c*$x^($b*$a)/($e*$x^($d*$a))
    answer$n=!exec maxima ratsimp($var1);
    formula=\frac{$c \cdot $x^{$b \cdot $a}}{$e \cdot $x^{$d \cdot $a}}
    tex=!texmath $(answer$n)
    texanswer$n=$formula \,\,=\,\, $tex
    varlist=!varlist $(answer$n)
    wims_rawmath_variables=$varlist
    applettext=$c*$x^($b$a)/($e*$x^($d$a))=
    !if $wims_user=supervisor
	exotext=<font color=green>correct answer: $(answer$n)
    !endif
 !exit
!endif


