There should be no lists on either side of the equations.

Hello,

I’m trying to solve a system of differential equations. The dependent variables are TLED and TChasis. The independent variable is t. I keep on getting the same error, “There should be no lists on either side of the equations.” Here’s what I’ve entered.

In[14]:= G = {(thickLED/(kLEDALED) +
thickInsulator/(kInsulator
AInsulator) +
thickChasis/(kChasis*AChasisInsulator))}

In[45]:= eqns = {cLEDmLEDTLED’[t] == -(TLED[t] - TChasis[t])/G ,
cChasis * mChasis * TChasis’[t] == (TLED[t] - TChasis[t])/G -
emissivityChasis * StefanBoltzemannConstantAChasisSpace
TChasis[t]^4 }

In[53]:=
sol = DSolve[eqns, {TLED[t], TChasis[t]}, t]

During evaluation of In[53]:= DSolve::nolist: List encountered within {cLED mLED (TLED^[Prime])[t]=={(TChasis[t]-TLED[t])/(thickChasis/(AChasisInsulator kChasis)+thickInsulator/(AInsulator kInsulator)+thickLED/(ALED kLED))},cChasis mChasis (TChasis^[Prime])[t]=={-AChasisSpace emissivityChasis StefanBoltzemannConstant TChasis[t]^4+(-TChasis[t]+TLED[t])/(Power[<<2>>] Power[<<2>>] thickChasis+Power[<<2>>] Power[<<2>>] thickInsulator+Power[<<2>>] Power[<<2>>] thickLED)}}. There should be no lists on either side of the equations. >>

Out[53]= DSolve[{cLED mLED Derivative[1][TLED][t] == {(
TChasis[t] - TLED[t])/(
thickChasis/(AChasisInsulator kChasis) + thickInsulator/(
AInsulator kInsulator) + thickLED/(ALED kLED))},
cChasis mChasis Derivative[1][TChasis][
t] == {-AChasisSpace emissivityChasis StefanBoltzemannConstant
TChasis[t]^4 + (-TChasis[t] + TLED[t])/(
thickChasis/(AChasisInsulator kChasis) + thickInsulator/(
AInsulator kInsulator) + thickLED/(ALED kLED))}}, {TLED[t],
TChasis[t]}, t]

Thanks in advance.

Never mind. I fixed it.