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=x,y,z
AA=!randitem $letters
pm=!randitem +,-
a=!randitem 1,1,1,1,1,2,3,4,5,6,7,8,9,10
b=!randitem 3,4,5,6,7,8,9,10
c=!randitem 2,3,4,5,6,7,8
!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
    varlist=$AA
    wims_rawmath_variables=$AA	
    varcnt=1
    m=$[$teller+1]
    GOED$n=$AA^$m*($AA $pm $a)
!endif
!if $R=2
    varlist=$AA
    wims_rawmath_variables=$AA	
    varcnt=1
    !if $keuze=1
	GOED$n=$AA^$[$teller+2]*($AA^$[$teller+1] $pm $a)
    !else
	GOED$n=$AA^$b*($AA $pm $a)
    !endif
!endif
!if $R=3
    varlist=$AA
    wims_rawmath_variables=$AA
    varcnt=1
    !if $keuze=1
	GOED$n=$AA^$c*($AA $pm $a*$AA^2)
    !else
	a=$c
	!if $c > $b
	    a=$b
	    b=$c
	!endif  
	GOED$n=$AA^$b*($AA $pm $a*$AA^$a)
    !endif
!endif

!if $R>3
    BB=!randitem s,r,q
    varlist=$AA,$BB    
    wims_rawmath_variables=$AA,$BB
    varcnt=2
    d=!randitem 2,3,4,5
    !if $keuze=1
	GOED$n=$AA^2*$BB^$c*($AA $pm $BB)
    !else
	!if $c < $d
	    c=$[$c+$d] 
	!endif
	GOED$n=$AA^$b*$BB^$c*($a*$AA $pm $BB^$d)
    !endif
!endif

bewerking=bewerking2.proc
tussen=!exec pari $(GOED$n)\
printtex($(GOED$n))
som$n=!line 1 of $tussen
opgave$n=!line 2 of $tussen
factor=1
#####
letterlijk=0
vergelijking=0
latex$n=1
haakjes=1
argument=
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
goed$n=!texmath $(GOED$n)
