Hello,

I am having trouble getting a double integral to work. It is a function of k, and works well for one value of k (k=2)
that I can find. Any other value, and the function spits out this error message:

NIntegrate::inumr: The integrand Re[\!\(\*SubsuperscriptBox[\(\\), \(-1.13`\), \(50\)]\(\(0.000035237548017848564`\ \*SuperscriptBox[\(E\), \(\(-t\)\ \((\(\(0.02`\)\( \)\) + Times[<<2>>])\) - 0.039241305112179804`\ Re + 0.039241305112179804`\ \*SuperscriptBox[\(2\), \(Times[<<2>>]\)]\ Re\)]\ Re[\*SuperscriptBox[\(E\), \(\(-0.2092315267335341`\)\ \*SuperscriptBox[\(Abs[<<1>>]\), \(2.01`\)]\)]]\) \T\)\)] has evaluated to non-numerical values for all sampling points in the region with boundaries {{0,500}}. >>

Here is the function:
ginfinity[\_] :=
Re[NIntegrate[minfinity[\, t], {t, 0, 500}]]
where
minfinity[\_, t_] :=
Re[Integrate[
E^(\[T, t] - ((\[T, t]) (t)) - \[T, t] (1/2)^(t/
H)) (zta[\, T]) .000136, {T, thetat, 50}]]

If anybody has any idea of what could be going wrong, I would greatly appreciate it!

Thank you,
Katherine