Hi!
Sorry if I am missing something or not following any implicit rules, I am really new to Maple and this forum.
For the sake of completeness, here the code that is given:
Ve := Vector([VeX, VeY, VeZ]);
with(LinearAlgebra);
Vh := Normalize(Vector([alphaX*Ve(1), alphaY*Ve(2), Ve(3)]), Euclidean, conjugate = false);
lensq := Vh(1)*Vh(1) + Vh(2)*Vh(2);
T1 := Vector([-Vh(2), Vh(1), 0])/sqrt(lensq);
T2 := CrossProduct(Vh, T1);
r := sqrt(x);
phi := 2*Pi*y;
t1 := r*cos(phi);
t2 := r*sin(phi);
s := 1/2*(1 + Vh(3));
t22 := (1 - s)*sqrt(1 - t1*t1) + s*t2;
Nh := t1*T1 + t22*T2 + sqrt(1 - t1*t1 - t22*t22)*Vh;
NULL;
Ne := Normalize(Vector([alphaX*Nh(1), alphaY*Nh(2), Nh(3)]), Euclidean, conjugate = false);
AV := (-1 + sqrt(1 + (alphaX^2*Ve(1)^2 + alphaY^2*Ve(2)^2)/Ve(3)^2))/2;
G1 := 1/(1 + AV);
DN := 1/(Pi*alphaX*alphaY*(Ne(1)^2/alphaX^2 + Ne(2)^2/alphaY^2 + Ne(3)^2)^2);
DVN := G1*DotProduct(Ve, Ne, conjugate = false)*DN/DotProduct(Ve, Vector([0, 0, 1]), conjugate = false);
PDF := DVN/(4*DotProduct(Ve, Ne, conjugate = false));
So far, so good. Now what I want to do is:
PDFint := int(PDF, [x = xInf .. xSup, y = yInf .. ySup]);
to calculate the symbolic integral of PDF
over x
and y
. The issue is that I keep running out of memory after a few hours and my operating system (Linux Fedora) automatically shuts Maple down.
I am convinced that there must be a way to either preprocess PDF
so that the int(...)
command doesn't eat up all the RAM, or some different way to calculate an integral that maybe has a different structure?
I have tried codegen[optimize](PDF)
and liked what it did, but I don't know how to progress with the result of it, if at all possible.
I know that there is also a way to calculate the integral numerically, but I need the analytic integral, so numerical solutions are of no use to me.
If there is really no way for me to obtain this integral, I would really appreciate an explanation of why, so that I can rest at night finally lol.
Thank you in advance,
Jane