How to write a Mathematica 10 code for a solution of
[ScriptCapitalL]= ([Omega]*L+[Rho]*K) - [Lambda]*(Y-[Beta]*(!(
*UnderoverscriptBox[([Sum]), (j = 1), (n)](
*SubscriptBox[([Alpha]), (j)]
*SubsuperscriptBox[(X), (j), ([Rho])])))^(1/[Rho]))
How to write a Mathematica 10 code for a solution of
[ScriptCapitalL]= ([Omega]*L+[Rho]*K) - [Lambda]*(Y-[Beta]*(!(
*UnderoverscriptBox[([Sum]), (j = 1), (n)](
*SubscriptBox[([Alpha]), (j)]
*SubsuperscriptBox[(X), (j), ([Rho])])))^(1/[Rho]))