Settings25576u01v-2*pi15*pifunc4(u,v)*sin(v)func4(u,v)*cos(v)func2(v)*(u*cos(func1(v))-func3(u,v)*sin(func1(v)))1function double func1(double bb1)
{
return (Pi/2)*Exp(-bb1/(8*Pi));
}
function double func2(double bb2)
{
return 1-(1/2)*((5/4)*(1-rmod(3.6*bb2, 2*Pi)/Pi-(bb2>0?0:2))^2-1/4)^2;
}
function double func3(double aa3,double bb3)
{
return 1.95653*aa3^2*(1.27689*aa3-1)^2*Sin(func1(bb3));
}
function double func4(double aa4,double bb4)
{
return func2(bb4)*(aa4*Sin(func1(bb4))+func3(aa4,bb4)*Cos(func1(bb4)));
}000