bewerking=bewerking1.proc

!if $taal=nl
    nivo_title=Vermenigvuldigen/optellen/aftrekken met meerdere variabelen
!else
    nivo_title=
!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)*($B)*$(a$n) $pm ($C)*$(a$n)
	        som$n=$A\cdot $B\cdot $(a$n)  $pm $C\cdot $(a$n)
		varlist$n=$(a$n)
		letterlijk$n=$A* $B* $(a$n) $pm $C*$(a$n)
	    !else
		vergelijking=($A)*$(a$n) $pm ($B)*($C)*$(a$n)
	        som$n=$A\cdot $(a$n) $pm $B\cdot $C\cdot $(a$n)
		varlist$n=$(a$n)
		letterlijk$n=$A*$(a$n) $pm $B*$C* $(a$n)*$C
	    !endif
	!endif
	!if $R = 2  
	    !if $negatief=1
		pm=!randitem +,-
		mp=!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=+
		mp=+
		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) $pm ($C)*$(a$n)*$(b$n)
	        som$n=$A\cdot $(a$n)\cdot $B\cdot $(b$n) $pm $C\cdot $(a$n)\cdot $(b$n)
		varlist$n=$(a$n),$(b$n)
		letterlijk$n=$A*$(a$n)*$B*$(b$n) $pm $C*$(a$n)*$(b$n)
	    !else
		vergelijking=$(a$n)*($B)*$(b$n) $pm $(a$n)*($C)*$(b$n) $mp ($A)
	        som$n=$(a$n)\cdot $B\cdot $(b$n) $pm  $(a$n)\cdot $C\cdot $(b$n) $mp $A
		varlist$n=$(a$n),$(b$n)
		letterlijk$n=$(a$n)*$B*$(b$n) $mp $(a$n)*$C*$(b$n) $mp $A
	    !endif
	!endif
	!if $R = 3
	x=!randitem 2,3,4 
	    !if $negatief=1
		pm=!randitem +,-		
		mp=!randitem +,-		
		P=!randitem -1,1
		Q=!randitem -1,1
		V=!randitem -1,1
		W=!randitem -1,1
		A=!randint 2,10
		B=!randint 2,10
		C=!randint 2,10
		D=!randint 2,10
		A=$[$P*$A]
		B=$[$Q*$B]
		C=$[$V*$C]
		D=$[$W*$D]
	    !else
		pm=+
		mp=+
		A=!randint 2,10
		B=!randint 2,10
		C=!randint 2,10
		D=!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
	    d$n=$(a$n)^$[$x+1]
	    keuze=!randitem 1,2
	    !if $keuze=1
		vergelijking=($A)*$(c$n)* ($B)*$(a$n) $pm ($C)*$(a$n) $mp ($D)*$(d$n)
	        som$n=$A\cdot $(c$n)\cdot $B\cdot $(a$n) $pm $C\cdot $(a$n) $mp $D\cdot $(d$n)
		varlist$n=$(a$n),$(b$n)
		letterlijk$ n=$A*$(c$n)* $B* $(a$n) $pm ($C)*$(a$n) $mp ($D)*$(d$n)
	    !else
		vergelijking=($C)*$(b$n) $pm $A*$(a$n)*$(c$n) $mp ($B)*$(b$n)
	        som$n=$C\cdot $(b$n) $pm $A\cdot $(a$n)\cdot $(c$n) $mp $B\cdot $(b$n)
		varlist$n=$(a$n),$(b$n)
		letterlijk$n=$C*$(b$n) $pm $A*$(a$n)*$(c$n) $mp $B*$(b$n)
	    !endif
	!endif
	!if $R >3 
	x=!randitem 2,3,4,5
	y=!randitem 2,3,4 
	    !if $negatief=1
		pm=!randitem +,-		
		mp=!randitem +,-		
		P=!randitem -1,1
		Q=!randitem -1,1
		V=!randitem -1,1
		W=!randitem -1,1
		A=!randint 2,20
		B=!randint 2,10
		C=!randint 2,10
		D=!randint 2,20
		A=$[$P*$A]
		B=$[$Q*$B]
		C=$[$V*$C]
		D=$[$W*$D]
	    !else
		pm=+
		mp=+
		A=!randint 2,20
		B=!randint 2,10
		C=!randint 2,10
		D=!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
	    e$n=$(a$n)^$[$x+$y]
	    keuze=!randitem 1,2
	    !if $keuze=1
		vergelijking=($C)*$(b$n)*$(e$n) $pm ($A)*$(d$n)* ($B)*$(b$n)*$(c$n)
	        som$n=$C\cdot $(b$n)\cdot $(e$n) $pm $A\cdot $(d$n)\cdot $B\cdot $(b$n)\cdot $(c$n)
		varlist$n=$(a$n),$(b$n)
		letterlijk$n=($C)*$(b$n)*$(e$n) $pm $A*$(d$n)* $B* $(b$n)*$(c$n)
	    !else
		vergelijking=$(d$n)* ($B)*$(c$n)*($C) $mp $(b$n) $pm ($A)*$(e$n)
	        som$n=$(d$n)\cdot $B\cdot $(c$n)\cdot $C $mp  $(b$n) $pm $A\cdot $(e$n)
		varlist$n=$(a$n),$(b$n)
		letterlijk$n=$(d$n)* $B*$(c$n)*$C $mp $(b$n) $pm $A*$(e$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