Advanced Computation expert in Mathematica

Job ID: 39675319

Budget: $10 – $30 USD

I'm seeking an experienced Mathematica expert to assist with the development of advanced symbolic computation algorithms. The task involves creating sophisticated algorithms that can efficiently handle complex symbolic computations.

https://www.wolfram.com/mathematica

I would like to expand in Mathematica this expression Exp[(x n)/(4t) (-Sqrt[(2t)/n-4t+x^2]+Sqrt[-4 t+x^2])] to order 100 in 1/n (being x and t constant positive real numbers, and with the assumptions Assumptions->{x>0,y>0,t>0,4t<x^2,4t<y^2}). I would like the first 100 coefficients of this series in Mathematica to be obtained correctly.

Additional Information
If the expansion is incorrect, the work will not be complete.

The expression is this one: Exp[(x n)/(4t) (-Sqrt[(2t)/n-4t+x^2]+Sqrt[-4 t+x^2])]. By asymptotic large-n
n expansion I don’t mean expand a degree-100 polynomial. What I need is an asymptotic series in inverse powers of n, i.e., a 1/n series

I need to expand it to order 100 in Mathematica

There is no document, but it's this: I would like to expand in Mathematica this expression Exp[(x n)/(4t) (-Sqrt[(2t)/n-4t+x^2]+Sqrt[-4 t+x^2])] to order 100 in 1/n (being x and t constant positive real numbers, and with the assumptions Assumptions->{x>0,y>0,t>0,4t<x^2,4t<y^2}). I would like the first 100 coefficients of this series in Mathematica, correctly obtained, and the procedure that leads to its obtention..
Also, please save the first 100 coefficients in an .mx file

And I mean a large n expansion, i.e., the kind of expansion you obtain by doing Series[fuction, {n, infinity, Cap}]. In our case, being the Cap=100