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/exo5.jpg>')">$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
pm=!randitem +,-
mytexsize=+2
!if $R=1
    var1=($x^$a/($x^($b*$a)))*($x/($x^($b*$a)))
    formula=\frac{$x^{$a}}{$x^{$b\cdot $a}} \,\, \times \,\, \frac{$x}{$x^{$b\cdot $a}}
    answer$n=!rawmath $x^($a + $[-2*$b]*$a+1)
    #answer$n=!exec maxima ratsimp($var1);
    tex=!texmath $(answer$n)
    texanswer$n=$formula = $tex
    varlist=!varlist $(answer$n)
    wims_rawmath_variables=$varlist
    applettext=$x^$a/($x^($b*$a))*$x/($x^($b*$a))=
    !if $wims_user=supervisor
	exotext=<font color=green>correct answer: $(answer$n)
    !endif
 !exit
!endif

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

