In[16]:=

RowBox[{(*This program is GENERALORDER, it describes the thermoluminescence model where the el ... 62371;, Clear[programGENERALORDER, s, N1, N2, N3, E1, k, n0, β, sol, sol2, sol3, n, t, b]}]}]

[Graphics:HTMLFiles/generalordernodocument_3.gif]

[Graphics:HTMLFiles/generalordernodocument_4.gif]

Out[16]=

Null^5

Created by Mathematica  (April 14, 2004)