pnt(pnt[0,536870968,B]),
pnt(pnt[1,536870968,C]),
parameter([a,-5.0,5.0,2.0,0.1]),
pnt(pnt[i*a,[536870968],F]),
pnt(pnt[(i*a^2+a+i*a*sqrt(a^2+1))/(a-i),56,A]),
pnt(pnt[group[(i*a^2+a+i*a*sqrt(a^2+1))/(a-i),0,1,(i*a^2+a+i*a*sqrt(a^2+1))/(a-i)],56]),
atan(-sqrt(a^2+1)+a)+atan(1/a),
"Done",
pnt(pnt[((i*a^2+2*a-i+i*a*sqrt(a^2+1))*cos(atan(-sqrt(a^2+1)+a)+atan(1/a))+(a^2+1+a*sqrt(a^2+1))*sin(atan(-sqrt(a^2+1)+a)+atan(1/a)))/((2*a-2*i)*cos(atan(-sqrt(a^2+1)+a)+atan(1/a))),56,D]),
"Done",
pnt(pnt[((3*i*a^2+4*a-i+3*i*a*sqrt(a^2+1))*cos(atan(-sqrt(a^2+1)+a)+atan(1/a))^2+(2*a^2+2+2*a*sqrt(a^2+1))*cos(atan(-sqrt(a^2+1)+a)+atan(1/a))*sin(atan(-sqrt(a^2+1)+a)+atan(1/a))+(i*a^2+i+i*a*sqrt(a^2+1))*sin(atan(-sqrt(a^2+1)+a)+atan(1/a))^2)/((4*a-4*i)*cos(atan(-sqrt(a^2+1)+a)+atan(1/a))^2),56,E]),
pnt(pnt[1+(i*a-1)/2,56,M]),
pnt(pnt[1+(i*a-1)/2-(i*a^2+a+i*a*sqrt(a^2+1))/(a-i)+((3*i*a^2+4*a-i+3*i*a*sqrt(a^2+1))*cos(atan(-sqrt(a^2+1)+a)+atan(1/a))^2+(2*a^2+2+2*a*sqrt(a^2+1))*cos(atan(-sqrt(a^2+1)+a)+atan(1/a))*sin(atan(-sqrt(a^2+1)+a)+atan(1/a))+(i*a^2+i+i*a*sqrt(a^2+1))*sin(atan(-sqrt(a^2+1)+a)+atan(1/a))^2)/(4*a-4*i)/cos(atan(-sqrt(a^2+1)+a)+atan(1/a))^2,56,X]),
pnt(pnt[((8*i*a^5+16*a^4+i*a^3+18*a^2+(-9*i)*a+(8*i*a^4+9*i*a^2)*sqrt(a^2+1))*cos(atan(-sqrt(a^2+1)+a)+atan(1/a))^3+(8*i*a^6+16*a^5+6*i*a^4+29*a^3+(-6*i)*a^2+9*a+(8*i*a^5+16*a^4+2*i*a^3+9*a^2)*sqrt(a^2+1))*cos(atan(-sqrt(a^2+1)+a)+atan(1/a))^2*sin(atan(-sqrt(a^2+1)+a)+atan(1/a))+(8*a^6+(-4*i)*a^5+10*a^4+(-3*i)*a^3+3*i*a+(8*a^5+(-4*i)*a^4+6*a^3+(-i)*a^2)*sqrt(a^2+1))*cos(atan(-sqrt(a^2+1)+a)+atan(1/a))*sin(atan(-sqrt(a^2+1)+a)+atan(1/a))^2+(-4*a^5-7*a^3-3*a+(-4*a^4-5*a^2)*sqrt(a^2+1))*sin(atan(-sqrt(a^2+1)+a)+atan(1/a))^3)/((16*a^4+(-16*i)*a^3+18*a^2+(-18*i)*a)*cos(atan(-sqrt(a^2+1)+a)+atan(1/a))^3+(16*a^5+(-16*i)*a^4+23*a^3+(-23*i)*a^2+3*a-3*i+(16*a^4+(-16*i)*a^3+11*a^2+(-11*i)*a)*sqrt(a^2+1))*cos(atan(-sqrt(a^2+1)+a)+atan(1/a))^2*sin(atan(-sqrt(a^2+1)+a)+atan(1/a))+(-4*a^4-(-4*i)*a^3-6*a^2-(-6*i)*a+(-4*a^3-(-4*i)*a^2)*sqrt(a^2+1))*cos(atan(-sqrt(a^2+1)+a)+atan(1/a))*sin(atan(-sqrt(a^2+1)+a)+atan(1/a))^2+(-4*a^5-(-4*i)*a^4-7*a^3-(-7*i)*a^2-3*a+3*i+(-4*a^4-(-4*i)*a^3-5*a^2-(-5*i)*a)*sqrt(a^2+1))*sin(atan(-sqrt(a^2+1)+a)+atan(1/a))^3),56,I]),
pnt(pnt[((8*i*a^5+16*a^4+(-9*i)*a^3-2*a^2+i*a+(8*i*a^4+(-i)*a^2)*sqrt(a^2+1))*cos(atan(-sqrt(a^2+1)+a)+atan(1/a))^3+((-4*i)*a^6+4*a^5+5*i*a^4+13*a^3+(-2*i)*a^2-3*a+i+((-4*i)*a^5+4*a^4+7*i*a^3+3*a^2+(-3*i)*a)*sqrt(a^2+1))*cos(atan(-sqrt(a^2+1)+a)+atan(1/a))^2*sin(atan(-sqrt(a^2+1)+a)+atan(1/a))+(-4*a^6-(-4*i)*a^5+5*a^4-i*a^3+2*a^2-(-i)*a-1+(-4*a^5-(-4*i)*a^4+7*a^3-3*i*a^2+a)*sqrt(a^2+1))*cos(atan(-sqrt(a^2+1)+a)+atan(1/a))*sin(atan(-sqrt(a^2+1)+a)+atan(1/a))^2+(4*a^5+3*a^3-a+(4*a^4+a^2)*sqrt(a^2+1))*sin(atan(-sqrt(a^2+1)+a)+atan(1/a))^3)/((16*a^4+(-16*i)*a^3-2*a^2+2*i*a)*cos(atan(-sqrt(a^2+1)+a)+atan(1/a))^3+(9*a^3+(-9*i)*a^2-3*a+3*i+(5*a^2+(-5*i)*a)*sqrt(a^2+1))*cos(atan(-sqrt(a^2+1)+a)+atan(1/a))^2*sin(atan(-sqrt(a^2+1)+a)+atan(1/a))+(4*a^4+(-4*i)*a^3-2*a^2+2*i*a+(4*a^3+(-4*i)*a^2)*sqrt(a^2+1))*cos(atan(-sqrt(a^2+1)+a)+atan(1/a))*sin(atan(-sqrt(a^2+1)+a)+atan(1/a))^2+(4*a^5+(-4*i)*a^4+3*a^3+(-3*i)*a^2-a+i+(4*a^4+(-4*i)*a^3+a^2+(-i)*a)*sqrt(a^2+1))*sin(atan(-sqrt(a^2+1)+a)+atan(1/a))^3),56,J]),
0
pnt(pnt[0,536870968,B]),
pnt(pnt[1,536870968,C]),
parameter([a,-5.0,5.0,2.0,0.1]),
pnt(pnt[i*a,[536870968],F]),
pnt(pnt[(i*a^2+a+i*a*sqrt(a^2+1))/(a-i),56,A]),
pnt(pnt[group[(i*a^2+a+i*a*sqrt(a^2+1))/(a-i),0,1,(i*a^2+a+i*a*sqrt(a^2+1))/(a-i)],56]),
atan(-sqrt(a^2+1)+a)+atan(1/a),
"Done",
pnt(pnt[((i*a^2+2*a-i+i*a*sqrt(a^2+1))*cos(atan(-sqrt(a^2+1)+a)+atan(1/a))+(a^2+1+a*sqrt(a^2+1))*sin(atan(-sqrt(a^2+1)+a)+atan(1/a)))/((2*a-2*i)*cos(atan(-sqrt(a^2+1)+a)+atan(1/a))),56,D]),
"Done",
pnt(pnt[((3*i*a^2+4*a-i+3*i*a*sqrt(a^2+1))*cos(atan(-sqrt(a^2+1)+a)+atan(1/a))^2+(2*a^2+2+2*a*sqrt(a^2+1))*cos(atan(-sqrt(a^2+1)+a)+atan(1/a))*sin(atan(-sqrt(a^2+1)+a)+atan(1/a))+(i*a^2+i+i*a*sqrt(a^2+1))*sin(atan(-sqrt(a^2+1)+a)+atan(1/a))^2)/((4*a-4*i)*cos(atan(-sqrt(a^2+1)+a)+atan(1/a))^2),56,E]),
pnt(pnt[1+(i*a-1)/2,56,M]),
pnt(pnt[1+(i*a-1)/2-(i*a^2+a+i*a*sqrt(a^2+1))/(a-i)+((3*i*a^2+4*a-i+3*i*a*sqrt(a^2+1))*cos(atan(-sqrt(a^2+1)+a)+atan(1/a))^2+(2*a^2+2+2*a*sqrt(a^2+1))*cos(atan(-sqrt(a^2+1)+a)+atan(1/a))*sin(atan(-sqrt(a^2+1)+a)+atan(1/a))+(i*a^2+i+i*a*sqrt(a^2+1))*sin(atan(-sqrt(a^2+1)+a)+atan(1/a))^2)/(4*a-4*i)/cos(atan(-sqrt(a^2+1)+a)+atan(1/a))^2,56,X]),
pnt(pnt[((8*i*a^5+16*a^4+i*a^3+18*a^2+(-9*i)*a+(8*i*a^4+9*i*a^2)*sqrt(a^2+1))*cos(atan(-sqrt(a^2+1)+a)+atan(1/a))^3+(8*i*a^6+16*a^5+6*i*a^4+29*a^3+(-6*i)*a^2+9*a+(8*i*a^5+16*a^4+2*i*a^3+9*a^2)*sqrt(a^2+1))*cos(atan(-sqrt(a^2+1)+a)+atan(1/a))^2*sin(atan(-sqrt(a^2+1)+a)+atan(1/a))+(8*a^6+(-4*i)*a^5+10*a^4+(-3*i)*a^3+3*i*a+(8*a^5+(-4*i)*a^4+6*a^3+(-i)*a^2)*sqrt(a^2+1))*cos(atan(-sqrt(a^2+1)+a)+atan(1/a))*sin(atan(-sqrt(a^2+1)+a)+atan(1/a))^2+(-4*a^5-7*a^3-3*a+(-4*a^4-5*a^2)*sqrt(a^2+1))*sin(atan(-sqrt(a^2+1)+a)+atan(1/a))^3)/((16*a^4+(-16*i)*a^3+18*a^2+(-18*i)*a)*cos(atan(-sqrt(a^2+1)+a)+atan(1/a))^3+(16*a^5+(-16*i)*a^4+23*a^3+(-23*i)*a^2+3*a-3*i+(16*a^4+(-16*i)*a^3+11*a^2+(-11*i)*a)*sqrt(a^2+1))*cos(atan(-sqrt(a^2+1)+a)+atan(1/a))^2*sin(atan(-sqrt(a^2+1)+a)+atan(1/a))+(-4*a^4-(-4*i)*a^3-6*a^2-(-6*i)*a+(-4*a^3-(-4*i)*a^2)*sqrt(a^2+1))*cos(atan(-sqrt(a^2+1)+a)+atan(1/a))*sin(atan(-sqrt(a^2+1)+a)+atan(1/a))^2+(-4*a^5-(-4*i)*a^4-7*a^3-(-7*i)*a^2-3*a+3*i+(-4*a^4-(-4*i)*a^3-5*a^2-(-5*i)*a)*sqrt(a^2+1))*sin(atan(-sqrt(a^2+1)+a)+atan(1/a))^3),56,I]),
pnt(pnt[((8*i*a^5+16*a^4+(-9*i)*a^3-2*a^2+i*a+(8*i*a^4+(-i)*a^2)*sqrt(a^2+1))*cos(atan(-sqrt(a^2+1)+a)+atan(1/a))^3+((-4*i)*a^6+4*a^5+5*i*a^4+13*a^3+(-2*i)*a^2-3*a+i+((-4*i)*a^5+4*a^4+7*i*a^3+3*a^2+(-3*i)*a)*sqrt(a^2+1))*cos(atan(-sqrt(a^2+1)+a)+atan(1/a))^2*sin(atan(-sqrt(a^2+1)+a)+atan(1/a))+(-4*a^6-(-4*i)*a^5+5*a^4-i*a^3+2*a^2-(-i)*a-1+(-4*a^5-(-4*i)*a^4+7*a^3-3*i*a^2+a)*sqrt(a^2+1))*cos(atan(-sqrt(a^2+1)+a)+atan(1/a))*sin(atan(-sqrt(a^2+1)+a)+atan(1/a))^2+(4*a^5+3*a^3-a+(4*a^4+a^2)*sqrt(a^2+1))*sin(atan(-sqrt(a^2+1)+a)+atan(1/a))^3)/((16*a^4+(-16*i)*a^3-2*a^2+2*i*a)*cos(atan(-sqrt(a^2+1)+a)+atan(1/a))^3+(9*a^3+(-9*i)*a^2-3*a+3*i+(5*a^2+(-5*i)*a)*sqrt(a^2+1))*cos(atan(-sqrt(a^2+1)+a)+atan(1/a))^2*sin(atan(-sqrt(a^2+1)+a)+atan(1/a))+(4*a^4+(-4*i)*a^3-2*a^2+2*i*a+(4*a^3+(-4*i)*a^2)*sqrt(a^2+1))*cos(atan(-sqrt(a^2+1)+a)+atan(1/a))*sin(atan(-sqrt(a^2+1)+a)+atan(1/a))^2+(4*a^5+(-4*i)*a^4+3*a^3+(-3*i)*a^2-a+i+(4*a^4+(-4*i)*a^3+a^2+(-i)*a)*sqrt(a^2+1))*sin(atan(-sqrt(a^2+1)+a)+atan(1/a))^3),56,J]),
0
