FORTRAN: численное решение системы алгебраических уравнений

[DLL]

Есть система алгебраических уравнений, которую надо решать численно (методом Ньютона, например), при чем на FORTRAN.
Я нашел субрутину, которую по логике можно будет легко встроить.
Но никак не могу разобраться как внутри ввести нужные мне уравнения.
Буду рад любой помощи. В частности, если кто-нибудь подскажет, где найти более прозрачную (user-friendly) програмку.

[Munin]

DLL в сообщении #852984 писал(а):

Я нашел субрутину, которую по логике можно будет легко встроить.
Но никак не могу разобраться как внутри ввести нужные мне уравнения.

В документации же всё написано: вы должны написать отдельные субрутины для их вычисления, и передать в субрутину NLEQ1 как параметры FCN, JAC. С NLEQ1E ещё проще: вы должны просто скомпилировать её с субрутиной, названной в точности FCN.

[DLL]

Спасибо. Порекомендовали еще библиотеку IMSL ввиду простоты и быстроты.
Может у кого есть она в свободном доступе?
P.S: в интернете на торрентах лежит, но видимо никто не раздает

[Yuri Gendelman]

DLL в сообщении #852984 писал(а):

Есть система алгебраических уравнений, которую надо решать численно (методом Ньютона, например), при чем на FORTRAN.

LAPACK - Linear Algebra PACKage
Это - свободная библиотека подпрограмм на Фортране. Она используется уже много лет, т.е. алгоритмы там отполированы. На указанной странице есть ссылка для скачивания архива с исходниками.

[DLL]

Спасибо, правда речь шла про нелинейные уравнения.
На данный момент, возникла необходимость решать (найти все корни) полиномиального уравнения от одной переменной.
Такая рутина присутствует в библиотеке NAG - C02AGF. Есть ли еще альтернативные хорошие солверы?

[Yuri Gendelman]

DLL в сообщении #859759 писал(а):

...речь шла про нелинейные уравнения.

Да, Вы правы. Посмотрите вот эти ссылки на Netlib:
sminpack
toms - алгоритмы из "Transactions on Mathematical Software".