User Portlet
| Discussions |
|---|
| In[1]:= ClearAll["Global '*"]; NN = 11; tmax = 6.0; fN = 1.0; Rs = 50.0; Rescimpair = Table[Rc[k] = 0.0, {k, 1, NN, 2}]; Rescpair = Table[Rc[k] = 0.0, {k, 2, NN, 2}]; Rc[NN] = 1100.0; Reslimpair... |
User Portlet | Discussions |
|---|
| In[1]:= ClearAll["Global '*"]; NN = 11; tmax = 6.0; fN = 1.0; Rs = 50.0; Rescimpair = Table[Rc[k] = 0.0, {k, 1, NN, 2}]; Rescpair = Table[Rc[k] = 0.0, {k, 2, NN, 2}]; Rc[NN] = 1100.0; Reslimpair... |