> RSA1:=
> ####################################################################################
> # 0129
> restart:
> for xa from -30 to 30 do
> n1:=a+b*m:
> m1:=c+d*m:
> A1:=(900*n1+30*xa+1)*(27000*m1+20459-900*(xa-4)^2+900*n1+30*xa):
> k:=sort(factor((A1-6059)/27000)):
> A:=factor(coeff(k,m^2)):B:=factor(coeff(k,m)):C:=factor(k-(m^2*coeff(k,m^2)+m*coeff(k,m))):
> A1:=sort(factor(6059+(A*m^2+B*m+C)*27000)):
> lprint(xa,A*m^2+B*m+C,A1):
> od:
> ####################################################################################
> # 0717
> restart:
> for xa from -30 to 30 do 
> n1:=a+b*m:
> m1:=c+d*m:
> if frac((xa-1)/2)=0 then 
> A1:=(900*n1+30*xa+7)*(19187+450*xa^2-1230*xa+27000*m1-9900*n1) else
> A1:=(900*n1+30*xa+7)*(12437+450*xa^2-1230*xa+27000*m1-9900*n1):fi:
> k:=sort(factor((A1-6059)/27000)):
> A:=factor(coeff(k,m^2)):B:=factor(coeff(k,m)):C:=factor(k-(m^2*coeff(k,m^2)+m*coeff(k,m))):
> A1:=sort(factor(6059+(A*m^2+B*m+C)*27000)):
> lprint(xa,A*m^2+B*m+C,A1):
> od:
> ####################################################################################
> # 1119
> restart:
> for xa from -30 to 30 do 
> n1:=a+b*m:
> m1:=c+d*m:
> if frac((xa-1)/3)=0 then 
> A1:=(900*n1+30*xa+11)*(27000*m1+9469-900*(xa-7)^2+900*n1+30*xa) else
> A1:=(900*n1+30*xa+11)*(27000*m1-900*(xa-7)^2+900*n1+30*xa+469):fi:
> k:=sort(factor((A1-6059)/27000)):
> A:=factor(coeff(k,m^2)):B:=factor(coeff(k,m)):C:=factor(k-(m^2*coeff(k,m^2)+m*coeff(k,m))):
> A1:=sort(factor(6059+(A*m^2+B*m+C)*27000)):
> lprint(xa,A*m^2+B*m+C,A1):
> od:
> ####################################################################################
> # 1323
> restart:
> for xa from -30 to 30 do 
> n1:=a+b*m:
> m1:=c+d*m:
> A1:=(900*n1+30*xa+13)*(900*(2*xa-17)*(xa-9)+26843+27000*m1-9900*n1-330*xa):
> k:=sort(factor((A1-6059)/27000)):
> A:=factor(coeff(k,m^2)):B:=factor(coeff(k,m)):C:=factor(k-(m^2*coeff(k,m^2)+m*coeff(k,m))):
> A1:=sort(factor(6059+(A*m^2+B*m+C)*27000)):
> lprint(xa,A*m^2+B*m+C,A1):
> od:
#####################################
#####################################
> RSA2:=
> ####################################################################################
> # 0129
> restart:
> for xa from -30 to 30 do
> n1:=a+b*m:
> m1:=c+d*m:
> A2:=(900*n1+30*xa+1)*(7709+27000*m1-900*(7-xa)^2-870*xa+900*n1):
> k:=sort(factor((A2-17609)/27000)):
> A:=factor(coeff(k,m^2)):B:=factor(coeff(k,m)):C:=factor(k-(m^2*coeff(k,m^2)+m*coeff(k,m))):
> A2:=sort(factor(17609+(A*m^2+B*m+C)*27000)):
> lprint(xa,A*m^2+B*m+C,A2):
> od:
> ####################################################################################
> # 0717
> restart:
> for xa from -30 to 30 do 
> n1:=a+b*m:
> m1:=c+d*m:
> if frac((xa-1)/2)=0 then 
> A2:=(900*n1+30*xa+7)*(23087+450*(xa-10)^2-1230*xa+27000*m1-9900*n1) else
> A2:=(900*n1+30*xa+7)*(16337+450*(xa-10)^2-1230*xa+27000*m1-9900*n1):fi:
> k:=sort(factor((A2-17609)/27000)):
> A:=factor(coeff(k,m^2)):B:=factor(coeff(k,m)):C:=factor(k-(m^2*coeff(k,m^2)+m*coeff(k,m))):
> A2:=sort(factor(17609+(A*m^2+B*m+C)*27000)):
> lprint(xa,A*m^2+B*m+C,A2):
> od:
> ####################################################################################
> # 1119
> restart:
> for xa from -30 to 30 do 
> n1:=a+b*m:
> m1:=c+d*m:
> if frac((xa-1)/3)=0 then 
> A2:=(900*n1+30*xa+11)*(29419+27000*m1-900*(10-xa)^2-870*xa+900*n1) else
> A2:=(900*n1+30*xa+11)*(20419+27000*m1-900*(10-xa)^2-870*xa+900*n1):fi:
> k:=sort(factor((A2-17609)/27000)):
> A:=factor(coeff(k,m^2)):B:=factor(coeff(k,m)):C:=factor(k-(m^2*coeff(k,m^2)+m*coeff(k,m))):
> A2:=sort(factor(17609+(A*m^2+B*m+C)*27000)):
> lprint(xa,A*m^2+B*m+C,A2):
> od:
> ####################################################################################
> # 1323
> restart:
> for xa from -30 to 30 do 
> n1:=a+b*m:
> m1:=c+d*m:
> A2:=(900*n1+30*xa+13)*(8693+27000*m1+1800*(8-xa)^2+1470*xa-9900*n1):
> k:=sort(factor((A2-17609)/27000)):
> A:=factor(coeff(k,m^2)):B:=factor(coeff(k,m)):C:=factor(k-(m^2*coeff(k,m^2)+m*coeff(k,m))):
> A2:=sort(factor(17609+(A*m^2+B*m+C)*27000)):
> lprint(xa,A*m^2+B*m+C,A2):
> od:
#####################################
#####################################
 RSA3:=
> ####################################################################################
> # 0119
> restart:
> for xa from -30 to 30 do 
> n1:=a+b*m:
> m1:=c+d*m:
> if frac((xa+1)/3)=0 then 
> A3:=(900*n1+30*xa+1)*(43759+27000*m1-900*(16-xa)^2-570*xa+9900*n1) else
> A3:=(900*n1+30*xa+1)*(34759+27000*m1-900*(16-xa)^2-570*xa+9900*n1):fi:
> k:=sort(factor((A3-20359)/27000)):
> A:=factor(coeff(k,m^2)):B:=factor(coeff(k,m)):C:=factor(k-(m^2*coeff(k,m^2)+m*coeff(k,m))):
> A3:=sort(factor(20359+(A*m^2+B*m+C)*27000)):
> lprint(xa,A*m^2+B*m+C,A3):
> od:
> ####################################################################################
> 
> # 0707
> restart:
> for xa from -30 to 30 do 
> n1:=a+b*m:
> m1:=c+d*m:
> A3:=(900*n1+30*xa+7)*(25537+27000*m1-1800*(xa-13)^2-900*n1-30*xa):
> k:=sort(factor((A3-20359)/27000)):
> A:=factor(coeff(k,m^2)):B:=factor(coeff(k,m)):C:=factor(k-(m^2*coeff(k,m^2)+m*coeff(k,m))):
> A3:=sort(factor(20359+(A*m^2+B*m+C)*27000)):
> lprint(xa,A*m^2+B*m+C,A3):
> od:
> ####################################################################################
> # 1129
> restart:
> for xa from -30 to 30 do 
> n1:=a+b*m:
> m1:=c+d*m:
> A3:=(900*n1+30*xa+11)*(39569+27000*m1-900*(29-xa)^2-570*xa+9900*n1):
> k:=sort(factor((A3-20359)/27000)):
> A:=factor(coeff(k,m^2)):B:=factor(coeff(k,m)):C:=factor(k-(m^2*coeff(k,m^2)+m*coeff(k,m))):
> A3:=sort(factor(20359+(A*m^2+B*m+C)*27000)):
> lprint(xa,A*m^2+B*m+C,A3):
> od:
> ####################################################################################
> # 1313
> restart:
> for xa from -30 to 30 do 
> n1:=a+b*m:
> m1:=c+d*m:
> if frac(xa/2)=0 then 
> A3:=(900*n1+30*xa+13)*(32443-1800*(1/2*xa-4)^2+27000*m1-900*n1-30*xa) else
> A3:=(900*n1+30*xa+13)*(18943-450*(xa-7)^2+870*xa+27000*m1-900*n1):fi:
> k:=sort(factor((A3-20359)/27000)):
> A:=factor(coeff(k,m^2)):B:=factor(coeff(k,m)):C:=factor(k-(m^2*coeff(k,m^2)+m*coeff(k,m))):
> A3:=sort(factor(20359+(A*m^2+B*m+C)*27000)):
> lprint(xa,A*m^2+B*m+C,A3):
> od:
> ####################################################################################
> # 1717
> restart:
> for xa from -30 to 30 do 
> n1:=a+b*m:
> m1:=c+d*m:
> if frac((xa-1)/2)=0 then 
> A3:=(900*n1+30*xa+17)*(33227+450*(xa-5)^2-930*xa+27000*m1-900*n1) else
> A3:=(900*n1+30*xa+17)*(21527+1800*(1/2*xa-3)^2+27000*m1-900*n1-30*xa):fi:
> k:=sort(factor((A3-20359)/27000)):
> A:=factor(coeff(k,m^2)):B:=factor(coeff(k,m)):C:=factor(k-(m^2*coeff(k,m^2)+m*coeff(k,m))):
> A3:=sort(factor(20359+(A*m^2+B*m+C)*27000)):
> lprint(xa,A*m^2+B*m+C,A3):
> od:
> ####################################################################################
> # 2323
> restart:
> for xa from -30 to 30 do 
> n1:=a+b*m:
> m1:=c+d*m:
> A3:=(900*n1+30*xa+23)*(-7567+27000*m1+1800*(9-xa)^2+1770*xa-900*n1):
> k:=sort(factor((A3-20359)/27000)):
> A:=factor(coeff(k,m^2)):B:=factor(coeff(k,m)):C:=factor(k-(m^2*coeff(k,m^2)+m*coeff(k,m))):
> A3:=sort(factor(20359+(A*m^2+B*m+C)*27000)):
> lprint(xa,A*m^2+B*m+C,A3):
> od:
####################################################################################
####################################################################################
> RSA4:=
> ####################################################################################
> # 0113
> restart:
> for xa from -30 to 30 do
> n1:=a+b*m:
> m1:=c+d*m:
> A4:=(900*n1+30*xa+1)*(18613+27000*m1-450*(12-2*xa)*(13-2*xa)-11700*n1-390*xa):
> k:=sort(factor((A4-2413)/27000)):
> A:=factor(coeff(k,m^2)):B:=factor(coeff(k,m)):C:=factor(k-(m^2*coeff(k,m^2)+m*coeff(k,m))):
> A4:=sort(factor(2413+(A*m^2+B*m+C)*27000)):
> lprint(xa,A*m^2+B*m+C,A4):
> od:
> 
> ####################################################################################
> # 0719
> restart:
> for xa from -30 to 30 do 
> n1:=a+b*m:
> m1:=c+d*m:
> A4:=(900*n1+30*xa+7)*(7159+27000*m1+900*(11-xa)^2+690*xa-6300*n1):
> k:=sort(factor((A4-2413)/27000)):
> A:=factor(coeff(k,m^2)):B:=factor(coeff(k,m)):C:=factor(k-(m^2*coeff(k,m^2)+m*coeff(k,m))):
> A4:=sort(factor(2413+(A*m^2+B*m+C)*27000)):
> lprint(xa,A*m^2+B*m+C,A4):
> od:
> ####################################################################################
> # 1123
> restart:
> for xa from -30 to 30 do 
> n1:=a+b*m:
> m1:=c+d*m:
> if frac((xa-1)/2)=0 then 
> A4:=(900*n1+30*xa+11)*(19283+1800*(1/2*xa-13/2)^2+27000*m1-11700*n1-390*xa) else
> A4:=(900*n1+30*xa+11)*(23783+450*(xa-12)^2-1290*xa+27000*m1-11700*n1):fi:
> k:=sort(factor((A4-2413)/27000)):
> A:=factor(coeff(k,m^2)):B:=factor(coeff(k,m)):C:=factor(k-(m^2*coeff(k,m^2)+m*coeff(k,m))):
> A4:=sort(factor(2413+(A*m^2+B*m+C)*27000)):
> lprint(xa,A*m^2+B*m+C,A4):
> od:
> ####################################################################################
> # 1729
> restart:
> for xa from -30 to 30 do 
> n1:=a+b*m:
> m1:=c+d*m:
> if frac((xa-1)/3)=0 then 
> A4:=(900*n1+30*xa+17)*(-7111+27000*m1+900*(9-xa)^2+690*xa-6300*n1) else
> A4:=(900*n1+30*xa+17)*(1889+27000*m1+900*(9-xa)^2+690*xa-6300*n1):fi:
> k:=sort(factor((A4-2413)/27000)):
> A:=factor(coeff(k,m^2)):B:=factor(coeff(k,m)):C:=factor(k-(m^2*coeff(k,m^2)+m*coeff(k,m))):
> A4:=sort(factor(2413+(A*m^2+B*m+C)*27000)):
> lprint(xa,A*m^2+B*m+C,A4):
> od:
#####################################
#####################################
RSA5:=
> ####################################################################################
> # 0101
> restart:
> for xa from -30 to 30 do 
> n1:=a+b*m:
> m1:=c+d*m:
> A5:=(900*n1+30*xa+1)*(-22709+27000*m1+900*(27-xa)^2+870*xa-900*n1):
> k:=sort(factor((A5-12391)/27000)):
> A:=factor(coeff(k,m^2)):B:=factor(coeff(k,m)):C:=factor(k-(m^2*coeff(k,m^2)+m*coeff(k,m))):
> A5:=sort(factor(12391+(A*m^2+B*m+C)*27000)):
> lprint(xa,A*m^2+B*m+C,A5):
> od:
> ####################################################################################
> # 0713
> restart:
> for xa from -30 to 30 do 
> n1:=a+b*m:
> m1:=c+d*m:
> if frac((xa-1)/2)=0 then 
> A5:=(900*n1+30*xa+7)*(32113-1800*(1/2*xa-1/2)^2+27000*m1+9900*n1+330*xa) else
> A5:=(900*n1+30*xa+7)*(24913-450*xa^2+1230*xa+27000*m1+9900*n1):fi:
> k:=sort(factor((A5-12391)/27000)):
> A:=factor(coeff(k,m^2)):B:=factor(coeff(k,m)):C:=factor(k-(m^2*coeff(k,m^2)+m*coeff(k,m))):
> A5:=sort(factor(12391+(A*m^2+B*m+C)*27000)):
> lprint(xa,A*m^2+B*m+C,A5):
> od:
> ####################################################################################
> # 1111
> restart:
> for xa from -30 to 30 do 
> n1:=a+b*m:
> m1:=c+d*m:
> if frac((xa-1)/3)=0 then 
> A5:=(900*n1+30*xa+11)*(-32419+27000*m1+900*(30-xa)^2+870*xa-900*n1) else
> A5:=(900*n1+30*xa+11)*(-23419+27000*m1+900*(30-xa)^2+870*xa-900*n1):fi:
> k:=sort(factor((A5-12391)/27000)):
> A:=factor(coeff(k,m^2)):B:=factor(coeff(k,m)):C:=factor(k-(m^2*coeff(k,m^2)+m*coeff(k,m))):
> A5:=sort(factor(12391+(A*m^2+B*m+C)*27000)):
> lprint(xa,A*m^2+B*m+C,A5):
> od:
> ####################################################################################
> # 1723
> restart:
> for xa from -30 to 30 do 
> n1:=a+b*m:
> m1:=c+d*m:
> A5:=(900*n1+30*xa+17)*(4223+27000*m1+1800*(xa-9)^2+9900*n1+330*xa):
> k:=sort(factor((A5-12391)/27000)):
> A:=factor(coeff(k,m^2)):B:=factor(coeff(k,m)):C:=factor(k-(m^2*coeff(k,m^2)+m*coeff(k,m))):
> A5:=sort(factor(12391+(A*m^2+B*m+C)*27000)):
> lprint(xa,A*m^2+B*m+C,A5):
> od:
> ####################################################################################
> # 1919
> restart:
> for xa from -30 to 30 do 
> n1:=a+b*m:
> m1:=c+d*m:
> if frac((xa-1)/3)=0 then 
> A5:=(900*n1+30*xa+19)*(59389+27000*m1-900*(30-xa)^2-930*xa-900*n1) else
> A5:=(900*n1+30*xa+19)*(50389+27000*m1-900*(30-xa)^2-930*xa-900*n1):fi:
> k:=sort(factor((A5-12391)/27000)):
> A:=factor(coeff(k,m^2)):B:=factor(coeff(k,m)):C:=factor(k-(m^2*coeff(k,m^2)+m*coeff(k,m))):
> A5:=sort(factor(12391+(A*m^2+B*m+C)*27000)):
> lprint(xa,A*m^2+B*m+C,A5):
> od:
> ####################################################################################
> # 2929
> restart:
> for xa from -30 to 30 do 
> n1:=a+b*m:
> m1:=c+d*m:
> A5:=(900*n1+30*xa+29)*(41579+27000*m1-900*(18-xa)^2-930*xa-900*n1):
> k:=sort(factor((A5-12391)/27000)):
> A:=factor(coeff(k,m^2)):B:=factor(coeff(k,m)):C:=factor(k-(m^2*coeff(k,m^2)+m*coeff(k,m))):
> A5:=sort(factor(12391+(A*m^2+B*m+C)*27000)):
> lprint(xa,A*m^2+B*m+C,A5):
> od:
> ####################################################################################
####################################################################################
> RSA6:=
> ####################################################################################
> # 0113
> restart:
> for xa from 320 to 323 do
> n1:=a+b*m:
> m1:=c+d*m:
> A6:=(900*n1+30*xa+1)*(5563+27000*m1-1800*(xa-10)^2-11700*n1-390*xa):
> k:=sort(factor((A6-14563)/27000)):
> A:=factor(coeff(k,m^2)):B:=factor(coeff(k,m)):C:=factor(k-(m^2*coeff(k,m^2)+m*coeff(k,m))):
> A6:=sort(factor(14563+(A*m^2+B*m+C)*27000)):
> lprint(xa,A*m^2+B*m+C,A6):
> od:
> ####################################################################################
> # 0719
> restart:
> for xa from -30 to 30 do 
> n1:=a+b*m:
> m1:=c+d*m:
> A6:=(900*n1+30*xa+7)*(900*(xa-18)^2+27000*m1+22909-6300*n1-210*xa):
> k:=sort(factor((A6-14563)/27000)):
> A:=factor(coeff(k,m^2)):B:=factor(coeff(k,m)):C:=factor(k-(m^2*coeff(k,m^2)+m*coeff(k,m))):
> A6:=sort(factor(14563+(A*m^2+B*m+C)*27000)):
> lprint(xa,A*m^2+B*m+C,A6):
> od:
> ####################################################################################
> # 1123
> restart:
> for xa from -30 to 30 do 
> n1:=a+b*m:
> m1:=c+d*m:
> if frac(xa/2)=0 then 
> A6:=(900*n1+30*xa+11)*(22433+450*(xa-12)^2-1290*xa+27000*m1-11700*n1) else
> A6:=(900*n1+30*xa+11)*(4433+1800*(1/2*xa-13/2)^2+27000*m1-11700*n1-390*xa):fi:
> k:=sort(factor((A6-14563)/27000)):
> A:=factor(coeff(k,m^2)):B:=factor(coeff(k,m)):C:=factor(k-(m^2*coeff(k,m^2)+m*coeff(k,m))):
> A6:=sort(factor(14563+(A*m^2+B*m+C)*27000)):
> lprint(xa,A*m^2+B*m+C,A6):
> od:
> ####################################################################################
> # 1729
> restart:
> for xa from -30 to 30 do 
> n1:=a+b*m:
> m1:=c+d*m:
> if frac((xa-1)/3)=0 then 
> A6:=(900*n1+30*xa+17)*(900*(xa-16)^2+27000*m1-6661-6300*n1-210*xa) else
> A6:=(900*n1+30*xa+17)*(900*(xa-16)^2+27000*m1+2339-6300*n1-210*xa):fi:
> k:=sort(factor((A6-14563)/27000)):
> A:=factor(coeff(k,m^2)):B:=factor(coeff(k,m)):C:=factor(k-(m^2*coeff(k,m^2)+m*coeff(k,m))):
> A6:=sort(factor(14563+(A*m^2+B*m+C)*27000)):
> lprint(xa,A*m^2+B*m+C,A6):
> od:
#####################################
#####################################
> RSA7:=
> ####################################################################################
> # 0129
> restart:
> for xa from -30 to 30 do
> n1:=a+b*m:
> m1:=c+d*m:
> A7:=(900*n1+30*xa+1)*(19469+27000*m1-900*(6-xa)^2-870*xa+900*n1):
> k:=sort(factor((A7-14069)/27000)):
> A:=factor(coeff(k,m^2)):B:=factor(coeff(k,m)):C:=factor(k-(m^2*coeff(k,m^2)+m*coeff(k,m))):
> A7:=sort(factor(14069+(A*m^2+B*m+C)*27000)):
> lprint(xa,A*m^2+B*m+C,A7):
> od:
> ####################################################################################
> # 0717
> restart:
> for xa from -30 to 30 do 
> n1:=a+b*m:
> m1:=c+d*m:
> if frac((xa-1)/2)=0 then 
> A7:=(900*n1+30*xa+7)*(35567+450*(xa-3)^2-1230*xa+27000*m1-9900*n1) else
> A7:=(900*n1+30*xa+7)*(28817+450*(xa-3)^2-1230*xa+27000*m1-9900*n1):fi:
> k:=sort(factor((A7-14069)/27000)):
> A:=factor(coeff(k,m^2)):B:=factor(coeff(k,m)):C:=factor(k-(m^2*coeff(k,m^2)+m*coeff(k,m))):
> A7:=sort(factor(14069+(A*m^2+B*m+C)*27000)):
> lprint(xa,A*m^2+B*m+C,A7):
> od:
> ####################################################################################
> # 1119
> restart:
> for xa from -30 to 30 do 
> n1:=a+b*m:
> m1:=c+d*m:
> if frac((xa-1)/3)=0 then 
> A7:=(900*n1+30*xa+11)*(29179+27000*m1-900*(9-xa)^2-870*xa+900*n1) else
> A7:=(900*n1+30*xa+11)*(20179+27000*m1-900*(9-xa)^2-870*xa+900*n1):fi:
> k:=sort(factor((A7-14069)/27000)):
> A:=factor(coeff(k,m^2)):B:=factor(coeff(k,m)):C:=factor(k-(m^2*coeff(k,m^2)+m*coeff(k,m))):
> A7:=sort(factor(14069+(A*m^2+B*m+C)*27000)):
> lprint(xa,A*m^2+B*m+C,A7):
> od:
> ####################################################################################
> # 1323
> restart:
> for xa from -30 to 30 do 
> n1:=a+b*m:
> m1:=c+d*m:
> A7:=(900*n1+30*xa+13)*(27000*m1+1800*(xa-2)^2-9900*n1-330*xa+113):
> k:=sort(factor((A7-14069)/27000)):
> A:=factor(coeff(k,m^2)):B:=factor(coeff(k,m)):C:=factor(k-(m^2*coeff(k,m^2)+m*coeff(k,m))):
> A7:=sort(factor(14069+(A*m^2+B*m+C)*27000)):
> lprint(xa,A*m^2+B*m+C,A7):
> od:
 #####################################
 #####################################
> RSA8:=
> ####################################################################################
> # 0117
> restart:
> for xa from -30 to 30 do
> n1:=a+b*m:
> m1:=c+d*m:
> A8:=(900*n1+30*xa+1)*(3557+27000*m1+1800*(4-xa)^2+2190*xa+11700*n1):
> k:=sort(factor((A8-5357)/27000)):
> A:=factor(coeff(k,m^2)):B:=factor(coeff(k,m)):C:=factor(k-(m^2*coeff(k,m^2)+m*coeff(k,m))):
> A8:=sort(factor(5357+(A*m^2+B*m+C)*27000)):
> lprint(xa,A*m^2+B*m+C,A8):
> od:
> ####################################################################################
> # 0711
> restart:
> for xa from -30 to 30 do 
> n1:=a+b*m:
> m1:=c+d*m:
> A8:=(900*n1+30*xa+7)*(27000*m1+2051-900*(xa-10)^2+6300*n1+210*xa):
> k:=sort(factor((A8-5357)/27000)):
> A:=factor(coeff(k,m^2)):B:=factor(coeff(k,m)):C:=factor(k-(m^2*coeff(k,m^2)+m*coeff(k,m))):
> A8:=sort(factor(5357+(A*m^2+B*m+C)*27000)):
> lprint(xa,A*m^2+B*m+C,A8):
> od:
> ####################################################################################
> # 1329
> restart:
> for xa from -30 to 30 do 
> n1:=a+b*m:
> m1:=c+d*m:
> if frac((xa-2)/3)=0 then 
> A8:=(900*n1+30*xa+13)*(900*(xa-11)^2+27000*m1-7411+6300*n1+210*xa) else
> A8:=(900*n1+30*xa+13)*(900*(xa-11)^2+27000*m1+1589+6300*n1+210*xa):fi:
> k:=sort(factor((A8-5357)/27000)):
> A:=factor(coeff(k,m^2)):B:=factor(coeff(k,m)):C:=factor(k-(m^2*coeff(k,m^2)+m*coeff(k,m))):
> A8:=sort(factor(5357+(A*m^2+B*m+C)*27000)):
> lprint(xa,A*m^2+B*m+C,A8):
> od:
> ####################################################################################
> # 1923 -- ONLY ONE FORM
> restart:
> for xa from -30 to 30 do 
> n1:=a+b*m:
> m1:=c+d*m:
> if frac(xa/2)=0 then 
> A8:=(900*n1+30*xa+19)*(21503+450*(xa-4)^2-510*xa+27000*m1+11700*n1) else
> A8:=(900*n1+30*xa+19)*(10703+1800*(1/2*xa-5/2)^2+27000*m1+11700*n1+390*xa):fi:
> k:=sort(factor((A8-5357)/27000)):
> A:=factor(coeff(k,m^2)):B:=factor(coeff(k,m)):C:=factor(k-(m^2*coeff(k,m^2)+m*coeff(k,m))):
> A8:=sort(factor(5357+(A*m^2+B*m+C)*27000)):
> lprint(xa,A*m^2+B*m+C,A8):
> od:
> ####################################################################################
>