~v300 200
y#hYWm]hV\b\Dlg[D\Xj 
 yzw$PSSjTgMNRWWRZ]YdTQ 
 ~w178 4 393 792 0 475 0 0 ~f? 14 12 10
? 2 1 1 0 ? ? ? "Arial" ? ? ? 0 ? 0 0
"Times" 12 ? ? 7 0 c n 105 0 0 0 k 288
i""
? 1 26177 26178 26115 26178 0 1 1 1 0 0
0 0 -1 0 1 -1 -1 -1 -1 -1 0
1 1 0 2 0 ? ? ? ? ? ? ? ? 
~Q
]|Expr|[#b @`bb#_b#_b#_})+# b'4" *|: ;bP:&c0!)TLS Cylinder ,H|
  |Newton,Gs Method,I}% b!( b"0 b#8 b$@ b%H!WW}]|[~p1
0 ~Ie(x,y,z,X_k,Y_k,Z_k,u,v,w)~p0
1 ~V?m0 (Result)~p0
1 ~V?m0 (Circle)~p0
1 ~V?m0 (Axis)~p0
1 ~V?m0 (B)~p0
1 ~V?m0 (N)~p0
1 ~V?m0 (T)~p0
1 ~V?m0 (P)~p0
1 ~V?m0 (D)~p0
1 ~V?f0 (Newton)~p0
1 ~V?f0 (H)~p0
1 ~V?f0 (g)~p0
1 ~V?f0 (f)~p0
1 ~V?f0 (r)~p0
1 ~V?f0 (d)~p0
1 ~V?f256 (sin)~p0
1 ~V?f257 (cos)~p0
1 ~V?v0 (Hessian)~p0
1 ~V?v0 (Gradient)~p0
1 ~V?v0 (Objective)~p0
1 ~V?v0 (Iterations)~p0
1 ~V?v0 (Radius)~p0
1 ~V?v0 (Center)~p0
1 ~V?v0 ('q)~p0
1 ~V?v0 (t)~p0
1 ~V?v0 (w)~p0
1 ~V?v0 (v)~p0
1 ~V?v0 (u)~p0
1 ~V?v0 (z)~p0
1 ~V?v0 (y)~p0
1 ~V?v0 (x)~p0
1 ~V?v0 (k)~p0
1 ~V?c0 (Y)~p0
1 ~V?c0 (Z)~p0
1 ~V?c0 (X)~p0
1 ~V?c0 (n)~p0
1 ~V?c0 (m)~p0
1 ~V?c0 ('e)~p0
1 ~V?c1 ('p)~p0
1 ~Q
]|Expr|[#b @`bb#_b#_b#_}`f#})!# b$@`f }["! `f#}) # b$@|
  |}& b!( b"0 b#8 b$@ b%H b&P!WW})!# b$@" *|: ;bP8&c0!*Data|
  |}& b!( b"0 b#8 b$@ b%H b&P!WW}}}& b!( b"0 b#8 b$@ b%H b&P!WW}]|[~p0
0 ~Q
]|Expr|[#b @`bb#_b#_b#_}`f#})## b$@" *|: ;bP8&c0!*xyz data|
  |}& b!( b"0 b#8 b$@ b%H b&P!WW}]|[~p1
1 ~Q
]|Expr|[#b @`bb#_b#_b#_})b B# b(<" *|: ;bP8&c0!*The cylinder |
  |axis must intersect the plane z ,] $^z^0_ and have a nonzero |
  |z component $^w^0_,N}& b!( b"0 b#8 b$@ b%H b&P!WW}]|[~p0
2 ~A(X=(28.2842712474812;11.025494232584601;-39.8477879237034;~
 39.392310120514601;11.694868188904399;30.641777724755201;~
 28.773592013545599;12.3606797749671;38.450467837508803;~
 27.279934402496998;11.025494232584601;-18.159619989659401;~
 9.9999999999999998e-13;37.587704831443297;9.6768758239777508;~
 39.945181390212397;-37.820743023941802;-38.252190238563301;~
 -22.367716138804099;-36.252311481453901;-20.000000000058201;~
 38.450467837508803;3.4862297099171;-8.9980421737855103;~
 17.534845871501599;28.773592013545599;-6.9459271067025803;~
 38.450467837508803;-37.087354182673202;-34.286692028050297;~
 32.766081771522302;-25.172815641970399;-2.0934382496889201;~
 33.921923846239203;29.254148064763299;17.534845871501599;~
 -39.507533623778698;-6.2573786015564101;-39.392310120514601;~
 -34.641016151406802;-30.188383208907901;37.820743024000002;~
 -38.6370330515783;-0.69809625762991301;6.9459271066880302;~
 -39.780875814729399;-3.48622970994984;-31.085838458268;~
 -31.085838458268;-19.392384809907501))~p0
2 ~d~A(Y=(-1.92031021356706;-48.401789902127298;~
 -15.919639615531199;-24.7105019904266;27.048383067507501;~
 -0.91110398362343403;3.3844498014223099;2.1512031334350499;~
 -29.009405124816102;15.028952199718301;-38.502294982143198;~
 -27.322790511068899;-30.4055915400095;-15.3306447296345;~
 6.93801084620645;-12.793992859820699;-16.279525774793001;~
 -3.7512946724491498;0.11419979715037699;8.4179156291647796;~
 -1.6680534732913701;-17.6596423552255;-35.247708808805299;~
 13.417211561565599;-51.584685418522;4.79866336142004;~
 25.7332492260321;-6.3459338752145404;-19.787862621480599;~
 -2.4030861308929201;-35.315074539685199;2.8891240758457601;~
 16.931800109363401;0.139137803683752;14.340079113957501;~
 -31.0785887984966;2.3033144942200998;-41.371073706483003;~
 -0.74534208950626601;-36.062445779971299;-37.648034559155299;~
 2.13739017475018;-7.5287343165982703;-49.493166768457698;~
 9.4697932860726706;-2.9565114031429398;-28.176641008816699;~
 -21.335402512166201;-31.942004212178301;-31.809048793598802))~p0
255 ~d~A(Z=(41.920310146408198;-5.9753831021153001;~
 20.8499129444826;14.8874776895682;27.048383067507501;~
 37.272662136354498;35.911361681413801;51.648677733435797;~
 13.4170016751887;26.3426606797148;-15.874878022121299;~
 -23.080149831075701;-26.162950859987198;-4.01693624963809;~
 47.950204086198902;9.8334241001866793;-2.1373901748011099;~
 20.2903358475596;46.783247277140603;15.488983429168;~
 50.657848246686598;33.252045804809299;-21.105573208798901;~
 41.701482761534898;0.74121630149238604;34.497148121416103;~
 29.975889906025301;21.938337324769201;-1.4030863414846;~
 31.538039309118201;2.8686915803155002;41.072890195820897;~
 39.559217069356201;29.837622563674799;24.239574033970701;~
 -19.764880318514798;6.5459551742169397;-14.501016066497;~
 10.568366390492899;7.7781745800239204;0.53573156082620699;~
 16.2795257747348;22.169750443397799;-7.0667599684820699;~
 46.239345846057397;-2.9565114031429398;-28.176641008816699;~
 -14.264334712163;-3.6577330121690501;-17.666913193592301))~p0
255 ~d~Q
]|Expr|[#b @`bb#_b#_b#_}`f#})'# b"0" *|: ;bP8&c0!*number of data|
  | points}& b!( b"0 b#8 b$@ b%H b&P!WW}]|[~p0
1 ~A(n=50)~p0
255 ~d~Q
]|Expr|[#b @`bb#_b#_b#_}`f#})## b"0" *|: ;bP8&c0!*convergence|
  | criterion}& b!( b!L b"0 b#8 b%H b&P!WW}]|[~p0
1 ~A('e=10^(-6))~p0
255 ~d~Q
]|Expr|[#b @`bb#_b#_b#_}`f#})## b"0" *|: ;bP8&c0!*maximum iterations|
  |}& b!( b"0 b#8 b$@ b%H b&P!WW}]|[~p0
1 ~A(m=15)~p0
255 ~d~Q
]|Expr|[#b @`bb#_b#_b#_}`f#})## b"0" *|: ;bP8&c0!*starting point|
  |}& b!( b"0 b#8 b$@ b%H b&P!WW}]|[~p0
1 ~A(x_0=3)~p0
255 ~d~A(y_0=0)~p0
255 ~d~A(z_0=0)~p0
255 ~d~A(u_0=0)~p0
255 ~d~A(v_0=-0.75)~p0
255 ~d~A(w_0=1)~p0
255 ~d~Q
]|Expr|[#b @`bb#_b#_b#_})!# b$@["! ) # b$@|
  |}& b!( b"0 b#8 b$@ b%H b&P!WW})!# b$@" *|: ;bP8&c0!*Algorithm|
  |}& b!( b"0 b#8 b$@ b%H b&P!WW}}}& b!( b"0 b#8 b$@ b%H b&P!WW}]|[~p1
0 ~Q
]|Expr|[#b @`bb#_b#_b#_}))# b$@" *|: ;bP8&c0!*objective function|
  | and cylinder radius}& b!( b"0 b#8 b$@ b%H b&P!WW}]|[~p1
1 ~A(f(x,y,u,v)=1/2*(Summation(k):(1):(n)*(d(x,y,~
 u,v,k))^2-n*(r(x,y,u,v))^2))~p1
2 ~A(f(x,y,u,v)=1/2*(Summation(k):(1):(50)*(d(x,~
 y,u,v,k))^2-50*(r(x,y,u,v))^2))~p0
3 ~sb/_!!   }
$.!  c#T"!c"H"!c"L" c"H" c',#"c'8 _c/__c/__}
$.!  c#T"!c"H"!c"L"!c"T! c"H" c'8 _c/__c/__}
^ _~
 ~A(f(x,y,u,v)=1/2*(Summation(k):(1):(50)*(sqrt(~
 (-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_~
 0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)/sqrt(w_0^~
 2+u^2+v^2))^2-50*(1/50*Summation(k):(1):(50)*sqrt(~
 (-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_~
 0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)/sqrt(w_0^~
 2+u^2+v^2))^2))~p0
4 ~sb/_!!   }
b00(!  c#T"_c/__c/__! ""}
^ _~A(f(~
 ?x,?y,?u,?v)=1/2*(Summation(k):(1):(50)*(sqrt(~
 (-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(~
 Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2)/sqrt(~
 w_0^2+?u^2+?v^2))^2-50*(1/50*Summation(k):(1):(~
 50)*sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-~
 ?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*~
 ?v)^2)/sqrt(w_0^2+?u^2+?v^2))^2))~p0
5 ~d~sb/_!!   }
b00,!  c#T"_c/__c/__! " # $"}
^ _~
 ~A(x=?x)~p0
2 ~A(y=?y)~p0
255 ~A(z=z_0)~p0
255 ~A(D=(u,v,w))~p0
255 ~A(u=?u)~p0
2 ~A(v=?v)~p0
255 ~A(w=w_0)~p0
255 ~A(k=?k)~p0
255 ~A(d(x,y,u,v,k)=abs(((X_k;Y_k;Z_k)-(x;y;z))*#D)/~
 abs(D))~p1
2 ~A(d(x,y,u,v,k)=abs(((X_k;Y_k;Z_k)-(x;y;z_0))*#~
 (u,v,w))/abs(u,v,w))~p0
3 ~sb/_!!   }
b00*!  c#T"!c"\"_c/__c/__! ""}
^ _~
 ~A(d(x,y,u,v,k)=abs(((X_k;Y_k;Z_k)-(x;y;z_0))*#~
 (u,v,w_0))/abs(u,v,w_0))~p0
4 ~sb/_!!   }
b00(!  c#T"!c"\"_c/__c/__!"}
^ _~A(~
 d(x,y,u,v,k)=sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-(~
 X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_~
 0)*v)^2)/sqrt(w_0^2+u^2+v^2))~p0
5 ~sb/_!!   }
"&!  c#T"!c"\"_c/__c/__}
^ _~A(d(?x,~
 ?y,?u,?v,?k)=sqrt((-(-?x+X_?k)*w_0+(-z_0+Z_?k)*~
 ?u)^2+((-?y+Y_?k)*w_0-(-z_0+Z_?k)*?v)^2+(-(-?y+~
 Y_?k)*?u+(-?x+X_?k)*?v)^2)/sqrt(w_0^2+?u^2+?v^~
 2))~p0
6 ~d~sb/_!!   }
b00.!  c#T"_c/__c/__! " # $ %"}
^ _~
 ~A(r(x,y,u,v)=1/n*Summation(k):(1):(n)*d(x,y,u,~
 v,k))~p1
2 ~A(r(x,y,u,v)=1/50*Summation(k):(1):(50)*d(x,y,~
 u,v,k))~p0
3 ~sb/_!!   }
$*!  c#T"!c"H#!c',#"c'8 _c/__c/__}
$*!  c#T"!c"H# c"\"!c'8 _c/__c/__}
^ _~
 ~A(r(x,y,u,v)=1/50*Summation(k):(1):(50)*sqrt(~
 (-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_~
 0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)/sqrt(w_0^~
 2+u^2+v^2))~p0
4 ~sb/_!!   }
b00*!  c#T"!c"H#"c#L"_c/__c/__!"}
^ _~
 ~A(r(?x,?y,?u,?v)=1/50*Summation(k):(1):(50)*sqrt(~
 (-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(~
 Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2)/sqrt(~
 w_0^2+?u^2+?v^2))~p0
5 ~d~sb/_!!   }
b00,!  c#T"_c/__c/__! " # $"}
^ _~
 ~Q
]|Expr|[#b @`bb#_b#_b#_})!# b$@" *|: ;bP8&c0!*gradient|
  |}& b!( b"0 b#8 b$@ b%H b&P!WW}]|[~p1
1 ~A(g(x,y,u,v)=(Diff(x)*f(x,y,u,v);Diff(y)*f(x,~
 y,u,v);Diff(u)*f(x,y,u,v);Diff(v)*f(x,y,u,v)))~p1
2 ~A(g(x,y,u,v)=(1/2*(Summation(k):(1):(50)*(2*(~
 -(X_k-x)*w_0+(Z_k-z_0)*u)*w_0-2*(-(Y_k-y)*u+(X_~
 k-x)*v)*v)/(w_0^2+u^2+v^2)-1/50*(Summation(k):(~
 1):(50)*sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*~
 w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)/~
 sqrt(w_0^2+u^2+v^2))*Summation(k):(1):(50)*(2*~
 (-(X_k-x)*w_0+(Z_k-z_0)*u)*w_0-2*(-(Y_k-y)*u+(~
 X_k-x)*v)*v)/(sqrt(w_0^2+u^2+v^2)*sqrt((-(Y_k-~
 y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+~
 ((Y_k-y)*w_0-(Z_k-z_0)*v)^2)));1/2*(Summation(~
 k):(1):(50)*(-2*((Y_k-y)*w_0-(Z_k-z_0)*v)*w_0+~
 2*(-(Y_k-y)*u+(X_k-x)*v)*u)/(w_0^2+u^2+v^2)-1/~
 50*(Summation(k):(1):(50)*sqrt((-(Y_k-y)*u+(X_~
 k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*~
 w_0-(Z_k-z_0)*v)^2)/sqrt(w_0^2+u^2+v^2))*Summation(~
 k):(1):(50)*(-2*((Y_k-y)*w_0-(Z_k-z_0)*v)*w_0+~
 2*(-(Y_k-y)*u+(X_k-x)*v)*u)/(sqrt(w_0^2+u^2+v^~
 2)*sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+~
 (Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)));~
 1/2*(-1/25*(Summation(k):(1):(50)*sqrt((-(Y_k-~
 y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+~
 ((Y_k-y)*w_0-(Z_k-z_0)*v)^2)/sqrt(w_0^2+u^2+v^~
 2))*Summation(k):(1):(50)*(1/2*(sqrt(w_0^2+u^2+~
 v^2)*(-2*(Y_k-y)*(-(Y_k-y)*u+(X_k-x)*v)+2*(Z_k-~
 z_0)*(-(X_k-x)*w_0+(Z_k-z_0)*u)))/sqrt((-(Y_k-~
 y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+~
 ((Y_k-y)*w_0-(Z_k-z_0)*v)^2)-(sqrt((-(Y_k-y)*u+~
 (X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_~
 k-y)*w_0-(Z_k-z_0)*v)^2)*u)/sqrt(w_0^2+u^2+v^2))/~
 (w_0^2+u^2+v^2)+2*Summation(k):(1):(50)*(sqrt(~
 (-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_~
 0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)*(1/2*(sqrt(~
 w_0^2+u^2+v^2)*(-2*(Y_k-y)*(-(Y_k-y)*u+(X_k-x)*~
 v)+2*(Z_k-z_0)*(-(X_k-x)*w_0+(Z_k-z_0)*u)))/sqrt(~
 (-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_~
 0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)-(sqrt((-(~
 Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*~
 u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)*u)/sqrt(w_0^~
 2+u^2+v^2)))/(w_0^2+u^2+v^2)^(3/2));1/2*(-1/25*~
 (Summation(k):(1):(50)*sqrt((-(Y_k-y)*u+(X_k-x)*~
 v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-~
 (Z_k-z_0)*v)^2)/sqrt(w_0^2+u^2+v^2))*Summation(~
 k):(1):(50)*(1/2*(sqrt(w_0^2+u^2+v^2)*(2*(X_k-~
 x)*(-(Y_k-y)*u+(X_k-x)*v)-2*(Z_k-z_0)*((Y_k-y)*~
 w_0-(Z_k-z_0)*v)))/sqrt((-(Y_k-y)*u+(X_k-x)*v)^~
 2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_~
 k-z_0)*v)^2)-(sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-~
 (X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_~
 0)*v)^2)*v)/sqrt(w_0^2+u^2+v^2))/(w_0^2+u^2+v^~
 2)+2*Summation(k):(1):(50)*(sqrt((-(Y_k-y)*u+(~
 X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-~
 y)*w_0-(Z_k-z_0)*v)^2)*(1/2*(sqrt(w_0^2+u^2+v^~
 2)*(2*(X_k-x)*(-(Y_k-y)*u+(X_k-x)*v)-2*(Z_k-z_~
 0)*((Y_k-y)*w_0-(Z_k-z_0)*v)))/sqrt((-(Y_k-y)*~
 u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((~
 Y_k-y)*w_0-(Z_k-z_0)*v)^2)-(sqrt((-(Y_k-y)*u+(~
 X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-~
 y)*w_0-(Z_k-z_0)*v)^2)*v)/sqrt(w_0^2+u^2+v^2)))/~
 (w_0^2+u^2+v^2)^(3/2))))~p0
3 ~sb/_!!   }
b00&!  c#T"_c/__c/__!"}
^ _~A(g(?x,~
 ?y,?u,?v)=(1/2*(Summation(k):(1):(50)*(2*(-(X_~
 k-?x)*w_0+(Z_k-z_0)*?u)*w_0-2*(-(Y_k-?y)*?u+(X_~
 k-?x)*?v)*?v)/(w_0^2+?u^2+?v^2)-1/50*(Summation(~
 k):(1):(50)*sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^~
 2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+~
 (X_k-?x)*?v)^2)/sqrt(w_0^2+?u^2+?v^2))*Summation(~
 k):(1):(50)*(2*(-(X_k-?x)*w_0+(Z_k-z_0)*?u)*w_~
 0-2*(-(Y_k-?y)*?u+(X_k-?x)*?v)*?v)/(sqrt(w_0^2+~
 ?u^2+?v^2)*sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+~
 ((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_~
 k-?x)*?v)^2)));1/2*(Summation(k):(1):(50)*(-2*~
 ((Y_k-?y)*w_0-(Z_k-z_0)*?v)*w_0+2*(-(Y_k-?y)*?u+~
 (X_k-?x)*?v)*?u)/(w_0^2+?u^2+?v^2)-1/50*(Summation(~
 k):(1):(50)*sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^~
 2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+~
 (X_k-?x)*?v)^2)/sqrt(w_0^2+?u^2+?v^2))*Summation(~
 k):(1):(50)*(-2*((Y_k-?y)*w_0-(Z_k-z_0)*?v)*w_~
 0+2*(-(Y_k-?y)*?u+(X_k-?x)*?v)*?u)/(sqrt(w_0^2+~
 ?u^2+?v^2)*sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+~
 ((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_~
 k-?x)*?v)^2)));1/2*(-1/25*(Summation(k):(1):(50)*~
 sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*~
 w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^~
 2)/sqrt(w_0^2+?u^2+?v^2))*Summation(k):(1):(50)*~
 (1/2*(sqrt(w_0^2+?u^2+?v^2)*(2*(Z_k-z_0)*(-(X_~
 k-?x)*w_0+(Z_k-z_0)*?u)-2*(Y_k-?y)*(-(Y_k-?y)*~
 ?u+(X_k-?x)*?v)))/sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*~
 ?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*~
 ?u+(X_k-?x)*?v)^2)-(sqrt((-(X_k-?x)*w_0+(Z_k-z_~
 0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-~
 ?y)*?u+(X_k-?x)*?v)^2)*?u)/sqrt(w_0^2+?u^2+?v^~
 2))/(w_0^2+?u^2+?v^2)+2*Summation(k):(1):(50)*~
 (sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*~
 w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^~
 2)*(1/2*(sqrt(w_0^2+?u^2+?v^2)*(2*(Z_k-z_0)*(-~
 (X_k-?x)*w_0+(Z_k-z_0)*?u)-2*(Y_k-?y)*(-(Y_k-?y)*~
 ?u+(X_k-?x)*?v)))/sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*~
 ?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*~
 ?u+(X_k-?x)*?v)^2)-(sqrt((-(X_k-?x)*w_0+(Z_k-z_~
 0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-~
 ?y)*?u+(X_k-?x)*?v)^2)*?u)/sqrt(w_0^2+?u^2+?v^~
 2)))/(w_0^2+?u^2+?v^2)^(3/2));1/2*(-1/25*(Summation(~
 k):(1):(50)*sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^~
 2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+~
 (X_k-?x)*?v)^2)/sqrt(w_0^2+?u^2+?v^2))*Summation(~
 k):(1):(50)*(1/2*(sqrt(w_0^2+?u^2+?v^2)*(-2*(Z_~
 k-z_0)*((Y_k-?y)*w_0-(Z_k-z_0)*?v)+2*(X_k-?x)*~
 (-(Y_k-?y)*?u+(X_k-?x)*?v)))/sqrt((-(X_k-?x)*w_~
 0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^~
 2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2)-(sqrt((-(X_k-?x)*~
 w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^~
 2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2)*?v)/sqrt(w_0^2+~
 ?u^2+?v^2))/(w_0^2+?u^2+?v^2)+2*Summation(k):(~
 1):(50)*(sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+(~
 (Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_~
 k-?x)*?v)^2)*(1/2*(sqrt(w_0^2+?u^2+?v^2)*(-2*(~
 Z_k-z_0)*((Y_k-?y)*w_0-(Z_k-z_0)*?v)+2*(X_k-?x)*~
 (-(Y_k-?y)*?u+(X_k-?x)*?v)))/sqrt((-(X_k-?x)*w_~
 0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^~
 2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2)-(sqrt((-(X_k-?x)*~
 w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^~
 2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2)*?v)/sqrt(w_0^2+~
 ?u^2+?v^2)))/(w_0^2+?u^2+?v^2)^(3/2))))~p0
4 ~d~sb/_!!   }
b00,!  c#T"_c/__c/__! " # $"}
^ _~
 ~Q
]|Expr|[#b @`bb#_b#_b#_})## b$@" *|: ;bP8&c0!*Hessian matrix|
  |}& b!( b"0 b#8 b$@ b%H b&P!WW}]|[~p1
1 ~A(H(x,y,u,v)=(Diff(x)*(g(x,y,u,v))_1,Diff(y)*~
 (g(x,y,u,v))_1,Diff(u)*(g(x,y,u,v))_1,Diff(v)*~
 (g(x,y,u,v))_1;Diff(x)*(g(x,y,u,v))_2,Diff(y)*~
 (g(x,y,u,v))_2,Diff(u)*(g(x,y,u,v))_2,Diff(v)*~
 (g(x,y,u,v))_2;Diff(x)*(g(x,y,u,v))_3,Diff(y)*~
 (g(x,y,u,v))_3,Diff(u)*(g(x,y,u,v))_3,Diff(v)*~
 (g(x,y,u,v))_3;Diff(x)*(g(x,y,u,v))_4,Diff(y)*~
 (g(x,y,u,v))_4,Diff(u)*(g(x,y,u,v))_4,Diff(v)*~
 (g(x,y,u,v))_4))~p1
2 ~A(H(x,y,u,v)=(1/2*(-1/50*(Summation(k):(1):(50)*~
 sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_~
 k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)/sqrt(~
 w_0^2+u^2+v^2))*Summation(k):(1):(50)*(sqrt(w_~
 0^2+u^2+v^2)*sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-(~
 X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_~
 0)*v)^2)*(2*w_0^2+2*v^2)-1/2*(sqrt(w_0^2+u^2+v^~
 2)*(2*(-(X_k-x)*w_0+(Z_k-z_0)*u)*w_0-2*(-(Y_k-~
 y)*u+(X_k-x)*v)*v)^2)/sqrt((-(Y_k-y)*u+(X_k-x)*~
 v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-~
 (Z_k-z_0)*v)^2))*1/(sqrt(w_0^2+u^2+v^2)*sqrt((~
 -(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*~
 u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2))^2+Summation(~
 k):(1):(50)*(2*w_0^2+2*v^2)/(w_0^2+u^2+v^2)-1/~
 100*(Summation(k):(1):(50)*(2*(-(X_k-x)*w_0+(Z_~
 k-z_0)*u)*w_0-2*(-(Y_k-y)*u+(X_k-x)*v)*v)/(sqrt(~
 w_0^2+u^2+v^2)*sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(~
 -(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-~
 z_0)*v)^2)))*Summation(k):(1):(50)*(2*(-(X_k-x)*~
 w_0+(Z_k-z_0)*u)*w_0-2*(-(Y_k-y)*u+(X_k-x)*v)*~
 v)/(sqrt(w_0^2+u^2+v^2)*sqrt((-(Y_k-y)*u+(X_k-~
 x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*~
 w_0-(Z_k-z_0)*v)^2))),1/2*(-1/50*(Summation(k):(~
 1):(50)*sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*~
 w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)/~
 sqrt(w_0^2+u^2+v^2))*Summation(k):(1):(50)*(-1/~
 2*(sqrt(w_0^2+u^2+v^2)*(2*(-(X_k-x)*w_0+(Z_k-z_~
 0)*u)*w_0-2*(-(Y_k-y)*u+(X_k-x)*v)*v)*(-2*((Y_~
 k-y)*w_0-(Z_k-z_0)*v)*w_0+2*(-(Y_k-y)*u+(X_k-x)*~
 v)*u))/sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*~
 w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)-~
 2*sqrt(w_0^2+u^2+v^2)*sqrt((-(Y_k-y)*u+(X_k-x)*~
 v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-~
 (Z_k-z_0)*v)^2)*u*v)*1/(sqrt(w_0^2+u^2+v^2)*sqrt(~
 (-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_~
 0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2))^2-1/100*~
 (Summation(k):(1):(50)*(-2*((Y_k-y)*w_0-(Z_k-z_~
 0)*v)*w_0+2*(-(Y_k-y)*u+(X_k-x)*v)*u)/(sqrt(w_~
 0^2+u^2+v^2)*sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-(~
 X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_~
 0)*v)^2)))*Summation(k):(1):(50)*(2*(-(X_k-x)*~
 w_0+(Z_k-z_0)*u)*w_0-2*(-(Y_k-y)*u+(X_k-x)*v)*~
 v)/(sqrt(w_0^2+u^2+v^2)*sqrt((-(Y_k-y)*u+(X_k-~
 x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*~
 w_0-(Z_k-z_0)*v)^2))-2*Summation(k):(1):(50)*(~
 u*v)/(w_0^2+u^2+v^2)),1/2*(-1/50*(Summation(k):(~
 1):(50)*sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*~
 w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)/~
 sqrt(w_0^2+u^2+v^2))*Summation(k):(1):(50)*(sqrt(~
 w_0^2+u^2+v^2)*sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(~
 -(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-~
 z_0)*v)^2)*(2*(Z_k-z_0)*w_0+2*(Y_k-y)*v)-(1/2*~
 (sqrt(w_0^2+u^2+v^2)*(-2*(Y_k-y)*(-(Y_k-y)*u+(~
 X_k-x)*v)+2*(Z_k-z_0)*(-(X_k-x)*w_0+(Z_k-z_0)*~
 u)))/sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_~
 0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)+~
 (sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(~
 Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)*u)/~
 sqrt(w_0^2+u^2+v^2))*(2*(-(X_k-x)*w_0+(Z_k-z_0)*~
 u)*w_0-2*(-(Y_k-y)*u+(X_k-x)*v)*v))*1/(sqrt(w_~
 0^2+u^2+v^2)*sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-(~
 X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_~
 0)*v)^2))^2+Summation(k):(1):(50)*((w_0^2+u^2+~
 v^2)*(2*(Z_k-z_0)*w_0+2*(Y_k-y)*v)-2*(2*(-(X_k-~
 x)*w_0+(Z_k-z_0)*u)*w_0-2*(-(Y_k-y)*u+(X_k-x)*~
 v)*v)*u)/(w_0^2+u^2+v^2)^2-1/50*(Summation(k):(~
 1):(50)*(1/2*(sqrt(w_0^2+u^2+v^2)*(-2*(Y_k-y)*~
 (-(Y_k-y)*u+(X_k-x)*v)+2*(Z_k-z_0)*(-(X_k-x)*w_~
 0+(Z_k-z_0)*u)))/sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+~
 (-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-~
 z_0)*v)^2)-(sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_~
 k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*~
 v)^2)*u)/sqrt(w_0^2+u^2+v^2))/(w_0^2+u^2+v^2))*~
 Summation(k):(1):(50)*(2*(-(X_k-x)*w_0+(Z_k-z_~
 0)*u)*w_0-2*(-(Y_k-y)*u+(X_k-x)*v)*v)/(sqrt(w_~
 0^2+u^2+v^2)*sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-(~
 X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_~
 0)*v)^2))),1/2*(-1/50*(Summation(k):(1):(50)*sqrt(~
 (-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_~
 0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)/sqrt(w_0^~
 2+u^2+v^2))*Summation(k):(1):(50)*(sqrt(w_0^2+~
 u^2+v^2)*sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-~
 x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^~
 2)*(-2*(-(Y_k-y)*u+(X_k-x)*v)-2*(X_k-x)*v)-(1/~
 2*(sqrt(w_0^2+u^2+v^2)*(2*(X_k-x)*(-(Y_k-y)*u+~
 (X_k-x)*v)-2*(Z_k-z_0)*((Y_k-y)*w_0-(Z_k-z_0)*~
 v)))/sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_~
 0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)+~
 (sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(~
 Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)*v)/~
 sqrt(w_0^2+u^2+v^2))*(2*(-(X_k-x)*w_0+(Z_k-z_0)*~
 u)*w_0-2*(-(Y_k-y)*u+(X_k-x)*v)*v))*1/(sqrt(w_~
 0^2+u^2+v^2)*sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-(~
 X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_~
 0)*v)^2))^2+Summation(k):(1):(50)*((w_0^2+u^2+~
 v^2)*(-2*(-(Y_k-y)*u+(X_k-x)*v)-2*(X_k-x)*v)-2*~
 (2*(-(X_k-x)*w_0+(Z_k-z_0)*u)*w_0-2*(-(Y_k-y)*~
 u+(X_k-x)*v)*v)*v)/(w_0^2+u^2+v^2)^2-1/50*(Summation(~
 k):(1):(50)*(1/2*(sqrt(w_0^2+u^2+v^2)*(2*(X_k-~
 x)*(-(Y_k-y)*u+(X_k-x)*v)-2*(Z_k-z_0)*((Y_k-y)*~
 w_0-(Z_k-z_0)*v)))/sqrt((-(Y_k-y)*u+(X_k-x)*v)^~
 2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_~
 k-z_0)*v)^2)-(sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-~
 (X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_~
 0)*v)^2)*v)/sqrt(w_0^2+u^2+v^2))/(w_0^2+u^2+v^~
 2))*Summation(k):(1):(50)*(2*(-(X_k-x)*w_0+(Z_~
 k-z_0)*u)*w_0-2*(-(Y_k-y)*u+(X_k-x)*v)*v)/(sqrt(~
 w_0^2+u^2+v^2)*sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(~
 -(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-~
 z_0)*v)^2)));1/2*(-1/50*(Summation(k):(1):(50)*~
 sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_~
 k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)/sqrt(~
 w_0^2+u^2+v^2))*Summation(k):(1):(50)*(-1/2*(sqrt(~
 w_0^2+u^2+v^2)*(2*(-(X_k-x)*w_0+(Z_k-z_0)*u)*w_~
 0-2*(-(Y_k-y)*u+(X_k-x)*v)*v)*(-2*((Y_k-y)*w_0-~
 (Z_k-z_0)*v)*w_0+2*(-(Y_k-y)*u+(X_k-x)*v)*u))/~
 sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_~
 k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)-2*sqrt(~
 w_0^2+u^2+v^2)*sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(~
 -(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-~
 z_0)*v)^2)*u*v)*1/(sqrt(w_0^2+u^2+v^2)*sqrt((-~
 (Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*~
 u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2))^2-1/100*(Summation(~
 k):(1):(50)*(2*(-(X_k-x)*w_0+(Z_k-z_0)*u)*w_0-~
 2*(-(Y_k-y)*u+(X_k-x)*v)*v)/(sqrt(w_0^2+u^2+v^~
 2)*sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+~
 (Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)))*~
 Summation(k):(1):(50)*(-2*((Y_k-y)*w_0-(Z_k-z_~
 0)*v)*w_0+2*(-(Y_k-y)*u+(X_k-x)*v)*u)/(sqrt(w_~
 0^2+u^2+v^2)*sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-(~
 X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_~
 0)*v)^2))-2*Summation(k):(1):(50)*(u*v)/(w_0^2+~
 u^2+v^2)),1/2*(-1/50*(Summation(k):(1):(50)*sqrt(~
 (-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_~
 0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)/sqrt(w_0^~
 2+u^2+v^2))*Summation(k):(1):(50)*(sqrt(w_0^2+~
 u^2+v^2)*sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-~
 x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^~
 2)*(2*w_0^2+2*u^2)-1/2*(sqrt(w_0^2+u^2+v^2)*(-~
 2*((Y_k-y)*w_0-(Z_k-z_0)*v)*w_0+2*(-(Y_k-y)*u+~
 (X_k-x)*v)*u)^2)/sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+~
 (-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-~
 z_0)*v)^2))*1/(sqrt(w_0^2+u^2+v^2)*sqrt((-(Y_k-~
 y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+~
 ((Y_k-y)*w_0-(Z_k-z_0)*v)^2))^2+Summation(k):(~
 1):(50)*(2*w_0^2+2*u^2)/(w_0^2+u^2+v^2)-1/100*~
 (Summation(k):(1):(50)*(-2*((Y_k-y)*w_0-(Z_k-z_~
 0)*v)*w_0+2*(-(Y_k-y)*u+(X_k-x)*v)*u)/(sqrt(w_~
 0^2+u^2+v^2)*sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-(~
 X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_~
 0)*v)^2)))*Summation(k):(1):(50)*(-2*((Y_k-y)*~
 w_0-(Z_k-z_0)*v)*w_0+2*(-(Y_k-y)*u+(X_k-x)*v)*~
 u)/(sqrt(w_0^2+u^2+v^2)*sqrt((-(Y_k-y)*u+(X_k-~
 x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*~
 w_0-(Z_k-z_0)*v)^2))),1/2*(-1/50*(Summation(k):(~
 1):(50)*sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*~
 w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)/~
 sqrt(w_0^2+u^2+v^2))*Summation(k):(1):(50)*(sqrt(~
 w_0^2+u^2+v^2)*sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(~
 -(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-~
 z_0)*v)^2)*(2*(-(Y_k-y)*u+(X_k-x)*v)-2*(Y_k-y)*~
 u)-(1/2*(sqrt(w_0^2+u^2+v^2)*(-2*(Y_k-y)*(-(Y_~
 k-y)*u+(X_k-x)*v)+2*(Z_k-z_0)*(-(X_k-x)*w_0+(Z_~
 k-z_0)*u)))/sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_~
 k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*~
 v)^2)+(sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*~
 w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)*~
 u)/sqrt(w_0^2+u^2+v^2))*(-2*((Y_k-y)*w_0-(Z_k-~
 z_0)*v)*w_0+2*(-(Y_k-y)*u+(X_k-x)*v)*u))*1/(sqrt(~
 w_0^2+u^2+v^2)*sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(~
 -(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-~
 z_0)*v)^2))^2+Summation(k):(1):(50)*((w_0^2+u^~
 2+v^2)*(2*(-(Y_k-y)*u+(X_k-x)*v)-2*(Y_k-y)*u)-~
 2*(-2*((Y_k-y)*w_0-(Z_k-z_0)*v)*w_0+2*(-(Y_k-y)*~
 u+(X_k-x)*v)*u)*u)/(w_0^2+u^2+v^2)^2-1/50*(Summation(~
 k):(1):(50)*(1/2*(sqrt(w_0^2+u^2+v^2)*(-2*(Y_k-~
 y)*(-(Y_k-y)*u+(X_k-x)*v)+2*(Z_k-z_0)*(-(X_k-x)*~
 w_0+(Z_k-z_0)*u)))/sqrt((-(Y_k-y)*u+(X_k-x)*v)^~
 2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_~
 k-z_0)*v)^2)-(sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-~
 (X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_~
 0)*v)^2)*u)/sqrt(w_0^2+u^2+v^2))/(w_0^2+u^2+v^~
 2))*Summation(k):(1):(50)*(-2*((Y_k-y)*w_0-(Z_~
 k-z_0)*v)*w_0+2*(-(Y_k-y)*u+(X_k-x)*v)*u)/(sqrt(~
 w_0^2+u^2+v^2)*sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(~
 -(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-~
 z_0)*v)^2))),1/2*(-1/50*(Summation(k):(1):(50)*~
 sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_~
 k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)/sqrt(~
 w_0^2+u^2+v^2))*Summation(k):(1):(50)*(sqrt(w_~
 0^2+u^2+v^2)*sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-(~
 X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_~
 0)*v)^2)*(2*(Z_k-z_0)*w_0+2*(X_k-x)*u)-(1/2*(sqrt(~
 w_0^2+u^2+v^2)*(2*(X_k-x)*(-(Y_k-y)*u+(X_k-x)*~
 v)-2*(Z_k-z_0)*((Y_k-y)*w_0-(Z_k-z_0)*v)))/sqrt(~
 (-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_~
 0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)+(sqrt((-(~
 Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*~
 u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)*v)/sqrt(w_0^~
 2+u^2+v^2))*(-2*((Y_k-y)*w_0-(Z_k-z_0)*v)*w_0+~
 2*(-(Y_k-y)*u+(X_k-x)*v)*u))*1/(sqrt(w_0^2+u^2+~
 v^2)*sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_~
 0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2))^~
 2+Summation(k):(1):(50)*((w_0^2+u^2+v^2)*(2*(Z_~
 k-z_0)*w_0+2*(X_k-x)*u)-2*(-2*((Y_k-y)*w_0-(Z_~
 k-z_0)*v)*w_0+2*(-(Y_k-y)*u+(X_k-x)*v)*u)*v)/(~
 w_0^2+u^2+v^2)^2-1/50*(Summation(k):(1):(50)*(~
 1/2*(sqrt(w_0^2+u^2+v^2)*(2*(X_k-x)*(-(Y_k-y)*~
 u+(X_k-x)*v)-2*(Z_k-z_0)*((Y_k-y)*w_0-(Z_k-z_0)*~
 v)))/sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_~
 0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)-~
 (sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(~
 Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)*v)/~
 sqrt(w_0^2+u^2+v^2))/(w_0^2+u^2+v^2))*Summation(~
 k):(1):(50)*(-2*((Y_k-y)*w_0-(Z_k-z_0)*v)*w_0+~
 2*(-(Y_k-y)*u+(X_k-x)*v)*u)/(sqrt(w_0^2+u^2+v^~
 2)*sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+~
 (Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)));~
 1/2*(2*Summation(k):(1):(50)*(sqrt((-(Y_k-y)*u+~
 (X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_~
 k-y)*w_0-(Z_k-z_0)*v)^2)*(1/2*(sqrt(w_0^2+u^2+~
 v^2)*sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_~
 0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)*~
 (2*(Z_k-z_0)*w_0+2*(Y_k-y)*v)-1/2*(sqrt(w_0^2+~
 u^2+v^2)*(-2*(Y_k-y)*(-(Y_k-y)*u+(X_k-x)*v)+2*~
 (Z_k-z_0)*(-(X_k-x)*w_0+(Z_k-z_0)*u))*(2*(-(X_~
 k-x)*w_0+(Z_k-z_0)*u)*w_0-2*(-(Y_k-y)*u+(X_k-x)*~
 v)*v))/sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*~
 w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2))/~
 ((-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_~
 0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)-1/2*((2*(~
 -(X_k-x)*w_0+(Z_k-z_0)*u)*w_0-2*(-(Y_k-y)*u+(X_~
 k-x)*v)*v)*u)/(sqrt(w_0^2+u^2+v^2)*sqrt((-(Y_k-~
 y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+~
 ((Y_k-y)*w_0-(Z_k-z_0)*v)^2)))+1/2*((1/2*(sqrt(~
 w_0^2+u^2+v^2)*(-2*(Y_k-y)*(-(Y_k-y)*u+(X_k-x)*~
 v)+2*(Z_k-z_0)*(-(X_k-x)*w_0+(Z_k-z_0)*u)))/sqrt(~
 (-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_~
 0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)-(sqrt((-(~
 Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*~
 u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)*u)/sqrt(w_0^~
 2+u^2+v^2))*(2*(-(X_k-x)*w_0+(Z_k-z_0)*u)*w_0-~
 2*(-(Y_k-y)*u+(X_k-x)*v)*v))/sqrt((-(Y_k-y)*u+~
 (X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_~
 k-y)*w_0-(Z_k-z_0)*v)^2))/(w_0^2+u^2+v^2)^(3/2)-~
 1/25*(Summation(k):(1):(50)*sqrt((-(Y_k-y)*u+(~
 X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-~
 y)*w_0-(Z_k-z_0)*v)^2)/sqrt(w_0^2+u^2+v^2))*Summation(~
 k):(1):(50)*(1/2*(sqrt(w_0^2+u^2+v^2)*sqrt((-(~
 Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*~
 u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)*(2*(Z_k-z_0)*~
 w_0+2*(Y_k-y)*v)-1/2*(sqrt(w_0^2+u^2+v^2)*(-2*~
 (Y_k-y)*(-(Y_k-y)*u+(X_k-x)*v)+2*(Z_k-z_0)*(-(~
 X_k-x)*w_0+(Z_k-z_0)*u))*(2*(-(X_k-x)*w_0+(Z_k-~
 z_0)*u)*w_0-2*(-(Y_k-y)*u+(X_k-x)*v)*v))/sqrt(~
 (-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_~
 0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2))/((-(Y_k-~
 y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+~
 ((Y_k-y)*w_0-(Z_k-z_0)*v)^2)-1/2*((2*(-(X_k-x)*~
 w_0+(Z_k-z_0)*u)*w_0-2*(-(Y_k-y)*u+(X_k-x)*v)*~
 v)*u)/(sqrt(w_0^2+u^2+v^2)*sqrt((-(Y_k-y)*u+(X_~
 k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*~
 w_0-(Z_k-z_0)*v)^2)))/(w_0^2+u^2+v^2)-1/50*(Summation(~
 k):(1):(50)*(2*(-(X_k-x)*w_0+(Z_k-z_0)*u)*w_0-~
 2*(-(Y_k-y)*u+(X_k-x)*v)*v)/(sqrt(w_0^2+u^2+v^~
 2)*sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+~
 (Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)))*~
 Summation(k):(1):(50)*(1/2*(sqrt(w_0^2+u^2+v^2)*~
 (-2*(Y_k-y)*(-(Y_k-y)*u+(X_k-x)*v)+2*(Z_k-z_0)*~
 (-(X_k-x)*w_0+(Z_k-z_0)*u)))/sqrt((-(Y_k-y)*u+~
 (X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_~
 k-y)*w_0-(Z_k-z_0)*v)^2)-(sqrt((-(Y_k-y)*u+(X_~
 k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*~
 w_0-(Z_k-z_0)*v)^2)*u)/sqrt(w_0^2+u^2+v^2))/(w_~
 0^2+u^2+v^2)),1/2*(2*Summation(k):(1):(50)*(sqrt(~
 (-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_~
 0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)*(1/2*(sqrt(~
 w_0^2+u^2+v^2)*sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(~
 -(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-~
 z_0)*v)^2)*(2*(-(Y_k-y)*u+(X_k-x)*v)-2*(Y_k-y)*~
 u)-1/2*(sqrt(w_0^2+u^2+v^2)*(-2*(Y_k-y)*(-(Y_k-~
 y)*u+(X_k-x)*v)+2*(Z_k-z_0)*(-(X_k-x)*w_0+(Z_k-~
 z_0)*u))*(-2*((Y_k-y)*w_0-(Z_k-z_0)*v)*w_0+2*(~
 -(Y_k-y)*u+(X_k-x)*v)*u))/sqrt((-(Y_k-y)*u+(X_~
 k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*~
 w_0-(Z_k-z_0)*v)^2))/((-(Y_k-y)*u+(X_k-x)*v)^2+~
 (-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-~
 z_0)*v)^2)-1/2*((-2*((Y_k-y)*w_0-(Z_k-z_0)*v)*~
 w_0+2*(-(Y_k-y)*u+(X_k-x)*v)*u)*u)/(sqrt(w_0^2+~
 u^2+v^2)*sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-~
 x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^~
 2)))+1/2*((1/2*(sqrt(w_0^2+u^2+v^2)*(-2*(Y_k-y)*~
 (-(Y_k-y)*u+(X_k-x)*v)+2*(Z_k-z_0)*(-(X_k-x)*w_~
 0+(Z_k-z_0)*u)))/sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+~
 (-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-~
 z_0)*v)^2)-(sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_~
 k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*~
 v)^2)*u)/sqrt(w_0^2+u^2+v^2))*(-2*((Y_k-y)*w_0-~
 (Z_k-z_0)*v)*w_0+2*(-(Y_k-y)*u+(X_k-x)*v)*u))/~
 sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_~
 k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2))/(w_0^~
 2+u^2+v^2)^(3/2)-1/25*(Summation(k):(1):(50)*sqrt(~
 (-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_~
 0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)/sqrt(w_0^~
 2+u^2+v^2))*Summation(k):(1):(50)*(1/2*(sqrt(w_~
 0^2+u^2+v^2)*sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-(~
 X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_~
 0)*v)^2)*(2*(-(Y_k-y)*u+(X_k-x)*v)-2*(Y_k-y)*u)-~
 1/2*(sqrt(w_0^2+u^2+v^2)*(-2*(Y_k-y)*(-(Y_k-y)*~
 u+(X_k-x)*v)+2*(Z_k-z_0)*(-(X_k-x)*w_0+(Z_k-z_~
 0)*u))*(-2*((Y_k-y)*w_0-(Z_k-z_0)*v)*w_0+2*(-(~
 Y_k-y)*u+(X_k-x)*v)*u))/sqrt((-(Y_k-y)*u+(X_k-~
 x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*~
 w_0-(Z_k-z_0)*v)^2))/((-(Y_k-y)*u+(X_k-x)*v)^2+~
 (-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-~
 z_0)*v)^2)-1/2*((-2*((Y_k-y)*w_0-(Z_k-z_0)*v)*~
 w_0+2*(-(Y_k-y)*u+(X_k-x)*v)*u)*u)/(sqrt(w_0^2+~
 u^2+v^2)*sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-~
 x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^~
 2)))/(w_0^2+u^2+v^2)-1/50*(Summation(k):(1):(50)*~
 (-2*((Y_k-y)*w_0-(Z_k-z_0)*v)*w_0+2*(-(Y_k-y)*~
 u+(X_k-x)*v)*u)/(sqrt(w_0^2+u^2+v^2)*sqrt((-(Y_~
 k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^~
 2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)))*Summation(k):(~
 1):(50)*(1/2*(sqrt(w_0^2+u^2+v^2)*(-2*(Y_k-y)*~
 (-(Y_k-y)*u+(X_k-x)*v)+2*(Z_k-z_0)*(-(X_k-x)*w_~
 0+(Z_k-z_0)*u)))/sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+~
 (-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-~
 z_0)*v)^2)-(sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_~
 k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*~
 v)^2)*u)/sqrt(w_0^2+u^2+v^2))/(w_0^2+u^2+v^2)),~
 1/2*(-1/25*(Summation(k):(1):(50)*sqrt((-(Y_k-~
 y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+~
 ((Y_k-y)*w_0-(Z_k-z_0)*v)^2)/sqrt(w_0^2+u^2+v^~
 2))*Summation(k):(1):(50)*((w_0^2+u^2+v^2)*(-(~
 sqrt(w_0^2+u^2+v^2)*(sqrt((-(Y_k-y)*u+(X_k-x)*~
 v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-~
 (Z_k-z_0)*v)^2)+1/2*((-2*(Y_k-y)*(-(Y_k-y)*u+(~
 X_k-x)*v)+2*(Z_k-z_0)*(-(X_k-x)*w_0+(Z_k-z_0)*~
 u))*u)/sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*~
 w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2))-~
 (sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(~
 Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)*u^2)/~
 sqrt(w_0^2+u^2+v^2))/(w_0^2+u^2+v^2)+1/2*(sqrt(~
 (-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_~
 0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)*(sqrt(w_0^~
 2+u^2+v^2)*(2*(Y_k-y)^2+2*(Z_k-z_0)^2)+((-2*(Y_~
 k-y)*(-(Y_k-y)*u+(X_k-x)*v)+2*(Z_k-z_0)*(-(X_k-~
 x)*w_0+(Z_k-z_0)*u))*u)/sqrt(w_0^2+u^2+v^2))-1/~
 2*(sqrt(w_0^2+u^2+v^2)*(-2*(Y_k-y)*(-(Y_k-y)*u+~
 (X_k-x)*v)+2*(Z_k-z_0)*(-(X_k-x)*w_0+(Z_k-z_0)*~
 u))^2)/sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*~
 w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2))/~
 ((-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_~
 0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2))-2*(1/2*(~
 sqrt(w_0^2+u^2+v^2)*(-2*(Y_k-y)*(-(Y_k-y)*u+(X_~
 k-x)*v)+2*(Z_k-z_0)*(-(X_k-x)*w_0+(Z_k-z_0)*u)))/~
 sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_~
 k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)-(sqrt(~
 (-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_~
 0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)*u)/sqrt(w_~
 0^2+u^2+v^2))*u)/(w_0^2+u^2+v^2)^2+2*Summation(~
 k):(1):(50)*((w_0^2+u^2+v^2)^(3/2)*(sqrt((-(Y_~
 k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^~
 2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)*(-(sqrt(w_0^2+u^~
 2+v^2)*(sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*~
 w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)+~
 1/2*((-2*(Y_k-y)*(-(Y_k-y)*u+(X_k-x)*v)+2*(Z_k-~
 z_0)*(-(X_k-x)*w_0+(Z_k-z_0)*u))*u)/sqrt((-(Y_~
 k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^~
 2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2))-(sqrt((-(Y_k-y)*~
 u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((~
 Y_k-y)*w_0-(Z_k-z_0)*v)^2)*u^2)/sqrt(w_0^2+u^2+~
 v^2))/(w_0^2+u^2+v^2)+1/2*(sqrt((-(Y_k-y)*u+(X_~
 k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*~
 w_0-(Z_k-z_0)*v)^2)*(sqrt(w_0^2+u^2+v^2)*(2*(Y_~
 k-y)^2+2*(Z_k-z_0)^2)+((-2*(Y_k-y)*(-(Y_k-y)*u+~
 (X_k-x)*v)+2*(Z_k-z_0)*(-(X_k-x)*w_0+(Z_k-z_0)*~
 u))*u)/sqrt(w_0^2+u^2+v^2))-1/2*(sqrt(w_0^2+u^~
 2+v^2)*(-2*(Y_k-y)*(-(Y_k-y)*u+(X_k-x)*v)+2*(Z_~
 k-z_0)*(-(X_k-x)*w_0+(Z_k-z_0)*u))^2)/sqrt((-(~
 Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*~
 u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2))/((-(Y_k-y)*~
 u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((~
 Y_k-y)*w_0-(Z_k-z_0)*v)^2))+1/2*((-2*(Y_k-y)*(~
 -(Y_k-y)*u+(X_k-x)*v)+2*(Z_k-z_0)*(-(X_k-x)*w_~
 0+(Z_k-z_0)*u))*(1/2*(sqrt(w_0^2+u^2+v^2)*(-2*~
 (Y_k-y)*(-(Y_k-y)*u+(X_k-x)*v)+2*(Z_k-z_0)*(-(~
 X_k-x)*w_0+(Z_k-z_0)*u)))/sqrt((-(Y_k-y)*u+(X_~
 k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*~
 w_0-(Z_k-z_0)*v)^2)-(sqrt((-(Y_k-y)*u+(X_k-x)*~
 v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-~
 (Z_k-z_0)*v)^2)*u)/sqrt(w_0^2+u^2+v^2)))/sqrt(~
 (-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_~
 0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2))-3*sqrt(w_~
 0^2+u^2+v^2)*sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-(~
 X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_~
 0)*v)^2)*(1/2*(sqrt(w_0^2+u^2+v^2)*(-2*(Y_k-y)*~
 (-(Y_k-y)*u+(X_k-x)*v)+2*(Z_k-z_0)*(-(X_k-x)*w_~
 0+(Z_k-z_0)*u)))/sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+~
 (-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-~
 z_0)*v)^2)-(sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_~
 k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*~
 v)^2)*u)/sqrt(w_0^2+u^2+v^2))*u)/(w_0^2+u^2+v^~
 2)^3-1/25*(Summation(k):(1):(50)*(1/2*(sqrt(w_~
 0^2+u^2+v^2)*(-2*(Y_k-y)*(-(Y_k-y)*u+(X_k-x)*v)+~
 2*(Z_k-z_0)*(-(X_k-x)*w_0+(Z_k-z_0)*u)))/sqrt(~
 (-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_~
 0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)-(sqrt((-(~
 Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*~
 u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)*u)/sqrt(w_0^~
 2+u^2+v^2))/(w_0^2+u^2+v^2))*Summation(k):(1):(~
 50)*(1/2*(sqrt(w_0^2+u^2+v^2)*(-2*(Y_k-y)*(-(Y_~
 k-y)*u+(X_k-x)*v)+2*(Z_k-z_0)*(-(X_k-x)*w_0+(Z_~
 k-z_0)*u)))/sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_~
 k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*~
 v)^2)-(sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*~
 w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)*~
 u)/sqrt(w_0^2+u^2+v^2))/(w_0^2+u^2+v^2)),1/2*(~
 2*Summation(k):(1):(50)*((w_0^2+u^2+v^2)^(3/2)*~
 (sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(~
 Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)*(1/~
 2*(sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+~
 (Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)*(-~
 2*sqrt(w_0^2+u^2+v^2)*(X_k-x)*(Y_k-y)+((-2*(Y_~
 k-y)*(-(Y_k-y)*u+(X_k-x)*v)+2*(Z_k-z_0)*(-(X_k-~
 x)*w_0+(Z_k-z_0)*u))*v)/sqrt(w_0^2+u^2+v^2))-1/~
 2*(sqrt(w_0^2+u^2+v^2)*(2*(X_k-x)*(-(Y_k-y)*u+~
 (X_k-x)*v)-2*(Z_k-z_0)*((Y_k-y)*w_0-(Z_k-z_0)*~
 v))*(-2*(Y_k-y)*(-(Y_k-y)*u+(X_k-x)*v)+2*(Z_k-~
 z_0)*(-(X_k-x)*w_0+(Z_k-z_0)*u)))/sqrt((-(Y_k-~
 y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+~
 ((Y_k-y)*w_0-(Z_k-z_0)*v)^2))/((-(Y_k-y)*u+(X_~
 k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*~
 w_0-(Z_k-z_0)*v)^2)-(1/2*(sqrt(w_0^2+u^2+v^2)*~
 (2*(X_k-x)*(-(Y_k-y)*u+(X_k-x)*v)-2*(Z_k-z_0)*~
 ((Y_k-y)*w_0-(Z_k-z_0)*v))*u)/sqrt((-(Y_k-y)*u+~
 (X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_~
 k-y)*w_0-(Z_k-z_0)*v)^2)-(sqrt((-(Y_k-y)*u+(X_~
 k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*~
 w_0-(Z_k-z_0)*v)^2)*u*v)/sqrt(w_0^2+u^2+v^2))/~
 (w_0^2+u^2+v^2))+1/2*((2*(X_k-x)*(-(Y_k-y)*u+(~
 X_k-x)*v)-2*(Z_k-z_0)*((Y_k-y)*w_0-(Z_k-z_0)*v))*~
 (1/2*(sqrt(w_0^2+u^2+v^2)*(-2*(Y_k-y)*(-(Y_k-y)*~
 u+(X_k-x)*v)+2*(Z_k-z_0)*(-(X_k-x)*w_0+(Z_k-z_~
 0)*u)))/sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*~
 w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)-~
 (sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(~
 Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)*u)/~
 sqrt(w_0^2+u^2+v^2)))/sqrt((-(Y_k-y)*u+(X_k-x)*~
 v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-~
 (Z_k-z_0)*v)^2))-3*sqrt(w_0^2+u^2+v^2)*sqrt((-~
 (Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*~
 u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)*(1/2*(sqrt(w_~
 0^2+u^2+v^2)*(-2*(Y_k-y)*(-(Y_k-y)*u+(X_k-x)*v)+~
 2*(Z_k-z_0)*(-(X_k-x)*w_0+(Z_k-z_0)*u)))/sqrt(~
 (-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_~
 0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)-(sqrt((-(~
 Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*~
 u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)*u)/sqrt(w_0^~
 2+u^2+v^2))*v)/(w_0^2+u^2+v^2)^3-1/25*(Summation(~
 k):(1):(50)*sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_~
 k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*~
 v)^2)/sqrt(w_0^2+u^2+v^2))*Summation(k):(1):(50)*~
 ((w_0^2+u^2+v^2)*(1/2*(sqrt((-(Y_k-y)*u+(X_k-x)*~
 v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-~
 (Z_k-z_0)*v)^2)*(-2*sqrt(w_0^2+u^2+v^2)*(X_k-x)*~
 (Y_k-y)+((-2*(Y_k-y)*(-(Y_k-y)*u+(X_k-x)*v)+2*~
 (Z_k-z_0)*(-(X_k-x)*w_0+(Z_k-z_0)*u))*v)/sqrt(~
 w_0^2+u^2+v^2))-1/2*(sqrt(w_0^2+u^2+v^2)*(2*(X_~
 k-x)*(-(Y_k-y)*u+(X_k-x)*v)-2*(Z_k-z_0)*((Y_k-~
 y)*w_0-(Z_k-z_0)*v))*(-2*(Y_k-y)*(-(Y_k-y)*u+(~
 X_k-x)*v)+2*(Z_k-z_0)*(-(X_k-x)*w_0+(Z_k-z_0)*~
 u)))/sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_~
 0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2))/~
 ((-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_~
 0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)-(1/2*(sqrt(~
 w_0^2+u^2+v^2)*(2*(X_k-x)*(-(Y_k-y)*u+(X_k-x)*~
 v)-2*(Z_k-z_0)*((Y_k-y)*w_0-(Z_k-z_0)*v))*u)/sqrt(~
 (-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_~
 0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)-(sqrt((-(~
 Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*~
 u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)*u*v)/sqrt(w_~
 0^2+u^2+v^2))/(w_0^2+u^2+v^2))-2*(1/2*(sqrt(w_~
 0^2+u^2+v^2)*(-2*(Y_k-y)*(-(Y_k-y)*u+(X_k-x)*v)+~
 2*(Z_k-z_0)*(-(X_k-x)*w_0+(Z_k-z_0)*u)))/sqrt(~
 (-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_~
 0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)-(sqrt((-(~
 Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*~
 u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)*u)/sqrt(w_0^~
 2+u^2+v^2))*v)/(w_0^2+u^2+v^2)^2-1/25*(Summation(~
 k):(1):(50)*(1/2*(sqrt(w_0^2+u^2+v^2)*(2*(X_k-~
 x)*(-(Y_k-y)*u+(X_k-x)*v)-2*(Z_k-z_0)*((Y_k-y)*~
 w_0-(Z_k-z_0)*v)))/sqrt((-(Y_k-y)*u+(X_k-x)*v)^~
 2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_~
 k-z_0)*v)^2)-(sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-~
 (X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_~
 0)*v)^2)*v)/sqrt(w_0^2+u^2+v^2))/(w_0^2+u^2+v^~
 2))*Summation(k):(1):(50)*(1/2*(sqrt(w_0^2+u^2+~
 v^2)*(-2*(Y_k-y)*(-(Y_k-y)*u+(X_k-x)*v)+2*(Z_k-~
 z_0)*(-(X_k-x)*w_0+(Z_k-z_0)*u)))/sqrt((-(Y_k-~
 y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+~
 ((Y_k-y)*w_0-(Z_k-z_0)*v)^2)-(sqrt((-(Y_k-y)*u+~
 (X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_~
 k-y)*w_0-(Z_k-z_0)*v)^2)*u)/sqrt(w_0^2+u^2+v^2))/~
 (w_0^2+u^2+v^2));1/2*(2*Summation(k):(1):(50)*~
 (sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(~
 Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)*(1/~
 2*(sqrt(w_0^2+u^2+v^2)*sqrt((-(Y_k-y)*u+(X_k-x)*~
 v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-~
 (Z_k-z_0)*v)^2)*(-2*(-(Y_k-y)*u+(X_k-x)*v)-2*(~
 X_k-x)*v)-1/2*(sqrt(w_0^2+u^2+v^2)*(2*(X_k-x)*~
 (-(Y_k-y)*u+(X_k-x)*v)-2*(Z_k-z_0)*((Y_k-y)*w_~
 0-(Z_k-z_0)*v))*(2*(-(X_k-x)*w_0+(Z_k-z_0)*u)*~
 w_0-2*(-(Y_k-y)*u+(X_k-x)*v)*v))/sqrt((-(Y_k-y)*~
 u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((~
 Y_k-y)*w_0-(Z_k-z_0)*v)^2))/((-(Y_k-y)*u+(X_k-~
 x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*~
 w_0-(Z_k-z_0)*v)^2)-1/2*((2*(-(X_k-x)*w_0+(Z_k-~
 z_0)*u)*w_0-2*(-(Y_k-y)*u+(X_k-x)*v)*v)*v)/(sqrt(~
 w_0^2+u^2+v^2)*sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(~
 -(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-~
 z_0)*v)^2)))+1/2*((1/2*(sqrt(w_0^2+u^2+v^2)*(2*~
 (X_k-x)*(-(Y_k-y)*u+(X_k-x)*v)-2*(Z_k-z_0)*((Y_~
 k-y)*w_0-(Z_k-z_0)*v)))/sqrt((-(Y_k-y)*u+(X_k-~
 x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*~
 w_0-(Z_k-z_0)*v)^2)-(sqrt((-(Y_k-y)*u+(X_k-x)*~
 v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-~
 (Z_k-z_0)*v)^2)*v)/sqrt(w_0^2+u^2+v^2))*(2*(-(~
 X_k-x)*w_0+(Z_k-z_0)*u)*w_0-2*(-(Y_k-y)*u+(X_k-~
 x)*v)*v))/sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-~
 x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^~
 2))/(w_0^2+u^2+v^2)^(3/2)-1/25*(Summation(k):(~
 1):(50)*sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*~
 w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)/~
 sqrt(w_0^2+u^2+v^2))*Summation(k):(1):(50)*(1/~
 2*(sqrt(w_0^2+u^2+v^2)*sqrt((-(Y_k-y)*u+(X_k-x)*~
 v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-~
 (Z_k-z_0)*v)^2)*(-2*(-(Y_k-y)*u+(X_k-x)*v)-2*(~
 X_k-x)*v)-1/2*(sqrt(w_0^2+u^2+v^2)*(2*(X_k-x)*~
 (-(Y_k-y)*u+(X_k-x)*v)-2*(Z_k-z_0)*((Y_k-y)*w_~
 0-(Z_k-z_0)*v))*(2*(-(X_k-x)*w_0+(Z_k-z_0)*u)*~
 w_0-2*(-(Y_k-y)*u+(X_k-x)*v)*v))/sqrt((-(Y_k-y)*~
 u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((~
 Y_k-y)*w_0-(Z_k-z_0)*v)^2))/((-(Y_k-y)*u+(X_k-~
 x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*~
 w_0-(Z_k-z_0)*v)^2)-1/2*((2*(-(X_k-x)*w_0+(Z_k-~
 z_0)*u)*w_0-2*(-(Y_k-y)*u+(X_k-x)*v)*v)*v)/(sqrt(~
 w_0^2+u^2+v^2)*sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(~
 -(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-~
 z_0)*v)^2)))/(w_0^2+u^2+v^2)-1/50*(Summation(k):(~
 1):(50)*(2*(-(X_k-x)*w_0+(Z_k-z_0)*u)*w_0-2*(-~
 (Y_k-y)*u+(X_k-x)*v)*v)/(sqrt(w_0^2+u^2+v^2)*sqrt(~
 (-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_~
 0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)))*Summation(~
 k):(1):(50)*(1/2*(sqrt(w_0^2+u^2+v^2)*(2*(X_k-~
 x)*(-(Y_k-y)*u+(X_k-x)*v)-2*(Z_k-z_0)*((Y_k-y)*~
 w_0-(Z_k-z_0)*v)))/sqrt((-(Y_k-y)*u+(X_k-x)*v)^~
 2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_~
 k-z_0)*v)^2)-(sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-~
 (X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_~
 0)*v)^2)*v)/sqrt(w_0^2+u^2+v^2))/(w_0^2+u^2+v^~
 2)),1/2*(2*Summation(k):(1):(50)*(sqrt((-(Y_k-~
 y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+~
 ((Y_k-y)*w_0-(Z_k-z_0)*v)^2)*(1/2*(sqrt(w_0^2+~
 u^2+v^2)*sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-~
 x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^~
 2)*(2*(Z_k-z_0)*w_0+2*(X_k-x)*u)-1/2*(sqrt(w_0^~
 2+u^2+v^2)*(2*(X_k-x)*(-(Y_k-y)*u+(X_k-x)*v)-2*~
 (Z_k-z_0)*((Y_k-y)*w_0-(Z_k-z_0)*v))*(-2*((Y_k-~
 y)*w_0-(Z_k-z_0)*v)*w_0+2*(-(Y_k-y)*u+(X_k-x)*~
 v)*u))/sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*~
 w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2))/~
 ((-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_~
 0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)-1/2*((-2*~
 ((Y_k-y)*w_0-(Z_k-z_0)*v)*w_0+2*(-(Y_k-y)*u+(X_~
 k-x)*v)*u)*v)/(sqrt(w_0^2+u^2+v^2)*sqrt((-(Y_k-~
 y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+~
 ((Y_k-y)*w_0-(Z_k-z_0)*v)^2)))+1/2*((1/2*(sqrt(~
 w_0^2+u^2+v^2)*(2*(X_k-x)*(-(Y_k-y)*u+(X_k-x)*~
 v)-2*(Z_k-z_0)*((Y_k-y)*w_0-(Z_k-z_0)*v)))/sqrt(~
 (-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_~
 0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)-(sqrt((-(~
 Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*~
 u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)*v)/sqrt(w_0^~
 2+u^2+v^2))*(-2*((Y_k-y)*w_0-(Z_k-z_0)*v)*w_0+~
 2*(-(Y_k-y)*u+(X_k-x)*v)*u))/sqrt((-(Y_k-y)*u+~
 (X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_~
 k-y)*w_0-(Z_k-z_0)*v)^2))/(w_0^2+u^2+v^2)^(3/2)-~
 1/25*(Summation(k):(1):(50)*sqrt((-(Y_k-y)*u+(~
 X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-~
 y)*w_0-(Z_k-z_0)*v)^2)/sqrt(w_0^2+u^2+v^2))*Summation(~
 k):(1):(50)*(1/2*(sqrt(w_0^2+u^2+v^2)*sqrt((-(~
 Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*~
 u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)*(2*(Z_k-z_0)*~
 w_0+2*(X_k-x)*u)-1/2*(sqrt(w_0^2+u^2+v^2)*(2*(~
 X_k-x)*(-(Y_k-y)*u+(X_k-x)*v)-2*(Z_k-z_0)*((Y_~
 k-y)*w_0-(Z_k-z_0)*v))*(-2*((Y_k-y)*w_0-(Z_k-z_~
 0)*v)*w_0+2*(-(Y_k-y)*u+(X_k-x)*v)*u))/sqrt((-~
 (Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*~
 u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2))/((-(Y_k-y)*~
 u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((~
 Y_k-y)*w_0-(Z_k-z_0)*v)^2)-1/2*((-2*((Y_k-y)*w_~
 0-(Z_k-z_0)*v)*w_0+2*(-(Y_k-y)*u+(X_k-x)*v)*u)*~
 v)/(sqrt(w_0^2+u^2+v^2)*sqrt((-(Y_k-y)*u+(X_k-~
 x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*~
 w_0-(Z_k-z_0)*v)^2)))/(w_0^2+u^2+v^2)-1/50*(Summation(~
 k):(1):(50)*(-2*((Y_k-y)*w_0-(Z_k-z_0)*v)*w_0+~
 2*(-(Y_k-y)*u+(X_k-x)*v)*u)/(sqrt(w_0^2+u^2+v^~
 2)*sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+~
 (Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)))*~
 Summation(k):(1):(50)*(1/2*(sqrt(w_0^2+u^2+v^2)*~
 (2*(X_k-x)*(-(Y_k-y)*u+(X_k-x)*v)-2*(Z_k-z_0)*~
 ((Y_k-y)*w_0-(Z_k-z_0)*v)))/sqrt((-(Y_k-y)*u+(~
 X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-~
 y)*w_0-(Z_k-z_0)*v)^2)-(sqrt((-(Y_k-y)*u+(X_k-~
 x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*~
 w_0-(Z_k-z_0)*v)^2)*v)/sqrt(w_0^2+u^2+v^2))/(w_~
 0^2+u^2+v^2)),1/2*(2*Summation(k):(1):(50)*((w_~
 0^2+u^2+v^2)^(3/2)*(sqrt((-(Y_k-y)*u+(X_k-x)*v)^~
 2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_~
 k-z_0)*v)^2)*(1/2*(sqrt((-(Y_k-y)*u+(X_k-x)*v)^~
 2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_~
 k-z_0)*v)^2)*(-2*sqrt(w_0^2+u^2+v^2)*(X_k-x)*(~
 Y_k-y)+((2*(X_k-x)*(-(Y_k-y)*u+(X_k-x)*v)-2*(Z_~
 k-z_0)*((Y_k-y)*w_0-(Z_k-z_0)*v))*u)/sqrt(w_0^~
 2+u^2+v^2))-1/2*(sqrt(w_0^2+u^2+v^2)*(2*(X_k-x)*~
 (-(Y_k-y)*u+(X_k-x)*v)-2*(Z_k-z_0)*((Y_k-y)*w_~
 0-(Z_k-z_0)*v))*(-2*(Y_k-y)*(-(Y_k-y)*u+(X_k-x)*~
 v)+2*(Z_k-z_0)*(-(X_k-x)*w_0+(Z_k-z_0)*u)))/sqrt(~
 (-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_~
 0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2))/((-(Y_k-~
 y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+~
 ((Y_k-y)*w_0-(Z_k-z_0)*v)^2)-(1/2*(sqrt(w_0^2+~
 u^2+v^2)*(-2*(Y_k-y)*(-(Y_k-y)*u+(X_k-x)*v)+2*~
 (Z_k-z_0)*(-(X_k-x)*w_0+(Z_k-z_0)*u))*v)/sqrt(~
 (-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_~
 0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)-(sqrt((-(~
 Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*~
 u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)*u*v)/sqrt(w_~
 0^2+u^2+v^2))/(w_0^2+u^2+v^2))+1/2*((-2*(Y_k-y)*~
 (-(Y_k-y)*u+(X_k-x)*v)+2*(Z_k-z_0)*(-(X_k-x)*w_~
 0+(Z_k-z_0)*u))*(1/2*(sqrt(w_0^2+u^2+v^2)*(2*(~
 X_k-x)*(-(Y_k-y)*u+(X_k-x)*v)-2*(Z_k-z_0)*((Y_~
 k-y)*w_0-(Z_k-z_0)*v)))/sqrt((-(Y_k-y)*u+(X_k-~
 x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*~
 w_0-(Z_k-z_0)*v)^2)-(sqrt((-(Y_k-y)*u+(X_k-x)*~
 v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-~
 (Z_k-z_0)*v)^2)*v)/sqrt(w_0^2+u^2+v^2)))/sqrt(~
 (-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_~
 0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2))-3*sqrt(w_~
 0^2+u^2+v^2)*sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-(~
 X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_~
 0)*v)^2)*(1/2*(sqrt(w_0^2+u^2+v^2)*(2*(X_k-x)*~
 (-(Y_k-y)*u+(X_k-x)*v)-2*(Z_k-z_0)*((Y_k-y)*w_~
 0-(Z_k-z_0)*v)))/sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+~
 (-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-~
 z_0)*v)^2)-(sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_~
 k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*~
 v)^2)*v)/sqrt(w_0^2+u^2+v^2))*u)/(w_0^2+u^2+v^~
 2)^3-1/25*(Summation(k):(1):(50)*sqrt((-(Y_k-y)*~
 u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((~
 Y_k-y)*w_0-(Z_k-z_0)*v)^2)/sqrt(w_0^2+u^2+v^2))*~
 Summation(k):(1):(50)*((w_0^2+u^2+v^2)*(1/2*(sqrt(~
 (-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_~
 0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)*(-2*sqrt(~
 w_0^2+u^2+v^2)*(X_k-x)*(Y_k-y)+((2*(X_k-x)*(-(~
 Y_k-y)*u+(X_k-x)*v)-2*(Z_k-z_0)*((Y_k-y)*w_0-(~
 Z_k-z_0)*v))*u)/sqrt(w_0^2+u^2+v^2))-1/2*(sqrt(~
 w_0^2+u^2+v^2)*(2*(X_k-x)*(-(Y_k-y)*u+(X_k-x)*~
 v)-2*(Z_k-z_0)*((Y_k-y)*w_0-(Z_k-z_0)*v))*(-2*~
 (Y_k-y)*(-(Y_k-y)*u+(X_k-x)*v)+2*(Z_k-z_0)*(-(~
 X_k-x)*w_0+(Z_k-z_0)*u)))/sqrt((-(Y_k-y)*u+(X_~
 k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*~
 w_0-(Z_k-z_0)*v)^2))/((-(Y_k-y)*u+(X_k-x)*v)^2+~
 (-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-~
 z_0)*v)^2)-(1/2*(sqrt(w_0^2+u^2+v^2)*(-2*(Y_k-~
 y)*(-(Y_k-y)*u+(X_k-x)*v)+2*(Z_k-z_0)*(-(X_k-x)*~
 w_0+(Z_k-z_0)*u))*v)/sqrt((-(Y_k-y)*u+(X_k-x)*~
 v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-~
 (Z_k-z_0)*v)^2)-(sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+~
 (-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-~
 z_0)*v)^2)*u*v)/sqrt(w_0^2+u^2+v^2))/(w_0^2+u^~
 2+v^2))-2*(1/2*(sqrt(w_0^2+u^2+v^2)*(2*(X_k-x)*~
 (-(Y_k-y)*u+(X_k-x)*v)-2*(Z_k-z_0)*((Y_k-y)*w_~
 0-(Z_k-z_0)*v)))/sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+~
 (-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-~
 z_0)*v)^2)-(sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_~
 k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*~
 v)^2)*v)/sqrt(w_0^2+u^2+v^2))*u)/(w_0^2+u^2+v^~
 2)^2-1/25*(Summation(k):(1):(50)*(1/2*(sqrt(w_~
 0^2+u^2+v^2)*(-2*(Y_k-y)*(-(Y_k-y)*u+(X_k-x)*v)+~
 2*(Z_k-z_0)*(-(X_k-x)*w_0+(Z_k-z_0)*u)))/sqrt(~
 (-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_~
 0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)-(sqrt((-(~
 Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*~
 u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)*u)/sqrt(w_0^~
 2+u^2+v^2))/(w_0^2+u^2+v^2))*Summation(k):(1):(~
 50)*(1/2*(sqrt(w_0^2+u^2+v^2)*(2*(X_k-x)*(-(Y_~
 k-y)*u+(X_k-x)*v)-2*(Z_k-z_0)*((Y_k-y)*w_0-(Z_~
 k-z_0)*v)))/sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_~
 k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*~
 v)^2)-(sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*~
 w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)*~
 v)/sqrt(w_0^2+u^2+v^2))/(w_0^2+u^2+v^2)),1/2*(~
 -1/25*(Summation(k):(1):(50)*sqrt((-(Y_k-y)*u+~
 (X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_~
 k-y)*w_0-(Z_k-z_0)*v)^2)/sqrt(w_0^2+u^2+v^2))*~
 Summation(k):(1):(50)*((w_0^2+u^2+v^2)*(-(sqrt(~
 w_0^2+u^2+v^2)*(sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+~
 (-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-~
 z_0)*v)^2)+1/2*((2*(X_k-x)*(-(Y_k-y)*u+(X_k-x)*~
 v)-2*(Z_k-z_0)*((Y_k-y)*w_0-(Z_k-z_0)*v))*v)/sqrt(~
 (-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_~
 0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2))-(sqrt((-~
 (Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*~
 u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)*v^2)/sqrt(w_~
 0^2+u^2+v^2))/(w_0^2+u^2+v^2)+1/2*(sqrt((-(Y_k-~
 y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+~
 ((Y_k-y)*w_0-(Z_k-z_0)*v)^2)*(sqrt(w_0^2+u^2+v^~
 2)*(2*(X_k-x)^2+2*(Z_k-z_0)^2)+((2*(X_k-x)*(-(~
 Y_k-y)*u+(X_k-x)*v)-2*(Z_k-z_0)*((Y_k-y)*w_0-(~
 Z_k-z_0)*v))*v)/sqrt(w_0^2+u^2+v^2))-1/2*(sqrt(~
 w_0^2+u^2+v^2)*(2*(X_k-x)*(-(Y_k-y)*u+(X_k-x)*~
 v)-2*(Z_k-z_0)*((Y_k-y)*w_0-(Z_k-z_0)*v))^2)/sqrt(~
 (-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_~
 0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2))/((-(Y_k-~
 y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+~
 ((Y_k-y)*w_0-(Z_k-z_0)*v)^2))-2*(1/2*(sqrt(w_0^~
 2+u^2+v^2)*(2*(X_k-x)*(-(Y_k-y)*u+(X_k-x)*v)-2*~
 (Z_k-z_0)*((Y_k-y)*w_0-(Z_k-z_0)*v)))/sqrt((-(~
 Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*~
 u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)-(sqrt((-(Y_k-~
 y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+~
 ((Y_k-y)*w_0-(Z_k-z_0)*v)^2)*v)/sqrt(w_0^2+u^2+~
 v^2))*v)/(w_0^2+u^2+v^2)^2+2*Summation(k):(1):(~
 50)*((w_0^2+u^2+v^2)^(3/2)*(sqrt((-(Y_k-y)*u+(~
 X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-~
 y)*w_0-(Z_k-z_0)*v)^2)*(-(sqrt(w_0^2+u^2+v^2)*~
 (sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(~
 Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)+1/2*~
 ((2*(X_k-x)*(-(Y_k-y)*u+(X_k-x)*v)-2*(Z_k-z_0)*~
 ((Y_k-y)*w_0-(Z_k-z_0)*v))*v)/sqrt((-(Y_k-y)*u+~
 (X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_~
 k-y)*w_0-(Z_k-z_0)*v)^2))-(sqrt((-(Y_k-y)*u+(X_~
 k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*~
 w_0-(Z_k-z_0)*v)^2)*v^2)/sqrt(w_0^2+u^2+v^2))/~
 (w_0^2+u^2+v^2)+1/2*(sqrt((-(Y_k-y)*u+(X_k-x)*~
 v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-~
 (Z_k-z_0)*v)^2)*(sqrt(w_0^2+u^2+v^2)*(2*(X_k-x)^~
 2+2*(Z_k-z_0)^2)+((2*(X_k-x)*(-(Y_k-y)*u+(X_k-~
 x)*v)-2*(Z_k-z_0)*((Y_k-y)*w_0-(Z_k-z_0)*v))*v)/~
 sqrt(w_0^2+u^2+v^2))-1/2*(sqrt(w_0^2+u^2+v^2)*~
 (2*(X_k-x)*(-(Y_k-y)*u+(X_k-x)*v)-2*(Z_k-z_0)*~
 ((Y_k-y)*w_0-(Z_k-z_0)*v))^2)/sqrt((-(Y_k-y)*u+~
 (X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_~
 k-y)*w_0-(Z_k-z_0)*v)^2))/((-(Y_k-y)*u+(X_k-x)*~
 v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-~
 (Z_k-z_0)*v)^2))+1/2*((2*(X_k-x)*(-(Y_k-y)*u+(~
 X_k-x)*v)-2*(Z_k-z_0)*((Y_k-y)*w_0-(Z_k-z_0)*v))*~
 (1/2*(sqrt(w_0^2+u^2+v^2)*(2*(X_k-x)*(-(Y_k-y)*~
 u+(X_k-x)*v)-2*(Z_k-z_0)*((Y_k-y)*w_0-(Z_k-z_0)*~
 v)))/sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_~
 0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)-~
 (sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(~
 Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)*v)/~
 sqrt(w_0^2+u^2+v^2)))/sqrt((-(Y_k-y)*u+(X_k-x)*~
 v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-~
 (Z_k-z_0)*v)^2))-3*sqrt(w_0^2+u^2+v^2)*sqrt((-~
 (Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*~
 u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)*(1/2*(sqrt(w_~
 0^2+u^2+v^2)*(2*(X_k-x)*(-(Y_k-y)*u+(X_k-x)*v)-~
 2*(Z_k-z_0)*((Y_k-y)*w_0-(Z_k-z_0)*v)))/sqrt((~
 -(Y_k-y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*~
 u)^2+((Y_k-y)*w_0-(Z_k-z_0)*v)^2)-(sqrt((-(Y_k-~
 y)*u+(X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+~
 ((Y_k-y)*w_0-(Z_k-z_0)*v)^2)*v)/sqrt(w_0^2+u^2+~
 v^2))*v)/(w_0^2+u^2+v^2)^3-1/25*(Summation(k):(~
 1):(50)*(1/2*(sqrt(w_0^2+u^2+v^2)*(2*(X_k-x)*(~
 -(Y_k-y)*u+(X_k-x)*v)-2*(Z_k-z_0)*((Y_k-y)*w_0-~
 (Z_k-z_0)*v)))/sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(~
 -(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-~
 z_0)*v)^2)-(sqrt((-(Y_k-y)*u+(X_k-x)*v)^2+(-(X_~
 k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*w_0-(Z_k-z_0)*~
 v)^2)*v)/sqrt(w_0^2+u^2+v^2))/(w_0^2+u^2+v^2))*~
 Summation(k):(1):(50)*(1/2*(sqrt(w_0^2+u^2+v^2)*~
 (2*(X_k-x)*(-(Y_k-y)*u+(X_k-x)*v)-2*(Z_k-z_0)*~
 ((Y_k-y)*w_0-(Z_k-z_0)*v)))/sqrt((-(Y_k-y)*u+(~
 X_k-x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-~
 y)*w_0-(Z_k-z_0)*v)^2)-(sqrt((-(Y_k-y)*u+(X_k-~
 x)*v)^2+(-(X_k-x)*w_0+(Z_k-z_0)*u)^2+((Y_k-y)*~
 w_0-(Z_k-z_0)*v)^2)*v)/sqrt(w_0^2+u^2+v^2))/(w_~
 0^2+u^2+v^2))))~p0
3 ~sb/_!!   }
b00&!  c#T"_c/__c/__!"}
^ _~A(H(?x,~
 ?y,?u,?v)=(1/2*(-1/50*(Summation(k):(1):(50)*sqrt(~
 (-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(~
 Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2)/sqrt(~
 w_0^2+?u^2+?v^2))*Summation(k):(1):(50)*(sqrt(~
 w_0^2+?u^2+?v^2)*sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*~
 ?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*~
 ?u+(X_k-?x)*?v)^2)*(2*w_0^2+2*?v^2)-1/2*(sqrt(~
 w_0^2+?u^2+?v^2)*(2*(-(X_k-?x)*w_0+(Z_k-z_0)*?u)*~
 w_0-2*(-(Y_k-?y)*?u+(X_k-?x)*?v)*?v)^2)/sqrt((~
 -(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_~
 k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2))*1/~
 (sqrt(w_0^2+?u^2+?v^2)*sqrt((-(X_k-?x)*w_0+(Z_~
 k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(~
 Y_k-?y)*?u+(X_k-?x)*?v)^2))^2+Summation(k):(1):(~
 50)*(2*w_0^2+2*?v^2)/(w_0^2+?u^2+?v^2)-1/100*(~
 Summation(k):(1):(50)*(2*(-(X_k-?x)*w_0+(Z_k-z_~
 0)*?u)*w_0-2*(-(Y_k-?y)*?u+(X_k-?x)*?v)*?v)/(sqrt(~
 w_0^2+?u^2+?v^2)*sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*~
 ?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*~
 ?u+(X_k-?x)*?v)^2)))*Summation(k):(1):(50)*(2*~
 (-(X_k-?x)*w_0+(Z_k-z_0)*?u)*w_0-2*(-(Y_k-?y)*~
 ?u+(X_k-?x)*?v)*?v)/(sqrt(w_0^2+?u^2+?v^2)*sqrt(~
 (-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(~
 Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2))),~
 1/2*(-1/50*(Summation(k):(1):(50)*sqrt((-(X_k-~
 ?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*~
 ?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2)/sqrt(w_0^2+~
 ?u^2+?v^2))*Summation(k):(1):(50)*(-1/2*(sqrt(~
 w_0^2+?u^2+?v^2)*(2*(-(X_k-?x)*w_0+(Z_k-z_0)*?u)*~
 w_0-2*(-(Y_k-?y)*?u+(X_k-?x)*?v)*?v)*(-2*((Y_k-~
 ?y)*w_0-(Z_k-z_0)*?v)*w_0+2*(-(Y_k-?y)*?u+(X_k-~
 ?x)*?v)*?u))/sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^~
 2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+~
 (X_k-?x)*?v)^2)-2*sqrt(w_0^2+?u^2+?v^2)*sqrt((~
 -(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_~
 k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2)*?u*~
 ?v)*1/(sqrt(w_0^2+?u^2+?v^2)*sqrt((-(X_k-?x)*w_~
 0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^~
 2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2))^2-1/100*(Summation(~
 k):(1):(50)*(-2*((Y_k-?y)*w_0-(Z_k-z_0)*?v)*w_~
 0+2*(-(Y_k-?y)*?u+(X_k-?x)*?v)*?u)/(sqrt(w_0^2+~
 ?u^2+?v^2)*sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+~
 ((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_~
 k-?x)*?v)^2)))*Summation(k):(1):(50)*(2*(-(X_k-~
 ?x)*w_0+(Z_k-z_0)*?u)*w_0-2*(-(Y_k-?y)*?u+(X_k-~
 ?x)*?v)*?v)/(sqrt(w_0^2+?u^2+?v^2)*sqrt((-(X_k-~
 ?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*~
 ?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2))-2*Summation(~
 k):(1):(50)*(?u*?v)/(w_0^2+?u^2+?v^2)),1/2*(-1/~
 50*(Summation(k):(1):(50)*sqrt((-(X_k-?x)*w_0+~
 (Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+~
 (-(Y_k-?y)*?u+(X_k-?x)*?v)^2)/sqrt(w_0^2+?u^2+~
 ?v^2))*Summation(k):(1):(50)*(sqrt(w_0^2+?u^2+~
 ?v^2)*sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((Y_~
 k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*~
 ?v)^2)*(2*(Z_k-z_0)*w_0+2*(Y_k-?y)*?v)-(1/2*(sqrt(~
 w_0^2+?u^2+?v^2)*(2*(Z_k-z_0)*(-(X_k-?x)*w_0+(~
 Z_k-z_0)*?u)-2*(Y_k-?y)*(-(Y_k-?y)*?u+(X_k-?x)*~
 ?v)))/sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((Y_~
 k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*~
 ?v)^2)+(sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((~
 Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-~
 ?x)*?v)^2)*?u)/sqrt(w_0^2+?u^2+?v^2))*(2*(-(X_~
 k-?x)*w_0+(Z_k-z_0)*?u)*w_0-2*(-(Y_k-?y)*?u+(X_~
 k-?x)*?v)*?v))*1/(sqrt(w_0^2+?u^2+?v^2)*sqrt((~
 -(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_~
 k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2))^2+~
 Summation(k):(1):(50)*((w_0^2+?u^2+?v^2)*(2*(Z_~
 k-z_0)*w_0+2*(Y_k-?y)*?v)-2*(2*(-(X_k-?x)*w_0+~
 (Z_k-z_0)*?u)*w_0-2*(-(Y_k-?y)*?u+(X_k-?x)*?v)*~
 ?v)*?u)/(w_0^2+?u^2+?v^2)^2-1/50*(Summation(k):(~
 1):(50)*(1/2*(sqrt(w_0^2+?u^2+?v^2)*(2*(Z_k-z_~
 0)*(-(X_k-?x)*w_0+(Z_k-z_0)*?u)-2*(Y_k-?y)*(-(~
 Y_k-?y)*?u+(X_k-?x)*?v)))/sqrt((-(X_k-?x)*w_0+~
 (Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+~
 (-(Y_k-?y)*?u+(X_k-?x)*?v)^2)-(sqrt((-(X_k-?x)*~
 w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^~
 2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2)*?u)/sqrt(w_0^2+~
 ?u^2+?v^2))/(w_0^2+?u^2+?v^2))*Summation(k):(1):(~
 50)*(2*(-(X_k-?x)*w_0+(Z_k-z_0)*?u)*w_0-2*(-(Y_~
 k-?y)*?u+(X_k-?x)*?v)*?v)/(sqrt(w_0^2+?u^2+?v^~
 2)*sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*~
 w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^~
 2))),1/2*(-1/50*(Summation(k):(1):(50)*sqrt((-~
 (X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_~
 k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2)/sqrt(~
 w_0^2+?u^2+?v^2))*Summation(k):(1):(50)*(sqrt(~
 w_0^2+?u^2+?v^2)*sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*~
 ?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*~
 ?u+(X_k-?x)*?v)^2)*(-2*(-(Y_k-?y)*?u+(X_k-?x)*~
 ?v)-2*(X_k-?x)*?v)-(1/2*(sqrt(w_0^2+?u^2+?v^2)*~
 (-2*(Z_k-z_0)*((Y_k-?y)*w_0-(Z_k-z_0)*?v)+2*(X_~
 k-?x)*(-(Y_k-?y)*?u+(X_k-?x)*?v)))/sqrt((-(X_k-~
 ?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*~
 ?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2)+(sqrt((-(X_~
 k-?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_~
 0)*?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2)*?v)/sqrt(~
 w_0^2+?u^2+?v^2))*(2*(-(X_k-?x)*w_0+(Z_k-z_0)*~
 ?u)*w_0-2*(-(Y_k-?y)*?u+(X_k-?x)*?v)*?v))*1/(sqrt(~
 w_0^2+?u^2+?v^2)*sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*~
 ?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*~
 ?u+(X_k-?x)*?v)^2))^2+Summation(k):(1):(50)*((~
 w_0^2+?u^2+?v^2)*(-2*(-(Y_k-?y)*?u+(X_k-?x)*?v)-~
 2*(X_k-?x)*?v)-2*(2*(-(X_k-?x)*w_0+(Z_k-z_0)*?u)*~
 w_0-2*(-(Y_k-?y)*?u+(X_k-?x)*?v)*?v)*?v)/(w_0^~
 2+?u^2+?v^2)^2-1/50*(Summation(k):(1):(50)*(1/~
 2*(sqrt(w_0^2+?u^2+?v^2)*(-2*(Z_k-z_0)*((Y_k-?y)*~
 w_0-(Z_k-z_0)*?v)+2*(X_k-?x)*(-(Y_k-?y)*?u+(X_~
 k-?x)*?v)))/sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^~
 2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+~
 (X_k-?x)*?v)^2)-(sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*~
 ?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*~
 ?u+(X_k-?x)*?v)^2)*?v)/sqrt(w_0^2+?u^2+?v^2))/~
 (w_0^2+?u^2+?v^2))*Summation(k):(1):(50)*(2*(-~
 (X_k-?x)*w_0+(Z_k-z_0)*?u)*w_0-2*(-(Y_k-?y)*?u+~
 (X_k-?x)*?v)*?v)/(sqrt(w_0^2+?u^2+?v^2)*sqrt((~
 -(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_~
 k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2)));1/~
 2*(-1/50*(Summation(k):(1):(50)*sqrt((-(X_k-?x)*~
 w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^~
 2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2)/sqrt(w_0^2+?u^~
 2+?v^2))*Summation(k):(1):(50)*(-1/2*(sqrt(w_0^~
 2+?u^2+?v^2)*(2*(-(X_k-?x)*w_0+(Z_k-z_0)*?u)*w_~
 0-2*(-(Y_k-?y)*?u+(X_k-?x)*?v)*?v)*(-2*((Y_k-?y)*~
 w_0-(Z_k-z_0)*?v)*w_0+2*(-(Y_k-?y)*?u+(X_k-?x)*~
 ?v)*?u))/sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+(~
 (Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_~
 k-?x)*?v)^2)-2*sqrt(w_0^2+?u^2+?v^2)*sqrt((-(X_~
 k-?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_~
 0)*?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2)*?u*?v)*~
 1/(sqrt(w_0^2+?u^2+?v^2)*sqrt((-(X_k-?x)*w_0+(~
 Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(~
 -(Y_k-?y)*?u+(X_k-?x)*?v)^2))^2-1/100*(Summation(~
 k):(1):(50)*(2*(-(X_k-?x)*w_0+(Z_k-z_0)*?u)*w_~
 0-2*(-(Y_k-?y)*?u+(X_k-?x)*?v)*?v)/(sqrt(w_0^2+~
 ?u^2+?v^2)*sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+~
 ((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_~
 k-?x)*?v)^2)))*Summation(k):(1):(50)*(-2*((Y_k-~
 ?y)*w_0-(Z_k-z_0)*?v)*w_0+2*(-(Y_k-?y)*?u+(X_k-~
 ?x)*?v)*?u)/(sqrt(w_0^2+?u^2+?v^2)*sqrt((-(X_k-~
 ?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*~
 ?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2))-2*Summation(~
 k):(1):(50)*(?u*?v)/(w_0^2+?u^2+?v^2)),1/2*(-1/~
 50*(Summation(k):(1):(50)*sqrt((-(X_k-?x)*w_0+~
 (Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+~
 (-(Y_k-?y)*?u+(X_k-?x)*?v)^2)/sqrt(w_0^2+?u^2+~
 ?v^2))*Summation(k):(1):(50)*(sqrt(w_0^2+?u^2+~
 ?v^2)*sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((Y_~
 k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*~
 ?v)^2)*(2*w_0^2+2*?u^2)-1/2*(sqrt(w_0^2+?u^2+?v^~
 2)*(-2*((Y_k-?y)*w_0-(Z_k-z_0)*?v)*w_0+2*(-(Y_~
 k-?y)*?u+(X_k-?x)*?v)*?u)^2)/sqrt((-(X_k-?x)*w_~
 0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^~
 2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2))*1/(sqrt(w_0^2+~
 ?u^2+?v^2)*sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+~
 ((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_~
 k-?x)*?v)^2))^2+Summation(k):(1):(50)*(2*w_0^2+~
 2*?u^2)/(w_0^2+?u^2+?v^2)-1/100*(Summation(k):(~
 1):(50)*(-2*((Y_k-?y)*w_0-(Z_k-z_0)*?v)*w_0+2*~
 (-(Y_k-?y)*?u+(X_k-?x)*?v)*?u)/(sqrt(w_0^2+?u^~
 2+?v^2)*sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((~
 Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-~
 ?x)*?v)^2)))*Summation(k):(1):(50)*(-2*((Y_k-?y)*~
 w_0-(Z_k-z_0)*?v)*w_0+2*(-(Y_k-?y)*?u+(X_k-?x)*~
 ?v)*?u)/(sqrt(w_0^2+?u^2+?v^2)*sqrt((-(X_k-?x)*~
 w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^~
 2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2))),1/2*(-1/50*(~
 Summation(k):(1):(50)*sqrt((-(X_k-?x)*w_0+(Z_k-~
 z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_~
 k-?y)*?u+(X_k-?x)*?v)^2)/sqrt(w_0^2+?u^2+?v^2))*~
 Summation(k):(1):(50)*(sqrt(w_0^2+?u^2+?v^2)*sqrt(~
 (-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(~
 Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2)*(~
 2*(-(Y_k-?y)*?u+(X_k-?x)*?v)-2*(Y_k-?y)*?u)-(1/~
 2*(sqrt(w_0^2+?u^2+?v^2)*(2*(Z_k-z_0)*(-(X_k-?x)*~
 w_0+(Z_k-z_0)*?u)-2*(Y_k-?y)*(-(Y_k-?y)*?u+(X_~
 k-?x)*?v)))/sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^~
 2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+~
 (X_k-?x)*?v)^2)+(sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*~
 ?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*~
 ?u+(X_k-?x)*?v)^2)*?u)/sqrt(w_0^2+?u^2+?v^2))*~
 (-2*((Y_k-?y)*w_0-(Z_k-z_0)*?v)*w_0+2*(-(Y_k-?y)*~
 ?u+(X_k-?x)*?v)*?u))*1/(sqrt(w_0^2+?u^2+?v^2)*~
 sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*~
 w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^~
 2))^2+Summation(k):(1):(50)*((w_0^2+?u^2+?v^2)*~
 (2*(-(Y_k-?y)*?u+(X_k-?x)*?v)-2*(Y_k-?y)*?u)-2*~
 (-2*((Y_k-?y)*w_0-(Z_k-z_0)*?v)*w_0+2*(-(Y_k-?y)*~
 ?u+(X_k-?x)*?v)*?u)*?u)/(w_0^2+?u^2+?v^2)^2-1/~
 50*(Summation(k):(1):(50)*(1/2*(sqrt(w_0^2+?u^~
 2+?v^2)*(2*(Z_k-z_0)*(-(X_k-?x)*w_0+(Z_k-z_0)*~
 ?u)-2*(Y_k-?y)*(-(Y_k-?y)*?u+(X_k-?x)*?v)))/sqrt(~
 (-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(~
 Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2)-(~
 sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*~
 w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^~
 2)*?u)/sqrt(w_0^2+?u^2+?v^2))/(w_0^2+?u^2+?v^2))*~
 Summation(k):(1):(50)*(-2*((Y_k-?y)*w_0-(Z_k-z_~
 0)*?v)*w_0+2*(-(Y_k-?y)*?u+(X_k-?x)*?v)*?u)/(sqrt(~
 w_0^2+?u^2+?v^2)*sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*~
 ?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*~
 ?u+(X_k-?x)*?v)^2))),1/2*(-1/50*(Summation(k):(~
 1):(50)*sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((~
 Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-~
 ?x)*?v)^2)/sqrt(w_0^2+?u^2+?v^2))*Summation(k):(~
 1):(50)*(sqrt(w_0^2+?u^2+?v^2)*sqrt((-(X_k-?x)*~
 w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^~
 2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2)*(2*(Z_k-z_0)*w_~
 0+2*(X_k-?x)*?u)-(1/2*(sqrt(w_0^2+?u^2+?v^2)*(~
 -2*(Z_k-z_0)*((Y_k-?y)*w_0-(Z_k-z_0)*?v)+2*(X_~
 k-?x)*(-(Y_k-?y)*?u+(X_k-?x)*?v)))/sqrt((-(X_k-~
 ?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*~
 ?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2)+(sqrt((-(X_~
 k-?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_~
 0)*?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2)*?v)/sqrt(~
 w_0^2+?u^2+?v^2))*(-2*((Y_k-?y)*w_0-(Z_k-z_0)*~
 ?v)*w_0+2*(-(Y_k-?y)*?u+(X_k-?x)*?v)*?u))*1/(sqrt(~
 w_0^2+?u^2+?v^2)*sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*~
 ?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*~
 ?u+(X_k-?x)*?v)^2))^2+Summation(k):(1):(50)*((~
 w_0^2+?u^2+?v^2)*(2*(Z_k-z_0)*w_0+2*(X_k-?x)*?u)-~
 2*(-2*((Y_k-?y)*w_0-(Z_k-z_0)*?v)*w_0+2*(-(Y_k-~
 ?y)*?u+(X_k-?x)*?v)*?u)*?v)/(w_0^2+?u^2+?v^2)^~
 2-1/50*(Summation(k):(1):(50)*(1/2*(sqrt(w_0^2+~
 ?u^2+?v^2)*(-2*(Z_k-z_0)*((Y_k-?y)*w_0-(Z_k-z_~
 0)*?v)+2*(X_k-?x)*(-(Y_k-?y)*?u+(X_k-?x)*?v)))/~
 sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*~
 w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^~
 2)-(sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-~
 ?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*~
 ?v)^2)*?v)/sqrt(w_0^2+?u^2+?v^2))/(w_0^2+?u^2+~
 ?v^2))*Summation(k):(1):(50)*(-2*((Y_k-?y)*w_0-~
 (Z_k-z_0)*?v)*w_0+2*(-(Y_k-?y)*?u+(X_k-?x)*?v)*~
 ?u)/(sqrt(w_0^2+?u^2+?v^2)*sqrt((-(X_k-?x)*w_0+~
 (Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+~
 (-(Y_k-?y)*?u+(X_k-?x)*?v)^2)));1/2*(2*Summation(~
 k):(1):(50)*(sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^~
 2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+~
 (X_k-?x)*?v)^2)*(1/2*(sqrt(w_0^2+?u^2+?v^2)*sqrt(~
 (-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(~
 Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2)*(~
 2*(Z_k-z_0)*w_0+2*(Y_k-?y)*?v)-1/2*(sqrt(w_0^2+~
 ?u^2+?v^2)*(2*(Z_k-z_0)*(-(X_k-?x)*w_0+(Z_k-z_~
 0)*?u)-2*(Y_k-?y)*(-(Y_k-?y)*?u+(X_k-?x)*?v))*~
 (2*(-(X_k-?x)*w_0+(Z_k-z_0)*?u)*w_0-2*(-(Y_k-?y)*~
 ?u+(X_k-?x)*?v)*?v))/sqrt((-(X_k-?x)*w_0+(Z_k-~
 z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_~
 k-?y)*?u+(X_k-?x)*?v)^2))/((-(X_k-?x)*w_0+(Z_k-~
 z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_~
 k-?y)*?u+(X_k-?x)*?v)^2)-1/2*((2*(-(X_k-?x)*w_~
 0+(Z_k-z_0)*?u)*w_0-2*(-(Y_k-?y)*?u+(X_k-?x)*?v)*~
 ?v)*?u)/(sqrt(w_0^2+?u^2+?v^2)*sqrt((-(X_k-?x)*~
 w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^~
 2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2)))+1/2*((1/2*(sqrt(~
 w_0^2+?u^2+?v^2)*(2*(Z_k-z_0)*(-(X_k-?x)*w_0+(~
 Z_k-z_0)*?u)-2*(Y_k-?y)*(-(Y_k-?y)*?u+(X_k-?x)*~
 ?v)))/sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((Y_~
 k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*~
 ?v)^2)-(sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((~
 Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-~
 ?x)*?v)^2)*?u)/sqrt(w_0^2+?u^2+?v^2))*(2*(-(X_~
 k-?x)*w_0+(Z_k-z_0)*?u)*w_0-2*(-(Y_k-?y)*?u+(X_~
 k-?x)*?v)*?v))/sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^~
 2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+~
 (X_k-?x)*?v)^2))/(w_0^2+?u^2+?v^2)^(3/2)-1/25*~
 (Summation(k):(1):(50)*sqrt((-(X_k-?x)*w_0+(Z_~
 k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(~
 Y_k-?y)*?u+(X_k-?x)*?v)^2)/sqrt(w_0^2+?u^2+?v^~
 2))*Summation(k):(1):(50)*(1/2*(sqrt(w_0^2+?u^~
 2+?v^2)*sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((~
 Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-~
 ?x)*?v)^2)*(2*(Z_k-z_0)*w_0+2*(Y_k-?y)*?v)-1/2*~
 (sqrt(w_0^2+?u^2+?v^2)*(2*(Z_k-z_0)*(-(X_k-?x)*~
 w_0+(Z_k-z_0)*?u)-2*(Y_k-?y)*(-(Y_k-?y)*?u+(X_~
 k-?x)*?v))*(2*(-(X_k-?x)*w_0+(Z_k-z_0)*?u)*w_0-~
 2*(-(Y_k-?y)*?u+(X_k-?x)*?v)*?v))/sqrt((-(X_k-~
 ?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*~
 ?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2))/((-(X_k-?x)*~
 w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^~
 2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2)-1/2*((2*(-(X_k-~
 ?x)*w_0+(Z_k-z_0)*?u)*w_0-2*(-(Y_k-?y)*?u+(X_k-~
 ?x)*?v)*?v)*?u)/(sqrt(w_0^2+?u^2+?v^2)*sqrt((-~
 (X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_~
 k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2)))/(~
 w_0^2+?u^2+?v^2)-1/50*(Summation(k):(1):(50)*(~
 2*(-(X_k-?x)*w_0+(Z_k-z_0)*?u)*w_0-2*(-(Y_k-?y)*~
 ?u+(X_k-?x)*?v)*?v)/(sqrt(w_0^2+?u^2+?v^2)*sqrt(~
 (-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(~
 Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2)))*~
 Summation(k):(1):(50)*(1/2*(sqrt(w_0^2+?u^2+?v^~
 2)*(2*(Z_k-z_0)*(-(X_k-?x)*w_0+(Z_k-z_0)*?u)-2*~
 (Y_k-?y)*(-(Y_k-?y)*?u+(X_k-?x)*?v)))/sqrt((-(~
 X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-~
 z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2)-(sqrt(~
 (-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(~
 Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2)*?u)/~
 sqrt(w_0^2+?u^2+?v^2))/(w_0^2+?u^2+?v^2)),1/2*~
 (2*Summation(k):(1):(50)*(sqrt((-(X_k-?x)*w_0+~
 (Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+~
 (-(Y_k-?y)*?u+(X_k-?x)*?v)^2)*(1/2*(sqrt(w_0^2+~
 ?u^2+?v^2)*sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+~
 ((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_~
 k-?x)*?v)^2)*(2*(-(Y_k-?y)*?u+(X_k-?x)*?v)-2*(~
 Y_k-?y)*?u)-1/2*(sqrt(w_0^2+?u^2+?v^2)*(2*(Z_k-~
 z_0)*(-(X_k-?x)*w_0+(Z_k-z_0)*?u)-2*(Y_k-?y)*(~
 -(Y_k-?y)*?u+(X_k-?x)*?v))*(-2*((Y_k-?y)*w_0-(~
 Z_k-z_0)*?v)*w_0+2*(-(Y_k-?y)*?u+(X_k-?x)*?v)*~
 ?u))/sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-~
 ?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*~
 ?v)^2))/((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-~
 ?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*~
 ?v)^2)-1/2*((-2*((Y_k-?y)*w_0-(Z_k-z_0)*?v)*w_~
 0+2*(-(Y_k-?y)*?u+(X_k-?x)*?v)*?u)*?u)/(sqrt(w_~
 0^2+?u^2+?v^2)*sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^~
 2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+~
 (X_k-?x)*?v)^2)))+1/2*((1/2*(sqrt(w_0^2+?u^2+?v^~
 2)*(2*(Z_k-z_0)*(-(X_k-?x)*w_0+(Z_k-z_0)*?u)-2*~
 (Y_k-?y)*(-(Y_k-?y)*?u+(X_k-?x)*?v)))/sqrt((-(~
 X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-~
 z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2)-(sqrt(~
 (-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(~
 Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2)*?u)/~
 sqrt(w_0^2+?u^2+?v^2))*(-2*((Y_k-?y)*w_0-(Z_k-~
 z_0)*?v)*w_0+2*(-(Y_k-?y)*?u+(X_k-?x)*?v)*?u))/~
 sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*~
 w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^~
 2))/(w_0^2+?u^2+?v^2)^(3/2)-1/25*(Summation(k):(~
 1):(50)*sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((~
 Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-~
 ?x)*?v)^2)/sqrt(w_0^2+?u^2+?v^2))*Summation(k):(~
 1):(50)*(1/2*(sqrt(w_0^2+?u^2+?v^2)*sqrt((-(X_~
 k-?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_~
 0)*?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2)*(2*(-(Y_~
 k-?y)*?u+(X_k-?x)*?v)-2*(Y_k-?y)*?u)-1/2*(sqrt(~
 w_0^2+?u^2+?v^2)*(2*(Z_k-z_0)*(-(X_k-?x)*w_0+(~
 Z_k-z_0)*?u)-2*(Y_k-?y)*(-(Y_k-?y)*?u+(X_k-?x)*~
 ?v))*(-2*((Y_k-?y)*w_0-(Z_k-z_0)*?v)*w_0+2*(-(~
 Y_k-?y)*?u+(X_k-?x)*?v)*?u))/sqrt((-(X_k-?x)*w_~
 0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^~
 2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2))/((-(X_k-?x)*w_~
 0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^~
 2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2)-1/2*((-2*((Y_k-~
 ?y)*w_0-(Z_k-z_0)*?v)*w_0+2*(-(Y_k-?y)*?u+(X_k-~
 ?x)*?v)*?u)*?u)/(sqrt(w_0^2+?u^2+?v^2)*sqrt((-~
 (X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_~
 k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2)))/(~
 w_0^2+?u^2+?v^2)-1/50*(Summation(k):(1):(50)*(~
 -2*((Y_k-?y)*w_0-(Z_k-z_0)*?v)*w_0+2*(-(Y_k-?y)*~
 ?u+(X_k-?x)*?v)*?u)/(sqrt(w_0^2+?u^2+?v^2)*sqrt(~
 (-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(~
 Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2)))*~
 Summation(k):(1):(50)*(1/2*(sqrt(w_0^2+?u^2+?v^~
 2)*(2*(Z_k-z_0)*(-(X_k-?x)*w_0+(Z_k-z_0)*?u)-2*~
 (Y_k-?y)*(-(Y_k-?y)*?u+(X_k-?x)*?v)))/sqrt((-(~
 X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-~
 z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2)-(sqrt(~
 (-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(~
 Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2)*?u)/~
 sqrt(w_0^2+?u^2+?v^2))/(w_0^2+?u^2+?v^2)),1/2*~
 (-1/25*(Summation(k):(1):(50)*sqrt((-(X_k-?x)*~
 w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^~
 2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2)/sqrt(w_0^2+?u^~
 2+?v^2))*Summation(k):(1):(50)*((w_0^2+?u^2+?v^~
 2)*(-(sqrt(w_0^2+?u^2+?v^2)*(sqrt((-(X_k-?x)*w_~
 0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^~
 2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2)+1/2*((2*(Z_k-z_~
 0)*(-(X_k-?x)*w_0+(Z_k-z_0)*?u)-2*(Y_k-?y)*(-(~
 Y_k-?y)*?u+(X_k-?x)*?v))*?u)/sqrt((-(X_k-?x)*w_~
 0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^~
 2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2))-(sqrt((-(X_k-~
 ?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*~
 ?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2)*?u^2)/sqrt(~
 w_0^2+?u^2+?v^2))/(w_0^2+?u^2+?v^2)+1/2*(sqrt(~
 (-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(~
 Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2)*(~
 sqrt(w_0^2+?u^2+?v^2)*(2*(Y_k-?y)^2+2*(Z_k-z_0)^~
 2)+((2*(Z_k-z_0)*(-(X_k-?x)*w_0+(Z_k-z_0)*?u)-~
 2*(Y_k-?y)*(-(Y_k-?y)*?u+(X_k-?x)*?v))*?u)/sqrt(~
 w_0^2+?u^2+?v^2))-1/2*(sqrt(w_0^2+?u^2+?v^2)*(~
 2*(Z_k-z_0)*(-(X_k-?x)*w_0+(Z_k-z_0)*?u)-2*(Y_~
 k-?y)*(-(Y_k-?y)*?u+(X_k-?x)*?v))^2)/sqrt((-(X_~
 k-?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_~
 0)*?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2))/((-(X_~
 k-?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_~
 0)*?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2))-2*(1/2*~
 (sqrt(w_0^2+?u^2+?v^2)*(2*(Z_k-z_0)*(-(X_k-?x)*~
 w_0+(Z_k-z_0)*?u)-2*(Y_k-?y)*(-(Y_k-?y)*?u+(X_~
 k-?x)*?v)))/sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^~
 2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+~
 (X_k-?x)*?v)^2)-(sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*~
 ?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*~
 ?u+(X_k-?x)*?v)^2)*?u)/sqrt(w_0^2+?u^2+?v^2))*~
 ?u)/(w_0^2+?u^2+?v^2)^2+2*Summation(k):(1):(50)*~
 ((w_0^2+?u^2+?v^2)^(3/2)*(sqrt((-(X_k-?x)*w_0+~
 (Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+~
 (-(Y_k-?y)*?u+(X_k-?x)*?v)^2)*(-(sqrt(w_0^2+?u^~
 2+?v^2)*(sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+(~
 (Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_~
 k-?x)*?v)^2)+1/2*((2*(Z_k-z_0)*(-(X_k-?x)*w_0+~
 (Z_k-z_0)*?u)-2*(Y_k-?y)*(-(Y_k-?y)*?u+(X_k-?x)*~
 ?v))*?u)/sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+(~
 (Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_~
 k-?x)*?v)^2))-(sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^~
 2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+~
 (X_k-?x)*?v)^2)*?u^2)/sqrt(w_0^2+?u^2+?v^2))/(~
 w_0^2+?u^2+?v^2)+1/2*(sqrt((-(X_k-?x)*w_0+(Z_k-~
 z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_~
 k-?y)*?u+(X_k-?x)*?v)^2)*(sqrt(w_0^2+?u^2+?v^2)*~
 (2*(Y_k-?y)^2+2*(Z_k-z_0)^2)+((2*(Z_k-z_0)*(-(~
 X_k-?x)*w_0+(Z_k-z_0)*?u)-2*(Y_k-?y)*(-(Y_k-?y)*~
 ?u+(X_k-?x)*?v))*?u)/sqrt(w_0^2+?u^2+?v^2))-1/~
 2*(sqrt(w_0^2+?u^2+?v^2)*(2*(Z_k-z_0)*(-(X_k-?x)*~
 w_0+(Z_k-z_0)*?u)-2*(Y_k-?y)*(-(Y_k-?y)*?u+(X_~
 k-?x)*?v))^2)/sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^~
 2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+~
 (X_k-?x)*?v)^2))/((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^~
 2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+~
 (X_k-?x)*?v)^2))+1/2*((2*(Z_k-z_0)*(-(X_k-?x)*~
 w_0+(Z_k-z_0)*?u)-2*(Y_k-?y)*(-(Y_k-?y)*?u+(X_~
 k-?x)*?v))*(1/2*(sqrt(w_0^2+?u^2+?v^2)*(2*(Z_k-~
 z_0)*(-(X_k-?x)*w_0+(Z_k-z_0)*?u)-2*(Y_k-?y)*(~
 -(Y_k-?y)*?u+(X_k-?x)*?v)))/sqrt((-(X_k-?x)*w_~
 0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^~
 2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2)-(sqrt((-(X_k-?x)*~
 w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^~
 2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2)*?u)/sqrt(w_0^2+~
 ?u^2+?v^2)))/sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^~
 2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+~
 (X_k-?x)*?v)^2))-3*sqrt(w_0^2+?u^2+?v^2)*sqrt(~
 (-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(~
 Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2)*(~
 1/2*(sqrt(w_0^2+?u^2+?v^2)*(2*(Z_k-z_0)*(-(X_k-~
 ?x)*w_0+(Z_k-z_0)*?u)-2*(Y_k-?y)*(-(Y_k-?y)*?u+~
 (X_k-?x)*?v)))/sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^~
 2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+~
 (X_k-?x)*?v)^2)-(sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*~
 ?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*~
 ?u+(X_k-?x)*?v)^2)*?u)/sqrt(w_0^2+?u^2+?v^2))*~
 ?u)/(w_0^2+?u^2+?v^2)^3-1/25*(Summation(k):(1):(~
 50)*(1/2*(sqrt(w_0^2+?u^2+?v^2)*(2*(Z_k-z_0)*(~
 -(X_k-?x)*w_0+(Z_k-z_0)*?u)-2*(Y_k-?y)*(-(Y_k-~
 ?y)*?u+(X_k-?x)*?v)))/sqrt((-(X_k-?x)*w_0+(Z_k-~
 z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_~
 k-?y)*?u+(X_k-?x)*?v)^2)-(sqrt((-(X_k-?x)*w_0+~
 (Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+~
 (-(Y_k-?y)*?u+(X_k-?x)*?v)^2)*?u)/sqrt(w_0^2+?u^~
 2+?v^2))/(w_0^2+?u^2+?v^2))*Summation(k):(1):(~
 50)*(1/2*(sqrt(w_0^2+?u^2+?v^2)*(2*(Z_k-z_0)*(~
 -(X_k-?x)*w_0+(Z_k-z_0)*?u)-2*(Y_k-?y)*(-(Y_k-~
 ?y)*?u+(X_k-?x)*?v)))/sqrt((-(X_k-?x)*w_0+(Z_k-~
 z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_~
 k-?y)*?u+(X_k-?x)*?v)^2)-(sqrt((-(X_k-?x)*w_0+~
 (Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+~
 (-(Y_k-?y)*?u+(X_k-?x)*?v)^2)*?u)/sqrt(w_0^2+?u^~
 2+?v^2))/(w_0^2+?u^2+?v^2)),1/2*(2*Summation(k):(~
 1):(50)*((w_0^2+?u^2+?v^2)^(3/2)*(sqrt((-(X_k-~
 ?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*~
 ?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2)*(1/2*(sqrt(~
 (-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(~
 Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2)*(~
 -2*sqrt(w_0^2+?u^2+?v^2)*(X_k-?x)*(Y_k-?y)+((2*~
 (Z_k-z_0)*(-(X_k-?x)*w_0+(Z_k-z_0)*?u)-2*(Y_k-~
 ?y)*(-(Y_k-?y)*?u+(X_k-?x)*?v))*?v)/sqrt(w_0^2+~
 ?u^2+?v^2))-1/2*(sqrt(w_0^2+?u^2+?v^2)*(2*(Z_k-~
 z_0)*(-(X_k-?x)*w_0+(Z_k-z_0)*?u)-2*(Y_k-?y)*(~
 -(Y_k-?y)*?u+(X_k-?x)*?v))*(-2*(Z_k-z_0)*((Y_k-~
 ?y)*w_0-(Z_k-z_0)*?v)+2*(X_k-?x)*(-(Y_k-?y)*?u+~
 (X_k-?x)*?v)))/sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^~
 2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+~
 (X_k-?x)*?v)^2))/((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^~
 2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+~
 (X_k-?x)*?v)^2)-(1/2*(sqrt(w_0^2+?u^2+?v^2)*(-~
 2*(Z_k-z_0)*((Y_k-?y)*w_0-(Z_k-z_0)*?v)+2*(X_k-~
 ?x)*(-(Y_k-?y)*?u+(X_k-?x)*?v))*?u)/sqrt((-(X_~
 k-?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_~
 0)*?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2)-(sqrt((~
 -(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_~
 k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2)*?u*~
 ?v)/sqrt(w_0^2+?u^2+?v^2))/(w_0^2+?u^2+?v^2))+~
 1/2*((-2*(Z_k-z_0)*((Y_k-?y)*w_0-(Z_k-z_0)*?v)+~
 2*(X_k-?x)*(-(Y_k-?y)*?u+(X_k-?x)*?v))*(1/2*(sqrt(~
 w_0^2+?u^2+?v^2)*(2*(Z_k-z_0)*(-(X_k-?x)*w_0+(~
 Z_k-z_0)*?u)-2*(Y_k-?y)*(-(Y_k-?y)*?u+(X_k-?x)*~
 ?v)))/sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((Y_~
 k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*~
 ?v)^2)-(sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((~
 Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-~
 ?x)*?v)^2)*?u)/sqrt(w_0^2+?u^2+?v^2)))/sqrt((-~
 (X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_~
 k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2))-3*~
 sqrt(w_0^2+?u^2+?v^2)*sqrt((-(X_k-?x)*w_0+(Z_k-~
 z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_~
 k-?y)*?u+(X_k-?x)*?v)^2)*(1/2*(sqrt(w_0^2+?u^2+~
 ?v^2)*(2*(Z_k-z_0)*(-(X_k-?x)*w_0+(Z_k-z_0)*?u)-~
 2*(Y_k-?y)*(-(Y_k-?y)*?u+(X_k-?x)*?v)))/sqrt((~
 -(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_~
 k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2)-(sqrt(~
 (-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(~
 Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2)*?u)/~
 sqrt(w_0^2+?u^2+?v^2))*?v)/(w_0^2+?u^2+?v^2)^3-~
 1/25*(Summation(k):(1):(50)*sqrt((-(X_k-?x)*w_~
 0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^~
 2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2)/sqrt(w_0^2+?u^~
 2+?v^2))*Summation(k):(1):(50)*((w_0^2+?u^2+?v^~
 2)*(1/2*(sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+(~
 (Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_~
 k-?x)*?v)^2)*(-2*sqrt(w_0^2+?u^2+?v^2)*(X_k-?x)*~
 (Y_k-?y)+((2*(Z_k-z_0)*(-(X_k-?x)*w_0+(Z_k-z_0)*~
 ?u)-2*(Y_k-?y)*(-(Y_k-?y)*?u+(X_k-?x)*?v))*?v)/~
 sqrt(w_0^2+?u^2+?v^2))-1/2*(sqrt(w_0^2+?u^2+?v^~
 2)*(2*(Z_k-z_0)*(-(X_k-?x)*w_0+(Z_k-z_0)*?u)-2*~
 (Y_k-?y)*(-(Y_k-?y)*?u+(X_k-?x)*?v))*(-2*(Z_k-~
 z_0)*((Y_k-?y)*w_0-(Z_k-z_0)*?v)+2*(X_k-?x)*(-~
 (Y_k-?y)*?u+(X_k-?x)*?v)))/sqrt((-(X_k-?x)*w_0+~
 (Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+~
 (-(Y_k-?y)*?u+(X_k-?x)*?v)^2))/((-(X_k-?x)*w_0+~
 (Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+~
 (-(Y_k-?y)*?u+(X_k-?x)*?v)^2)-(1/2*(sqrt(w_0^2+~
 ?u^2+?v^2)*(-2*(Z_k-z_0)*((Y_k-?y)*w_0-(Z_k-z_~
 0)*?v)+2*(X_k-?x)*(-(Y_k-?y)*?u+(X_k-?x)*?v))*~
 ?u)/sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-~
 ?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*~
 ?v)^2)-(sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((~
 Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-~
 ?x)*?v)^2)*?u*?v)/sqrt(w_0^2+?u^2+?v^2))/(w_0^~
 2+?u^2+?v^2))-2*(1/2*(sqrt(w_0^2+?u^2+?v^2)*(2*~
 (Z_k-z_0)*(-(X_k-?x)*w_0+(Z_k-z_0)*?u)-2*(Y_k-~
 ?y)*(-(Y_k-?y)*?u+(X_k-?x)*?v)))/sqrt((-(X_k-?x)*~
 w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^~
 2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2)-(sqrt((-(X_k-?x)*~
 w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^~
 2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2)*?u)/sqrt(w_0^2+~
 ?u^2+?v^2))*?v)/(w_0^2+?u^2+?v^2)^2-1/25*(Summation(~
 k):(1):(50)*(1/2*(sqrt(w_0^2+?u^2+?v^2)*(-2*(Z_~
 k-z_0)*((Y_k-?y)*w_0-(Z_k-z_0)*?v)+2*(X_k-?x)*~
 (-(Y_k-?y)*?u+(X_k-?x)*?v)))/sqrt((-(X_k-?x)*w_~
 0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^~
 2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2)-(sqrt((-(X_k-?x)*~
 w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^~
 2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2)*?v)/sqrt(w_0^2+~
 ?u^2+?v^2))/(w_0^2+?u^2+?v^2))*Summation(k):(1):(~
 50)*(1/2*(sqrt(w_0^2+?u^2+?v^2)*(2*(Z_k-z_0)*(~
 -(X_k-?x)*w_0+(Z_k-z_0)*?u)-2*(Y_k-?y)*(-(Y_k-~
 ?y)*?u+(X_k-?x)*?v)))/sqrt((-(X_k-?x)*w_0+(Z_k-~
 z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_~
 k-?y)*?u+(X_k-?x)*?v)^2)-(sqrt((-(X_k-?x)*w_0+~
 (Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+~
 (-(Y_k-?y)*?u+(X_k-?x)*?v)^2)*?u)/sqrt(w_0^2+?u^~
 2+?v^2))/(w_0^2+?u^2+?v^2));1/2*(2*Summation(k):(~
 1):(50)*(sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+(~
 (Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_~
 k-?x)*?v)^2)*(1/2*(sqrt(w_0^2+?u^2+?v^2)*sqrt(~
 (-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(~
 Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2)*(~
 -2*(-(Y_k-?y)*?u+(X_k-?x)*?v)-2*(X_k-?x)*?v)-1/~
 2*(sqrt(w_0^2+?u^2+?v^2)*(-2*(Z_k-z_0)*((Y_k-?y)*~
 w_0-(Z_k-z_0)*?v)+2*(X_k-?x)*(-(Y_k-?y)*?u+(X_~
 k-?x)*?v))*(2*(-(X_k-?x)*w_0+(Z_k-z_0)*?u)*w_0-~
 2*(-(Y_k-?y)*?u+(X_k-?x)*?v)*?v))/sqrt((-(X_k-~
 ?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*~
 ?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2))/((-(X_k-?x)*~
 w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^~
 2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2)-1/2*((2*(-(X_k-~
 ?x)*w_0+(Z_k-z_0)*?u)*w_0-2*(-(Y_k-?y)*?u+(X_k-~
 ?x)*?v)*?v)*?v)/(sqrt(w_0^2+?u^2+?v^2)*sqrt((-~
 (X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_~
 k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2)))+1/~
 2*((1/2*(sqrt(w_0^2+?u^2+?v^2)*(-2*(Z_k-z_0)*(~
 (Y_k-?y)*w_0-(Z_k-z_0)*?v)+2*(X_k-?x)*(-(Y_k-?y)*~
 ?u+(X_k-?x)*?v)))/sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*~
 ?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*~
 ?u+(X_k-?x)*?v)^2)-(sqrt((-(X_k-?x)*w_0+(Z_k-z_~
 0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-~
 ?y)*?u+(X_k-?x)*?v)^2)*?v)/sqrt(w_0^2+?u^2+?v^~
 2))*(2*(-(X_k-?x)*w_0+(Z_k-z_0)*?u)*w_0-2*(-(Y_~
 k-?y)*?u+(X_k-?x)*?v)*?v))/sqrt((-(X_k-?x)*w_0+~
 (Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+~
 (-(Y_k-?y)*?u+(X_k-?x)*?v)^2))/(w_0^2+?u^2+?v^~
 2)^(3/2)-1/25*(Summation(k):(1):(50)*sqrt((-(X_~
 k-?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_~
 0)*?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2)/sqrt(w_~
 0^2+?u^2+?v^2))*Summation(k):(1):(50)*(1/2*(sqrt(~
 w_0^2+?u^2+?v^2)*sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*~
 ?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*~
 ?u+(X_k-?x)*?v)^2)*(-2*(-(Y_k-?y)*?u+(X_k-?x)*~
 ?v)-2*(X_k-?x)*?v)-1/2*(sqrt(w_0^2+?u^2+?v^2)*~
 (-2*(Z_k-z_0)*((Y_k-?y)*w_0-(Z_k-z_0)*?v)+2*(X_~
 k-?x)*(-(Y_k-?y)*?u+(X_k-?x)*?v))*(2*(-(X_k-?x)*~
 w_0+(Z_k-z_0)*?u)*w_0-2*(-(Y_k-?y)*?u+(X_k-?x)*~
 ?v)*?v))/sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+(~
 (Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_~
 k-?x)*?v)^2))/((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+~
 ((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_~
 k-?x)*?v)^2)-1/2*((2*(-(X_k-?x)*w_0+(Z_k-z_0)*~
 ?u)*w_0-2*(-(Y_k-?y)*?u+(X_k-?x)*?v)*?v)*?v)/(~
 sqrt(w_0^2+?u^2+?v^2)*sqrt((-(X_k-?x)*w_0+(Z_k-~
 z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_~
 k-?y)*?u+(X_k-?x)*?v)^2)))/(w_0^2+?u^2+?v^2)-1/~
 50*(Summation(k):(1):(50)*(2*(-(X_k-?x)*w_0+(Z_~
 k-z_0)*?u)*w_0-2*(-(Y_k-?y)*?u+(X_k-?x)*?v)*?v)/~
 (sqrt(w_0^2+?u^2+?v^2)*sqrt((-(X_k-?x)*w_0+(Z_~
 k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(~
 Y_k-?y)*?u+(X_k-?x)*?v)^2)))*Summation(k):(1):(~
 50)*(1/2*(sqrt(w_0^2+?u^2+?v^2)*(-2*(Z_k-z_0)*~
 ((Y_k-?y)*w_0-(Z_k-z_0)*?v)+2*(X_k-?x)*(-(Y_k-~
 ?y)*?u+(X_k-?x)*?v)))/sqrt((-(X_k-?x)*w_0+(Z_k-~
 z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_~
 k-?y)*?u+(X_k-?x)*?v)^2)-(sqrt((-(X_k-?x)*w_0+~
 (Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+~
 (-(Y_k-?y)*?u+(X_k-?x)*?v)^2)*?v)/sqrt(w_0^2+?u^~
 2+?v^2))/(w_0^2+?u^2+?v^2)),1/2*(2*Summation(k):(~
 1):(50)*(sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+(~
 (Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_~
 k-?x)*?v)^2)*(1/2*(sqrt(w_0^2+?u^2+?v^2)*sqrt(~
 (-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(~
 Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2)*(~
 2*(Z_k-z_0)*w_0+2*(X_k-?x)*?u)-1/2*(sqrt(w_0^2+~
 ?u^2+?v^2)*(-2*(Z_k-z_0)*((Y_k-?y)*w_0-(Z_k-z_~
 0)*?v)+2*(X_k-?x)*(-(Y_k-?y)*?u+(X_k-?x)*?v))*~
 (-2*((Y_k-?y)*w_0-(Z_k-z_0)*?v)*w_0+2*(-(Y_k-?y)*~
 ?u+(X_k-?x)*?v)*?u))/sqrt((-(X_k-?x)*w_0+(Z_k-~
 z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_~
 k-?y)*?u+(X_k-?x)*?v)^2))/((-(X_k-?x)*w_0+(Z_k-~
 z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_~
 k-?y)*?u+(X_k-?x)*?v)^2)-1/2*((-2*((Y_k-?y)*w_~
 0-(Z_k-z_0)*?v)*w_0+2*(-(Y_k-?y)*?u+(X_k-?x)*?v)*~
 ?u)*?v)/(sqrt(w_0^2+?u^2+?v^2)*sqrt((-(X_k-?x)*~
 w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^~
 2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2)))+1/2*((1/2*(sqrt(~
 w_0^2+?u^2+?v^2)*(-2*(Z_k-z_0)*((Y_k-?y)*w_0-(~
 Z_k-z_0)*?v)+2*(X_k-?x)*(-(Y_k-?y)*?u+(X_k-?x)*~
 ?v)))/sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((Y_~
 k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*~
 ?v)^2)-(sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((~
 Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-~
 ?x)*?v)^2)*?v)/sqrt(w_0^2+?u^2+?v^2))*(-2*((Y_~
 k-?y)*w_0-(Z_k-z_0)*?v)*w_0+2*(-(Y_k-?y)*?u+(X_~
 k-?x)*?v)*?u))/sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^~
 2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+~
 (X_k-?x)*?v)^2))/(w_0^2+?u^2+?v^2)^(3/2)-1/25*~
 (Summation(k):(1):(50)*sqrt((-(X_k-?x)*w_0+(Z_~
 k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(~
 Y_k-?y)*?u+(X_k-?x)*?v)^2)/sqrt(w_0^2+?u^2+?v^~
 2))*Summation(k):(1):(50)*(1/2*(sqrt(w_0^2+?u^~
 2+?v^2)*sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((~
 Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-~
 ?x)*?v)^2)*(2*(Z_k-z_0)*w_0+2*(X_k-?x)*?u)-1/2*~
 (sqrt(w_0^2+?u^2+?v^2)*(-2*(Z_k-z_0)*((Y_k-?y)*~
 w_0-(Z_k-z_0)*?v)+2*(X_k-?x)*(-(Y_k-?y)*?u+(X_~
 k-?x)*?v))*(-2*((Y_k-?y)*w_0-(Z_k-z_0)*?v)*w_0+~
 2*(-(Y_k-?y)*?u+(X_k-?x)*?v)*?u))/sqrt((-(X_k-~
 ?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*~
 ?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2))/((-(X_k-?x)*~
 w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^~
 2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2)-1/2*((-2*((Y_k-~
 ?y)*w_0-(Z_k-z_0)*?v)*w_0+2*(-(Y_k-?y)*?u+(X_k-~
 ?x)*?v)*?u)*?v)/(sqrt(w_0^2+?u^2+?v^2)*sqrt((-~
 (X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_~
 k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2)))/(~
 w_0^2+?u^2+?v^2)-1/50*(Summation(k):(1):(50)*(~
 -2*((Y_k-?y)*w_0-(Z_k-z_0)*?v)*w_0+2*(-(Y_k-?y)*~
 ?u+(X_k-?x)*?v)*?u)/(sqrt(w_0^2+?u^2+?v^2)*sqrt(~
 (-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(~
 Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2)))*~
 Summation(k):(1):(50)*(1/2*(sqrt(w_0^2+?u^2+?v^~
 2)*(-2*(Z_k-z_0)*((Y_k-?y)*w_0-(Z_k-z_0)*?v)+2*~
 (X_k-?x)*(-(Y_k-?y)*?u+(X_k-?x)*?v)))/sqrt((-(~
 X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-~
 z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2)-(sqrt(~
 (-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(~
 Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2)*?v)/~
 sqrt(w_0^2+?u^2+?v^2))/(w_0^2+?u^2+?v^2)),1/2*~
 (2*Summation(k):(1):(50)*((w_0^2+?u^2+?v^2)^(3/~
 2)*(sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-~
 ?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*~
 ?v)^2)*(1/2*(sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^~
 2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+~
 (X_k-?x)*?v)^2)*(-2*sqrt(w_0^2+?u^2+?v^2)*(X_k-~
 ?x)*(Y_k-?y)+((-2*(Z_k-z_0)*((Y_k-?y)*w_0-(Z_k-~
 z_0)*?v)+2*(X_k-?x)*(-(Y_k-?y)*?u+(X_k-?x)*?v))*~
 ?u)/sqrt(w_0^2+?u^2+?v^2))-1/2*(sqrt(w_0^2+?u^~
 2+?v^2)*(2*(Z_k-z_0)*(-(X_k-?x)*w_0+(Z_k-z_0)*~
 ?u)-2*(Y_k-?y)*(-(Y_k-?y)*?u+(X_k-?x)*?v))*(-2*~
 (Z_k-z_0)*((Y_k-?y)*w_0-(Z_k-z_0)*?v)+2*(X_k-?x)*~
 (-(Y_k-?y)*?u+(X_k-?x)*?v)))/sqrt((-(X_k-?x)*w_~
 0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^~
 2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2))/((-(X_k-?x)*w_~
 0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^~
 2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2)-(1/2*(sqrt(w_0^~
 2+?u^2+?v^2)*(2*(Z_k-z_0)*(-(X_k-?x)*w_0+(Z_k-~
 z_0)*?u)-2*(Y_k-?y)*(-(Y_k-?y)*?u+(X_k-?x)*?v))*~
 ?v)/sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-~
 ?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*~
 ?v)^2)-(sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((~
 Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-~
 ?x)*?v)^2)*?u*?v)/sqrt(w_0^2+?u^2+?v^2))/(w_0^~
 2+?u^2+?v^2))+1/2*((2*(Z_k-z_0)*(-(X_k-?x)*w_0+~
 (Z_k-z_0)*?u)-2*(Y_k-?y)*(-(Y_k-?y)*?u+(X_k-?x)*~
 ?v))*(1/2*(sqrt(w_0^2+?u^2+?v^2)*(-2*(Z_k-z_0)*~
 ((Y_k-?y)*w_0-(Z_k-z_0)*?v)+2*(X_k-?x)*(-(Y_k-~
 ?y)*?u+(X_k-?x)*?v)))/sqrt((-(X_k-?x)*w_0+(Z_k-~
 z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_~
 k-?y)*?u+(X_k-?x)*?v)^2)-(sqrt((-(X_k-?x)*w_0+~
 (Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+~
 (-(Y_k-?y)*?u+(X_k-?x)*?v)^2)*?v)/sqrt(w_0^2+?u^~
 2+?v^2)))/sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+~
 ((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_~
 k-?x)*?v)^2))-3*sqrt(w_0^2+?u^2+?v^2)*sqrt((-(~
 X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-~
 z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2)*(1/2*~
 (sqrt(w_0^2+?u^2+?v^2)*(-2*(Z_k-z_0)*((Y_k-?y)*~
 w_0-(Z_k-z_0)*?v)+2*(X_k-?x)*(-(Y_k-?y)*?u+(X_~
 k-?x)*?v)))/sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^~
 2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+~
 (X_k-?x)*?v)^2)-(sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*~
 ?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*~
 ?u+(X_k-?x)*?v)^2)*?v)/sqrt(w_0^2+?u^2+?v^2))*~
 ?u)/(w_0^2+?u^2+?v^2)^3-1/25*(Summation(k):(1):(~
 50)*sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-~
 ?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*~
 ?v)^2)/sqrt(w_0^2+?u^2+?v^2))*Summation(k):(1):(~
 50)*((w_0^2+?u^2+?v^2)*(1/2*(sqrt((-(X_k-?x)*w_~
 0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^~
 2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2)*(-2*sqrt(w_0^2+~
 ?u^2+?v^2)*(X_k-?x)*(Y_k-?y)+((-2*(Z_k-z_0)*((~
 Y_k-?y)*w_0-(Z_k-z_0)*?v)+2*(X_k-?x)*(-(Y_k-?y)*~
 ?u+(X_k-?x)*?v))*?u)/sqrt(w_0^2+?u^2+?v^2))-1/~
 2*(sqrt(w_0^2+?u^2+?v^2)*(2*(Z_k-z_0)*(-(X_k-?x)*~
 w_0+(Z_k-z_0)*?u)-2*(Y_k-?y)*(-(Y_k-?y)*?u+(X_~
 k-?x)*?v))*(-2*(Z_k-z_0)*((Y_k-?y)*w_0-(Z_k-z_~
 0)*?v)+2*(X_k-?x)*(-(Y_k-?y)*?u+(X_k-?x)*?v)))/~
 sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*~
 w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^~
 2))/((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*~
 w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^~
 2)-(1/2*(sqrt(w_0^2+?u^2+?v^2)*(2*(Z_k-z_0)*(-~
 (X_k-?x)*w_0+(Z_k-z_0)*?u)-2*(Y_k-?y)*(-(Y_k-?y)*~
 ?u+(X_k-?x)*?v))*?v)/sqrt((-(X_k-?x)*w_0+(Z_k-~
 z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_~
 k-?y)*?u+(X_k-?x)*?v)^2)-(sqrt((-(X_k-?x)*w_0+~
 (Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+~
 (-(Y_k-?y)*?u+(X_k-?x)*?v)^2)*?u*?v)/sqrt(w_0^~
 2+?u^2+?v^2))/(w_0^2+?u^2+?v^2))-2*(1/2*(sqrt(~
 w_0^2+?u^2+?v^2)*(-2*(Z_k-z_0)*((Y_k-?y)*w_0-(~
 Z_k-z_0)*?v)+2*(X_k-?x)*(-(Y_k-?y)*?u+(X_k-?x)*~
 ?v)))/sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((Y_~
 k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*~
 ?v)^2)-(sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((~
 Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-~
 ?x)*?v)^2)*?v)/sqrt(w_0^2+?u^2+?v^2))*?u)/(w_0^~
 2+?u^2+?v^2)^2-1/25*(Summation(k):(1):(50)*(1/~
 2*(sqrt(w_0^2+?u^2+?v^2)*(2*(Z_k-z_0)*(-(X_k-?x)*~
 w_0+(Z_k-z_0)*?u)-2*(Y_k-?y)*(-(Y_k-?y)*?u+(X_~
 k-?x)*?v)))/sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^~
 2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+~
 (X_k-?x)*?v)^2)-(sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*~
 ?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*~
 ?u+(X_k-?x)*?v)^2)*?u)/sqrt(w_0^2+?u^2+?v^2))/~
 (w_0^2+?u^2+?v^2))*Summation(k):(1):(50)*(1/2*~
 (sqrt(w_0^2+?u^2+?v^2)*(-2*(Z_k-z_0)*((Y_k-?y)*~
 w_0-(Z_k-z_0)*?v)+2*(X_k-?x)*(-(Y_k-?y)*?u+(X_~
 k-?x)*?v)))/sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^~
 2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+~
 (X_k-?x)*?v)^2)-(sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*~
 ?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*~
 ?u+(X_k-?x)*?v)^2)*?v)/sqrt(w_0^2+?u^2+?v^2))/~
 (w_0^2+?u^2+?v^2)),1/2*(-1/25*(Summation(k):(1):(~
 50)*sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-~
 ?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*~
 ?v)^2)/sqrt(w_0^2+?u^2+?v^2))*Summation(k):(1):(~
 50)*((w_0^2+?u^2+?v^2)*(-(sqrt(w_0^2+?u^2+?v^2)*~
 (sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*~
 w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^~
 2)+1/2*((-2*(Z_k-z_0)*((Y_k-?y)*w_0-(Z_k-z_0)*~
 ?v)+2*(X_k-?x)*(-(Y_k-?y)*?u+(X_k-?x)*?v))*?v)/~
 sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*~
 w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^~
 2))-(sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-~
 ?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*~
 ?v)^2)*?v^2)/sqrt(w_0^2+?u^2+?v^2))/(w_0^2+?u^~
 2+?v^2)+1/2*(sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^~
 2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+~
 (X_k-?x)*?v)^2)*(sqrt(w_0^2+?u^2+?v^2)*(2*(X_k-~
 ?x)^2+2*(Z_k-z_0)^2)+((-2*(Z_k-z_0)*((Y_k-?y)*~
 w_0-(Z_k-z_0)*?v)+2*(X_k-?x)*(-(Y_k-?y)*?u+(X_~
 k-?x)*?v))*?v)/sqrt(w_0^2+?u^2+?v^2))-1/2*(sqrt(~
 w_0^2+?u^2+?v^2)*(-2*(Z_k-z_0)*((Y_k-?y)*w_0-(~
 Z_k-z_0)*?v)+2*(X_k-?x)*(-(Y_k-?y)*?u+(X_k-?x)*~
 ?v))^2)/sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((~
 Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-~
 ?x)*?v)^2))/((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((~
 Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-~
 ?x)*?v)^2))-2*(1/2*(sqrt(w_0^2+?u^2+?v^2)*(-2*~
 (Z_k-z_0)*((Y_k-?y)*w_0-(Z_k-z_0)*?v)+2*(X_k-?x)*~
 (-(Y_k-?y)*?u+(X_k-?x)*?v)))/sqrt((-(X_k-?x)*w_~
 0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^~
 2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2)-(sqrt((-(X_k-?x)*~
 w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^~
 2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2)*?v)/sqrt(w_0^2+~
 ?u^2+?v^2))*?v)/(w_0^2+?u^2+?v^2)^2+2*Summation(~
 k):(1):(50)*((w_0^2+?u^2+?v^2)^(3/2)*(sqrt((-(~
 X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-~
 z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2)*(-(sqrt(~
 w_0^2+?u^2+?v^2)*(sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*~
 ?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*~
 ?u+(X_k-?x)*?v)^2)+1/2*((-2*(Z_k-z_0)*((Y_k-?y)*~
 w_0-(Z_k-z_0)*?v)+2*(X_k-?x)*(-(Y_k-?y)*?u+(X_~
 k-?x)*?v))*?v)/sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^~
 2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+~
 (X_k-?x)*?v)^2))-(sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*~
 ?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*~
 ?u+(X_k-?x)*?v)^2)*?v^2)/sqrt(w_0^2+?u^2+?v^2))/~
 (w_0^2+?u^2+?v^2)+1/2*(sqrt((-(X_k-?x)*w_0+(Z_~
 k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(~
 Y_k-?y)*?u+(X_k-?x)*?v)^2)*(sqrt(w_0^2+?u^2+?v^~
 2)*(2*(X_k-?x)^2+2*(Z_k-z_0)^2)+((-2*(Z_k-z_0)*~
 ((Y_k-?y)*w_0-(Z_k-z_0)*?v)+2*(X_k-?x)*(-(Y_k-~
 ?y)*?u+(X_k-?x)*?v))*?v)/sqrt(w_0^2+?u^2+?v^2))-~
 1/2*(sqrt(w_0^2+?u^2+?v^2)*(-2*(Z_k-z_0)*((Y_k-~
 ?y)*w_0-(Z_k-z_0)*?v)+2*(X_k-?x)*(-(Y_k-?y)*?u+~
 (X_k-?x)*?v))^2)/sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*~
 ?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*~
 ?u+(X_k-?x)*?v)^2))/((-(X_k-?x)*w_0+(Z_k-z_0)*~
 ?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*~
 ?u+(X_k-?x)*?v)^2))+1/2*((-2*(Z_k-z_0)*((Y_k-?y)*~
 w_0-(Z_k-z_0)*?v)+2*(X_k-?x)*(-(Y_k-?y)*?u+(X_~
 k-?x)*?v))*(1/2*(sqrt(w_0^2+?u^2+?v^2)*(-2*(Z_~
 k-z_0)*((Y_k-?y)*w_0-(Z_k-z_0)*?v)+2*(X_k-?x)*~
 (-(Y_k-?y)*?u+(X_k-?x)*?v)))/sqrt((-(X_k-?x)*w_~
 0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^~
 2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2)-(sqrt((-(X_k-?x)*~
 w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^~
 2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2)*?v)/sqrt(w_0^2+~
 ?u^2+?v^2)))/sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^~
 2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+~
 (X_k-?x)*?v)^2))-3*sqrt(w_0^2+?u^2+?v^2)*sqrt(~
 (-(X_k-?x)*w_0+(Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(~
 Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+(X_k-?x)*?v)^2)*(~
 1/2*(sqrt(w_0^2+?u^2+?v^2)*(-2*(Z_k-z_0)*((Y_k-~
 ?y)*w_0-(Z_k-z_0)*?v)+2*(X_k-?x)*(-(Y_k-?y)*?u+~
 (X_k-?x)*?v)))/sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*?u)^~
 2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*?u+~
 (X_k-?x)*?v)^2)-(sqrt((-(X_k-?x)*w_0+(Z_k-z_0)*~
 ?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_k-?y)*~
 ?u+(X_k-?x)*?v)^2)*?v)/sqrt(w_0^2+?u^2+?v^2))*~
 ?v)/(w_0^2+?u^2+?v^2)^3-1/25*(Summation(k):(1):(~
 50)*(1/2*(sqrt(w_0^2+?u^2+?v^2)*(-2*(Z_k-z_0)*~
 ((Y_k-?y)*w_0-(Z_k-z_0)*?v)+2*(X_k-?x)*(-(Y_k-~
 ?y)*?u+(X_k-?x)*?v)))/sqrt((-(X_k-?x)*w_0+(Z_k-~
 z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_~
 k-?y)*?u+(X_k-?x)*?v)^2)-(sqrt((-(X_k-?x)*w_0+~
 (Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+~
 (-(Y_k-?y)*?u+(X_k-?x)*?v)^2)*?v)/sqrt(w_0^2+?u^~
 2+?v^2))/(w_0^2+?u^2+?v^2))*Summation(k):(1):(~
 50)*(1/2*(sqrt(w_0^2+?u^2+?v^2)*(-2*(Z_k-z_0)*~
 ((Y_k-?y)*w_0-(Z_k-z_0)*?v)+2*(X_k-?x)*(-(Y_k-~
 ?y)*?u+(X_k-?x)*?v)))/sqrt((-(X_k-?x)*w_0+(Z_k-~
 z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+(-(Y_~
 k-?y)*?u+(X_k-?x)*?v)^2)-(sqrt((-(X_k-?x)*w_0+~
 (Z_k-z_0)*?u)^2+((Y_k-?y)*w_0-(Z_k-z_0)*?v)^2+~
 (-(Y_k-?y)*?u+(X_k-?x)*?v)^2)*?v)/sqrt(w_0^2+?u^~
 2+?v^2))/(w_0^2+?u^2+?v^2))))~p0
4 ~d~sb/_!!   }
b00,!  c#T"_c/__c/__! " # $"}
^ _~
 ~Q
]|Expr|[#b @`bb#_b#_b#_})%# b'3" *|: ;bP8&c0!*Newton,Gs method|
  |}# b!( b#8 b$@!WW}]|[~p1
1 ~A(Newton(?x,?y,?u,?v,?m)=Conditional((?x,?y,?u,~
 ?v,m-?m),(abs(g(?x,?y,?u,?v))<'e)+(?m=0);Newton(~
 ((?x;?y;?u;?v)-(H(?x,?y,?u,?v))^(-1)*g(?x,?y,?u,~
 ?v))_1,((?x;?y;?u;?v)-(H(?x,?y,?u,?v))^(-1)*g(~
 ?x,?y,?u,?v))_2,((?x;?y;?u;?v)-(H(?x,?y,?u,?v))^~
 (-1)*g(?x,?y,?u,?v))_3,((?x;?y;?u;?v)-(H(?x,?y,~
 ?u,?v))^(-1)*g(?x,?y,?u,?v))_4,?m-1),(1>0)))~p0
2 ~d~Q
]|Expr|[#b @`bb#_b#_b#_}) # b$@}& b!( b"0 b#8 b$@ b%H b&P!WW}]|[~p0
0 ~A(Result=Newton(x_0,y_0,u_0,v_0,m))~p0
1 ~A(Result=(-1.8951729216217726e-8,1.7817289756318679e-8,~
 1.1727552562193317e-9,-1.0000000009486412,5))~p0
2 ~d~sb/_!!   }
$&!  c#T"!c#L"_c/__c/__}
^ _~Q
]|Expr|[#b @`bb#_b#_b#_})'# b$@" *|: ;bP8&c0!*point on cylinder|
  | axis}& b!( b"0 b#8 b$@ b%H b&P!WW}]|[~p0
1 ~A(P=(Result_1,Result_2,z_0))~p0
255 ~d~A(P=(-1.8951729216217726e-8,1.7817289756318679e-8,~
 0))~p0
2 ~sb/_!!   }
$&!  c#T"!c&T#_c/__c/_^}
^ _~Q
]|Expr|[#b @`bb#_b#_b#_})## b$@" *|: ;bP8&c0!*axis direction|
  |}& b!( b"0 b#8 b$@ b%H b&P!WW}]|[~p0
1 ~A(T=(Result_3,Result_4,w_0))~p0
255 ~d~A(T=(1.1727552562193317e-9,-1.0000000009486412,~
 1))~p0
2 ~sb/_!!   }
$&!  c#T"!c&T#_c/__c/_^}
^ _~A(Radius=~
 r(P_1,P_2,T_1,T_2))~p0
1 ~d~A(Radius=39.99999996550423)~p0
255 ~sb/_!!   }
$&!  c#T"!c#L"_c/__c/__}
^ _~A(Iterations=~
 Result_5)~p1
1 ~A(Iterations=5)~p0
255 ~sb/_!!   }
$&!  c#T"!c%\"_c/__c/__}
^ _~Q
]|Expr|[#b @`bb#_b#_b#_})3# b'4" *|: ;bP8&c0!*If Iterations ,]|
  | m,L the algorithm may have diverged,N|
  |}& b!( b"0 b#8 b$@ b%H b&P!WW}]|[~p0
2 ~A(Objective=f(P_1,P_2,T_1,T_2))~p0
1 ~A(Objective=4.3655745685100555e-11)~p0
255 ~sb/_!!   }
$&!  c#T"!c#L"_c/__c/__}
^ _~A(Hessian=~
 abs(H(P_1,P_2,T_1,T_2)))~p1
1 ~A(Hessian=322354585.8977074)~p0
255 ~sb/_!!   }
$&!  c#T"!c'P!_c/__c/__}
^ _~Q
]|Expr|[#b @`bb#_b#_b#_})9# b'4" *|: ;bP8&c0!*If Hessian ,\ 0|
  |,L the algorithm may have converged on a saddlepoint,N|
  |}& b!( b"0 b#8 b$@ b%H b&P!WW}]|[~p0
2 ~A(abs(Gradient)=abs(g(P_1,P_2,T_1,T_2)))~p1
1 ~A(abs(Gradient)=9.5417509370901888e-10)~p0
255 ~sb/_!!   }
$&!  c#T"!c'P!_c/__c/__}
^ _~Q
]|Expr|[#b @`bb#_b#_b#_})<# b'4" *|: ;bP8&c0!*Result is a critical|
  | point if,L and only if,L -\Gradient-\ ,] 0,N|
  |}& b!( b"0 b#8 b$@ b%H b&P!WW}]|[~p0
2 ~Q
]|Expr|[#b @`bb#_b#_b#_})!# b$@["! ) # b$@|
  |}& b!( b"0 b#8 b$@ b%H b&P!WW})## b$@" *|: ;bP8&c0!*Tube plot|
  |}& b!( b"0 b#8 b$@ b%H b&P!WW}}}& b!( b"0 b#8 b$@ b%H b&P!WW}]|[~p1
0 ~A(Axis=P+t*T/abs(T))~p0
1 ~d~A(N=(1,0,0)*#T)~p0
255 ~d~A(B=T*#N)~p0
255 ~d~A(Circle=Radius*(N/abs(N)*cos('q)+B/abs(B)*~
 sin('q)))~p0
1 ~d~Z1 1 337 514 0
0.47918 -0.87773 0.00000
-0.70032 -0.38233 -0.60279
0.52910 0.28887 -0.79789
2 4 4 4 10 0 0 ? ?
(~
 -60...66):(-60...66):(-40...40):(?=0...2*'p):(~
 'p/5):(10)~Q
]|Expr|[#b @`bb#_b#_b#_})!# b#@" *|: ;bP8&c0!*Declarations|
  |}& b!( b"0 b#8 b$@ b%H b&P!WW}]|[~p1
0 ~R0 ? (x,y,0):(y=south...north):(x=west...east):(~
 0)~p0
1 ~gc1 10 ? 0 -32768 -4664 0
8191 -3183 -3498 0
14563 -3183 -2591 0
21845 -3183 -1555 0
28216 -3183 -648 0
36408 -3183 518 0
43690 -3183 1555 0
51881 -3183 2720 0
57343 -3183 3498 0
65535 -3183 4664 0
~gc1 10 ? 0 -32768 -4664 0
8191 -1703 -3498 0
14563 -1703 -2591 0
21845 -1703 -1555 0
28216 -1703 -648 0
36408 -1703 518 0
43690 -1703 1555 0
51881 -1703 2720 0
57343 -1703 3498 0
65535 -1703 4664 0
~gc1 10 ? 0 -32768 -4664 0
8191 -222 -3498 0
14563 -222 -2591 0
21845 -222 -1555 0
28216 -222 -648 0
36408 -222 518 0
43690 -222 1555 0
51881 -222 2720 0
57343 -222 3498 0
65535 -222 4664 0
~gc1 10 ? 0 -32768 -4664 0
8191 1258 -3498 0
14563 1258 -2591 0
21845 1258 -1555 0
28216 1258 -648 0
36408 1258 518 0
43690 1258 1555 0
51881 1258 2720 0
57343 1258 3498 0
65535 1258 4664 0
~gc1 10 ? 0 -32768 -4664 0
8191 2739 -3498 0
14563 2739 -2591 0
21845 2739 -1555 0
28216 2739 -648 0
36408 2739 518 0
43690 2739 1555 0
51881 2739 2720 0
57343 2739 3498 0
65535 2739 4664 0
~gc1 10 ? 0 -32768 -4664 0
8191 4219 -3498 0
14563 4219 -2591 0
21845 4219 -1555 0
28216 4219 -648 0
36408 4219 518 0
43690 4219 1555 0
51881 4219 2720 0
57343 4219 3498 0
65535 4219 4664 0
~
 ~R0 ? (x,y,0):(x=west...east):(y=south...north):(~
 0)~p0
1 ~gc1 10 ? 0 -32768 -3183 0
8191 -3498 -3183 0
14563 -2591 -3183 0
21845 -1555 -3183 0
28216 -648 -3183 0
36408 518 -3183 0
43690 1555 -3183 0
51881 2720 -3183 0
57343 3498 -3183 0
65535 4664 -3183 0
~gc1 10 ? 0 -32768 -1703 0
8191 -3498 -1703 0
14563 -2591 -1703 0
21845 -1555 -1703 0
28216 -648 -1703 0
36408 518 -1703 0
43690 1555 -1703 0
51881 2720 -1703 0
57343 3498 -1703 0
65535 4664 -1703 0
~gc1 10 ? 0 -32768 -222 0
8191 -3498 -222 0
14563 -2591 -222 0
21845 -1555 -222 0
28216 -648 -222 0
36408 518 -222 0
43690 1555 -222 0
51881 2720 -222 0
57343 3498 -222 0
65535 4664 -222 0
~gc1 10 ? 0 -32768 1258 0
8191 -3498 1258 0
14563 -2591 1258 0
21845 -1555 1258 0
28216 -648 1258 0
36408 518 1258 0
43690 1555 1258 0
51881 2720 1258 0
57343 3498 1258 0
65535 4664 1258 0
~gc1 10 ? 0 -32768 2739 0
8191 -3498 2739 0
14563 -2591 2739 0
21845 -1555 2739 0
28216 -648 2739 0
36408 518 2739 0
43690 1555 2739 0
51881 2720 2739 0
57343 3498 2739 0
65535 4664 2739 0
~gc1 10 ? 0 -32768 4219 0
8191 -3498 4219 0
14563 -2591 4219 0
21845 -1555 4219 0
28216 -648 4219 0
36408 518 4219 0
43690 1555 4219 0
51881 2720 4219 0
57343 3498 4219 0
65535 4664 4219 0
~
 ~X1 0 (0,0,z):(z=0...top):(z)~p0
1 ~gc1 10 ? 0 -32768 -222 0
8191 -222 -222 370
14563 -222 -222 658
21845 -222 -222 987
28216 -222 -222 1275
36408 -222 -222 1645
43690 -222 -222 1974
51881 -222 -222 2344
57343 -222 -222 2591
65535 -222 -222 2961
~
 ~X1 0 (0,y,0):(y=0...north):(y)~p0
1 ~gc1 10 ? 0 -32768 -222 0
8191 -222 389 0
14563 -222 864 0
21845 -222 1406 0
28216 -222 1881 0
36408 -222 2492 0
43690 -222 3035 0
51881 -222 3646 0
57343 -222 4053 0
65535 -222 4664 0
~
 ~X1 0 (x,0,0):(x=0...east):(x)~p0
1 ~gc1 10 ? 0 -32768 -222 0
8191 389 -222 0
14563 864 -222 0
21845 1406 -222 0
28216 1881 -222 0
36408 2492 -222 0
43690 3035 -222 0
51881 3646 -222 0
57343 4053 -222 0
65535 4664 -222 0
~
 ~V?c69 (west)~p0
1 ~V?c68 (east)~p0
1 ~V?c70 (south)~p0
1 ~V?c71 (north)~p0
1 ~V?c66 (bottom)~p0
1 ~V?c67 (top)~p0
1 ~L1 0 ? (Axis):(t=bottom...top)~p0
0 ~gc1 10 ? 0 -32768 1872 -2094
8191 -222 1348 -1570
14563 -222 941 -1163
21845 -222 476 -698
28216 -222 69 -291
36408 -222 -455 233
43690 -222 -920 698
51881 -222 -1443 1221
57343 -222 -1792 1570
65535 -222 -2316 2094
~
 ~D2 4 1 16776960 ? ? (Axis+Circle):(t=-10...40):(~
 'q=0...2*'p):(?)~p0
0 ~gs17 17 0 0 ? 16776960 -222 -1792 -2617
-1056964864 911 -1633 -2458
-1056964864 1872 -1179 -2004
-1056964864 2514 -500 -1325
-1056964864 2739 301 -523
-1056964864 2513 1103 278
-1056964864 1872 1782 957
-1056964864 911 2236 1411
-1056964864 -222 2395 1570
-1056964864 -1355 2236 1411
-1056964864 -2316 1782 957
-1056964864 -2958 1102 278
-1056964864 -3183 301 -523
-1056964864 -2958 -500 -1325
-1056964864 -2316 -1179 -2004
-1056964864 -1355 -1633 -2458
-2147483648 -222 -1792 -2617
-1056964864 -222 -1956 -2454
-1056964864 911 -1797 -2294
-1056964864 1872 -1343 -1840
-1056964864 2514 -663 -1161
-1056964864 2739 138 -360
-1056964864 2513 939 441
-1056964864 1872 1618 1121
-1056964864 911 2072 1575
-1056964864 -222 2231 1734
-1056964864 -1355 2072 1574
-1056964864 -2316 1618 1121
-1056964864 -2958 939 441
-1056964864 -3183 138 -360
-1056964864 -2958 -664 -1161
-1056964864 -2316 -1343 -1840
-1056964864 -1355 -1797 -2294
-2147483648 -222 -1956 -2454
-1056964864 -222 -2120 -2290
-1056964864 911 -1960 -2131
-1056964864 1872 -1506 -1677
-1056964864 2514 -827 -997
-1056964864 2739 -26 -196
-1056964864 2513 776 605
-1056964864 1872 1455 1284
-1056964864 911 1909 1738
-1056964864 -222 2068 1897
-1056964864 -1355 1909 1738
-1056964864 -2316 1455 1284
-1056964864 -2958 775 605
-1056964864 -3183 -26 -196
-1056964864 -2958 -827 -998
-1056964864 -2316 -1506 -1677
-1056964864 -1355 -1960 -2131
-2147483648 -222 -2120 -2290
-1056964864 -222 -2283 -2126
-1056964864 911 -2124 -1967
-1056964864 1872 -1670 -1513
-1056964864 2514 -991 -834
-1056964864 2739 -189 -33
-1056964864 2513 612 769
-1056964864 1872 1291 1448
-1056964864 911 1745 1902
-1056964864 -222 1904 2061
-1056964864 -1355 1745 1902
-1056964864 -2316 1291 1448
-1056964864 -2958 612 768
-1056964864 -3183 -189 -33
-1056964864 -2958 -991 -834
-1056964864 -2316 -1670 -1513
-1056964864 -1355 -2124 -1967
-2147483648 -222 -2283 -2126
-1056964864 -222 -2447 -1963
-1056964864 911 -2287 -1803
-1056964864 1872 -1833 -1350
-1056964864 2514 -1154 -670
-1056964864 2739 -353 131
-1056964864 2513 448 932
-1056964864 1872 1128 1611
-1056964864 911 1581 2065
-1056964864 -222 1741 2225
-1056964864 -1355 1581 2065
-1056964864 -2316 1127 1611
-1056964864 -2958 448 932
-1056964864 -3183 -353 131
-1056964864 -2958 -1154 -670
-1056964864 -2316 -1833 -1350
-1056964864 -1355 -2287 -1804
-2147483648 -222 -2447 -1963
-1056964864 -222 -2610 -1799
-1056964864 911 -2451 -1640
-1056964864 1872 -1997 -1186
-1056964864 2514 -1318 -507
-1056964864 2739 -516 295
-1056964864 2513 285 1096
-1056964864 1872 964 1775
-1056964864 911 1418 2229
-1056964864 -222 1577 2388
-1056964864 -1355 1418 2229
-1056964864 -2316 964 1775
-1056964864 -2958 285 1096
-1056964864 -3183 -517 294
-1056964864 -2958 -1318 -507
-1056964864 -2316 -1997 -1186
-1056964864 -1355 -2451 -1640
-2147483648 -222 -2610 -1799
-1056964864 -222 -2774 -1636
-1056964864 911 -2614 -1476
-1056964864 1872 -2161 -1022
-1056964864 2514 -1481 -343
-1056964864 2739 -680 458
-1056964864 2513 121 1259
-1056964864 1872 800 1939
-1056964864 911 1254 2392
-1056964864 -222 1414 2552
-1056964864 -1355 1254 2392
-1056964864 -2316 800 1938
-1056964864 -2958 121 1259
-1056964864 -3183 -680 458
-1056964864 -2958 -1481 -343
-1056964864 -2316 -2161 -1023
-1056964864 -1355 -2614 -1476
-2147483648 -222 -2774 -1636
-1056964864 -222 -2937 -1472
-1056964864 911 -2778 -1313
-1056964864 1872 -2324 -859
-1056964864 2514 -1645 -180
-1056964864 2739 -844 622
-1056964864 2513 -42 1423
-1056964864 1872 637 2102
-1056964864 911 1091 2556
-1056964864 -222 1250 2715
-1056964864 -1355 1091 2556
-1056964864 -2316 637 2102
-1056964864 -2958 -43 1423
-1056964864 -3183 -844 622
-1056964864 -2958 -1645 -180
-1056964864 -2316 -2324 -859
-1056964864 -1355 -2778 -1313
-2147483648 -222 -2937 -1472
-1056964864 -222 -3101 -1309
-1056964864 911 -2942 -1149
-1056964864 1872 -2488 -695
-1056964864 2514 -1808 -16
-1056964864 2739 -1007 785
-1056964864 2513 -206 1586
-1056964864 1872 473 2266
-1056964864 911 927 2720
-1056964864 -222 1086 2879
-1056964864 -1355 927 2719
-1056964864 -2316 473 2266
-1056964864 -2958 -206 1586
-1056964864 -3183 -1007 785
-1056964864 -2958 -1809 -16
-1056964864 -2316 -2488 -695
-1056964864 -1355 -2942 -1149
-2147483648 -222 -3101 -1309
-1056964864 -222 -3265 -1145
-1056964864 911 -3105 -986
-1056964864 1872 -2651 -532
-1056964864 2514 -1972 148
-1056964864 2739 -1171 949
-1056964864 2513 -369 1750
-1056964864 1872 310 2429
-1056964864 911 764 2883
-1056964864 -222 923 3042
-1056964864 -1355 764 2883
-1056964864 -2316 310 2429
-1056964864 -2958 -370 1750
-1056964864 -3183 -1171 949
-1056964864 -2958 -1972 147
-1056964864 -2316 -2651 -532
-1056964864 -1355 -3105 -986
-2147483648 -222 -3265 -1145
-1056964864 -222 -3428 -981
-1056964864 911 -3269 -822
-1056964864 1872 -2815 -368
-1056964864 2514 -2136 311
-1056964864 2739 -1334 1112
-1056964864 2513 -533 1914
-1056964864 1872 146 2593
-1056964864 911 600 3047
-1056964864 -222 759 3206
-1056964864 -1355 600 3047
-1056964864 -2316 146 2593
-1056964864 -2958 -533 1913
-1056964864 -3183 -1334 1112
-1056964864 -2958 -2136 311
-1056964864 -2316 -2815 -368
-1056964864 -1355 -3269 -822
-2147483648 -222 -3428 -981
-1056964864 -222 -3592 -818
-1056964864 911 -3432 -658
-1056964864 1872 -2978 -205
-1056964864 2514 -2299 475
-1056964864 2739 -1498 1276
-1056964864 2513 -697 2077
-1056964864 1872 -17 2756
-1056964864 911 436 3210
-1056964864 -222 596 3370
-1056964864 -1355 436 3210
-1056964864 -2316 -18 2756
-1056964864 -2958 -697 2077
-1056964864 -3183 -1498 1276
-1056964864 -2958 -2299 475
-1056964864 -2316 -2978 -205
-1056964864 -1355 -3432 -658
-2147483648 -222 -3592 -818
-1056964864 -222 -3755 -654
-1056964864 911 -3596 -495
-1056964864 1872 -3142 -41
-1056964864 2514 -2463 638
-1056964864 2739 -1661 1440
-1056964864 2513 -860 2241
-1056964864 1872 -181 2920
-1056964864 911 273 3374
-1056964864 -222 432 3533
-1056964864 -1355 273 3374
-1056964864 -2316 -181 2920
-1056964864 -2958 -860 2241
-1056964864 -3183 -1662 1439
-1056964864 -2958 -2463 638
-1056964864 -2316 -3142 -41
-1056964864 -1355 -3596 -495
-2147483648 -222 -3755 -654
-1056964864 -222 -3919 -491
-1056964864 911 -3759 -331
-1056964864 1872 -3306 123
-1056964864 2514 -2626 802
-1056964864 2739 -1825 1603
-1056964864 2513 -1024 2404
-1056964864 1872 -345 3084
-1056964864 911 109 3537
-1056964864 -222 269 3697
-1056964864 -1355 109 3537
-1056964864 -2316 -345 3083
-1056964864 -2958 -1024 2404
-1056964864 -3183 -1825 1603
-1056964864 -2958 -2626 802
-1056964864 -2316 -3306 122
-1056964864 -1355 -3759 -331
-2147483648 -222 -3919 -491
-1056964864 -222 -4082 -327
-1056964864 911 -3923 -168
-1056964864 1872 -3469 286
-1056964864 2514 -2790 965
-1056964864 2739 -1989 1767
-1056964864 2513 -1187 2568
-1056964864 1872 -508 3247
-1056964864 911 -54 3701
-1056964864 -222 105 3860
-1056964864 -1355 -54 3701
-1056964864 -2316 -508 3247
-1056964864 -2958 -1188 2568
-1056964864 -3183 -1989 1767
-1056964864 -2958 -2790 965
-1056964864 -2316 -3469 286
-1056964864 -1355 -3923 -168
-2147483648 -222 -4082 -327
-1056964864 -222 -4246 -164
-1056964864 911 -4087 -4
-1056964864 1872 -3633 450
-1056964864 2514 -2953 1129
-1056964864 2739 -2152 1930
-1056964864 2513 -1351 2731
-1056964864 1872 -672 3411
-1056964864 911 -218 3865
-1056964864 -222 -59 4024
-1056964864 -1355 -218 3864
-1056964864 -2316 -672 3411
-1056964864 -2958 -1351 2731
-1056964864 -3183 -2152 1930
-1056964864 -2958 -2954 1129
-1056964864 -2316 -3633 450
-1056964864 -1355 -4087 -4
-2147483648 -222 -4246 -164
-2147483648 -222 -4410 0
-2147483648 911 -4250 159
-2147483648 1872 -3796 613
-2147483648 2514 -3117 1293
-2147483648 2739 -2316 2094
-2147483648 2513 -1514 2895
-2147483648 1872 -835 3574
-2147483648 911 -381 4028
-2147483648 -222 -222 4187
-2147483648 -1355 -381 4028
-2147483648 -2316 -835 3574
-2147483648 -2958 -1515 2895
-2147483648 -3183 -2316 2094
-2147483648 -2958 -3117 1292
-2147483648 -2316 -3796 613
-2147483648 -1355 -4250 159
-2147483648 -222 -4410 0
~
 ~S17 ? 255 ? ? (X_k,Y_k,Z_k):(k=1...n):(10)~p0
0 ~gc-1 50 ? 0 -32768 -364 3103
1504 594 -3805 -442
2674 -3172 -1401 1543
4012 2694 -2051 1102
5182 644 1780 2002
6687 2046 -290 2759
8024 1908 28 2658
9529 693 -63 3823
10699 2624 -2369 993
12037 1797 890 1950
13207 594 -3072 -1175
14711 -1566 -2245 -1708
16049 -222 -2473 -1937
17553 2560 -1357 -297
18724 494 292 3549
20061 2735 -1169 728
21232 -3022 -1427 -158
22736 -3054 -500 1502
24074 -1878 -214 3463
25578 -2906 401 1147
26748 -1703 -346 3750
28086 2624 -1529 2461
29256 36 -2831 -1562
30761 -888 771 3087
32098 1076 -4041 55
33603 1908 133 2554
34773 -736 1683 2219
36111 2624 -692 1624
37281 -2967 -1687 -104
38786 -2760 -400 2335
40123 2203 -2836 212
41627 -2085 -8 3040
42798 -377 1031 2928
44135 2289 -212 2209
45306 1943 839 1794
46810 1076 -2523 -1463
48148 -3147 -52 485
49652 -685 -3285 -1073
50823 -3138 -277 782
52160 -2786 -2892 576
53330 -2457 -3009 40
54835 2578 -64 1205
56172 -3082 -779 1641
57677 -274 -3886 -523
58847 292 479 3423
60185 -3167 -441 -219
61355 -480 -2308 -2086
62860 -2523 -1801 -1056
64030 -2523 -2587 -271
65535 -1658 -2577 -1308
~
 ~S17 ? 16711680 ? ? (P):(?):(10)~p0
0 ~gc-1 1 ? 0 -32768 -222 0
~t~p0
0 ~Q
]|Expr|[#b @`bb#_b#_b#_})!# b%H["! ) # b%H|
  |}& b!( b"0 b#8 b$@ b%H b&P!WW})b O# b%H" *|: ;bP8&c0!*Copyright|
  | 2000,L Thomas G,N Davis,L Dept,N of Civ,N and Envir,N Engrg,N|
  |,L Univ,N of South Florida,L Tampa,L FL 33620,N|
  |}& b!( b"0 b#8 b$@ b%H b&P!WW}}}& b!( b"0 b#8 b$@ b%H b&P!WW}]|[~p0
0 ~c3
62 -1 61 -1 47 -1 36 -1 ~c3
63 -1 62 -1 76 -1 80 -1 ~c5
64 -1 63 -1 65 -1 69 -1 66 -1 70 -1 ~c3
74 -1 73 -1 67 -1 68 -1 ~c2
75 -1 74 -1 71 -1 ~c1
76 -1 75 -1 ~c6
77 -1 76 -1 65 -1 69 -1 66 -1 70 -1 72 -1 ~c3
79 -1 78 -1 47 -1 36 -1 ~c2
80 -1 79 -1 76 -1 ~c5
81 -1 80 -1 65 -1 69 -1 66 -1 70 -1 ~c2
84 -1 83 -1 64 -1 ~c5
85 -1 84 -1 65 -1 69 -1 66 -1 70 -1 ~c2
88 -1 87 -1 85 -1 ~c5
89 -1 88 -1 65 -1 69 -1 66 -1 70 -1 ~c29
94 -1 93 -1 53 -1 31 -1 54 -1 30 -1 56 -1 28 -1 57 -1 27 -1 51 -1 37 -1 58 -1 26 -1 43 -1 35 -1 45 -1 34 -1 55 -1 29 -1 44 -1 33 -1 85 -1 12 -1 49 -1 38 -1 89 -1 11 -1 91 -1 10 -1 ~c5
97 -1 96 -1 94 -1 2 -1 55 -1 29 -1 ~c5
100 -1 99 -1 94 -1 2 -1 58 -1 26 -1 ~c19
102 -1 101 -1 96 -1 8 -1 94 -1 2 -1 99 -1 7 -1 58 -1 26 -1 43 -1 35 -1 45 -1 34 -1 55 -1 29 -1 44 -1 33 -1 81 -1 14 -1 ~c3
104 -1 103 -1 94 -1 2 -1 ~c19
107 -1 106 -1 96 -1 8 -1 94 -1 2 -1 99 -1 7 -1 58 -1 26 -1 43 -1 35 -1 45 -1 34 -1 55 -1 29 -1 44 -1 33 -1 64 -1 13 -1 ~c19
109 -1 108 -1 96 -1 8 -1 94 -1 2 -1 99 -1 7 -1 58 -1 26 -1 43 -1 35 -1 45 -1 34 -1 55 -1 29 -1 44 -1 33 -1 89 -1 11 -1 ~c19
112 -1 111 -1 96 -1 8 -1 94 -1 2 -1 99 -1 7 -1 58 -1 26 -1 43 -1 35 -1 45 -1 34 -1 55 -1 29 -1 44 -1 33 -1 85 -1 12 -1 ~e