n=$teller
nivo_title=Breng de gemeenschappelijke factor buiten haakjes	
somtekst$n=Breng de gemeenschappelijke factor buiten haakjes:<br>\
<small>Let er op dat je de <em>hoogst mogelijke macht</em> buiten haakjes brengt</small>

keuze=!randitem 1,2
letters=a,b,c,d,f,g,h,k,r,s,t,x,y,z
AA=!randitem $letters
pm=!randitem +,-
a=!randitem 1,2,3,4,5,6,7,8,9,10
b=!randitem 2,3,4,5,6
c=!randitem 2,3,4,5,6,7,8
d=!randitem 1,3,5,-1,-3,-5
e=!randitem 2,4,6
varlist=$AA
wims_rawmath_variables=$AA	
varcnt=1

!if $graad=0
    R=$teller
!else
    R=$graad
!endif 
#bewerking=$authordir/bewerkingen/bewerking2.nl
#de onderstaande proc-file checked op de hoogste macht buiten haakjes
#bewerking=nivo/bewerking2.proc is niet -nog- voor elke deel-som/teller geschikt
#beetje stomme check, maar voorlopig goed genoeg: probleem x^4 - x => x(x^3-1)
#de procfile kijkt alleen naar de hoogste machten en kijkt niet wiskundig... ;-(
#dus vooralsnog alleen daar waar geen problemen te verwachten zijn deze proc-file
 
!if $R=1
    factor=1
    !if $keuze=1
        GOED$n=$AA*($AA $pm $a)
    !else
	b=!randitem 3,4,5,6,7
        GOED$n=$AA*($d*$AA $pm $e)
    !endif
!endif
!if $R=2
    b=!randitem 3,4,5
    factor=$b
    GOED$n=$b*$AA^2*($AA $pm $a)
!endif
!if $R=3
    b=!randint $[$teller+2],15
    !if $keuze=1
    	factor=1
	GOED$n=$AA^$b*($AA^$[$teller+1] $pm $a)
    !else
	!if $c=$b
	    c=$[$b+1]
	!endif    
    	factor=$c
	GOED$n=$c*$AA^$b*($AA^$[$teller+1] $pm $a)
    !endif
!endif
!if $R>3
    !if $c>$b
	a=$b	
	b=$c
    !else
	a=$c
    !endif	
    factor=1	
    !if $keuze=1
	GOED$n=$AA^$b*($e*$AA^$a $pm ($d))
    !else
	GOED$n=$AA^$b*(($d) $pm $e*$AA^$a)
    !endif
!endif

haakjes=1
letterlijk=0
vergelijking=0
latex$n=1
bewerking=bewerking2.proc
tussen=!exec pari $(GOED$n)\
printtex($(GOED$n))
som$n=!line 1 of $tussen
opgave$n=!line 2 of $tussen
goed$n=!texmath $(GOED$n)

hint=<small>Dus schrijf <em>a^2+ab  -->  a(a+b) </em><br>\
of <em>a^2 + 2a*b + b^2  -->  (a+b)*(a+b)</em><br></small>
woordmax=10
