bewerking=bewerking1.proc

!if $taal=nl
    nivo_title=Vermenigvuldigen met meerdere variabelen
!else
    nivo_title=Multiplication with variables
!endif
sommen=$empty
R=$graad
    !for n=1 to $aantal_sommen
	!if $graad =0
	    R=$n
	!endif    
	!if $R = 1
	    !if $negatief=1
		pm=!randitem +,-		
		P=!randitem -1,1
		Q=!randitem -1,1
		V=!randitem -1,1
		A=!randint 2,10
		B=!randint 2,10
		C=!randint 2,10
		A=$[$P*$A]
		B=$[$Q*$B]
		C=$[$V*$C]
	    !else
		pm=+
		A=!randint 2,10
		B=!randint 2,10
		C=!randint 2,10
	    !endif    
	    a$n=!randitem a,b,c,d,f,h,n,m
	    keuze=!randitem 1,2
	    !if $keuze=1
		vergelijking=($A)*$(a$n)* ($B)
	        som$n=$A\cdot $(a$n)\cdot $B
		varlist$n=$(a$n)
		letterlijk$n=$A*$(a$n)* $B
	    !else
		vergelijking=($A)*$(a$n)* ($B)*$(a$n)
	        som$n=$A\cdot $(a$n)\cdot $B\cdot $(a$n)
		varlist$n=$(a$n)
		letterlijk$n=$A*$(a$n)* $B*$(a$n)
	    !endif
	!endif
	!if $R = 2  
	    !if $negatief=1
		pm=!randitem +,-		
		P=!randitem -1,1
		Q=!randitem -1,1
		V=!randitem -1,1
		A=!randint 2,10
		B=!randint 2,10
		C=!randint 2,10
		A=$[$P*$A]
		B=$[$Q*$B]
		C=$[$V*$C]
	    !else
		pm=+
		A=!randint 2,10
		B=!randint 2,10
		C=!randint 2,10
	    !endif    
	    a=!shuffle a,b,c,d,f,h,n,m
	    a$n=!item 1 of $a
	    b$n=!item 2 of $a
	    keuze=!randitem 1,2
	    !if $keuze=1
		vergelijking=($A)*$(a$n)* ($B)*$(b$n)
	        som$n=$A\cdot $(a$n)\cdot $B\cdot $(b$n)
		varlist$n=$(a$n),$(b$n)
		letterlijk$n=$A*$(a$n)* $B* $(b$n)
	    !else
		vergelijking=$(a$n)* ($B)*$(a$n)*($C)*$(b$n)
	        som$n=$(a$n)\cdot $B\cdot $(a$n)\cdot $C\cdot $(b$n)
		varlist$n=$(a$n),$(b$n)
		letterlijk$n=$(a$n)* $B*$(a$n)*$C*$(b$n)
	    !endif
	!endif
	!if $R = 3
	x=!randitem 2,3,4 
	    !if $negatief=1
		pm=!randitem +,-		
		P=!randitem -1,1
		Q=!randitem -1,1
		V=!randitem -1,1
		A=!randint 2,10
		B=!randint 2,10
		C=!randint 2,10
		A=$[$P*$A]
		B=$[$Q*$B]
		C=$[$V*$C]
	    !else
		pm=+
		A=!randint 2,10
		B=!randint 2,10
		C=!randint 2,10
	    !endif    
	    a=!shuffle a,b,c,d,f,h,n,m
	    a$n=!item 1 of $a
	    b$n=!item 2 of $a
	    c$n=$(a$n)^$x
	    keuze=!randitem 1,2
	    !if $keuze=1
		vergelijking=($A)*$(a$n)* ($B)*$(b$n)*$(c$n)
	        som$n=$A\cdot $(a$n)\cdot $B\cdot $(b$n)\cdot $(c$n)
		varlist$n=$(a$n),$(b$n)
		letterlijk$n=$A*$(a$n)* $B* $(b$n)*$(c$n)
	    !else
		vergelijking=$A*$(a$n)* ($B)*$(c$n)*($C)*$(b$n)
	        som$n=$A\cdot $(a$n)\cdot $B\cdot $(c$n)\cdot $C\cdot $(b$n)
		varlist$n=$(a$n),$(b$n)
		letterlijk$n=$A*$(a$n)* $B*$(c$n)*$C*$(b$n)
	    !endif
	!endif
	!if $R >3 
	x=!randitem 2,3,4,5,6,7
	y=!randitem 2,3,4,5 
	    !if $negatief=1
		pm=!randitem +,-		
		P=!randitem -1,1
		Q=!randitem -1,1
		V=!randitem -1,1
		A=!randint 2,20
		B=!randint 2,20
		C=!randint 2,20
		A=$[$P*$A]
		B=$[$Q*$B]
		C=$[$V*$C]
	    !else
		pm=+
		A=!randint 2,20
		B=!randint 2,20
		C=!randint 2,20
	    !endif    
	    a=!shuffle a,b,c,d,f,h,n,m
	    a$n=!item 1 of $a
	    b$n=!item 2 of $a
	    c$n=$(a$n)^$x
	    d$n=$(a$n)^$y
	    keuze=!randitem 1,2
	    !if $keuze=1
		vergelijking=($A)*$(d$n)* ($B)*$(b$n)*$(c$n)
	        som$n=$A\cdot $(d$n)\cdot $B\cdot $(b$n)\cdot $(c$n)
		varlist$n=$(a$n),$(b$n)
		letterlijk$n=$A*$(d$n)* $B* $(b$n)*$(c$n)
	    !else
		vergelijking=($A)*$(d$n)* ($B)*$(c$n)*($C)*$(b$n)
	        som$n=$A\cdot $(d$n)\cdot $B\cdot $(c$n)\cdot $C\cdot $(b$n)
		varlist$n=$(a$n),$(b$n)
		letterlijk$n=$A*$(d$n)* $B*$(c$n)*$C*$(b$n)
	    !endif
	!endif
	sommen=!append line S=$vergelijking to $sommen
	sommen=!append line printtex(S) to $sommen
    !next n        

oplossingen=!exec pari $sommen
r=1
!for n=1 to $aantal_sommen
    GOED$n=!line $r of $oplossingen
    goed$n=!line $[$r+1] of $oplossingen
    r=$[$r+2]
!next n[21~