In[]:=
h[t_]:=Sqrt[Sum[x[k],{k,t}]]
In[]:=
g[t_]:=Exp[-Sum[d[k]*x[k],{k,t}]]
In[]:=
k[t_]:=Exp[c[t]*g[t-1]*h[t]]
In[]:=
k[t]
Out[]=
-d[k]x[k]
-1+t
∑
k
t
∑
k
In[]:=
f[x_]:=Sum[b[t]*x[t]*k[t],{t,T}]
In[]:=
f[x]
Out[]=
T
∑
t
-d[k]x[k]
-1+t
∑
k
t
∑
k