My code goes as follows:
\[Alpha] = 1; n = 2;
g[\[Omega]_] = PDF[NormalDistribution[\[Alpha], n*\[Alpha]], \[Omega]]
f[t_] := NIntegrate[g[\[Omega]]*Exp[I*(\[Alpha] - \[Omega])*(t)], {\[Omega], 0, 10}]
Everything is fine up to this point. And, finally, I want to evaluate:
NDSolve[{G'[t] + NIntegrate[f[t - v]*G[v], {v, 0, t}] == 0, G[0] == 1}, G, {t, 0, 1}]
But, I get error:
NIntegrate::inumr: The integrand E^(-I v (1-[Omega])-1/8 (-1+[Omega])^2)/(2 Sqrt[2 [Pi]]) has evaluated to non-numerical values for all sampling points in the region with boundaries {{0,10}}. ...... x3
General::stop: Further output of NIntegrate::inumr will be suppressed during this calculation.
Why is it unable to evaluate this integral numerically?
f[t_]
withf[t_?NumericQ]
. This often fixes problems of this type. $\endgroup$