public Mathematics.FunNode2[] FindSolution()
{
Mathematics.SturmLiouvilleDiffEquation e =
new Mathematics.SturmLiouvilleDiffEquation(k,
z => 0, z => - 2 * alfa(z) / R, z => - 2 * alfa(z) * Tenv / R);
return(e.Solve(0, L, N, 0, -k(0), F0, An, k(L), An * Tenv));
}
public MainForm()
{
InitializeComponent();
Mathematics.SturmLiouvilleDiffEquation e =
new Mathematics.SturmLiouvilleDiffEquation(x => 0, x => 1, x => 0, x => x);
Mathematics.FunNode2[] nodes = e.Solve(0, 1, 10, 1, 0, 0, 1, 0, 0.5);
}