Собственные значения
| Категория реферата: Рефераты по математике
| Теги реферата: дипломная работа скачать бесплатно, сочинения по русскому языку
| Добавил(а) на сайт: Якуб.
Предыдущая страница реферата | 1 2 3 4 5 6 7 8 9 10 11 | Следующая страница реферата
{**********************************************************************}
SUBROUTINE NORML(XL,X)
DIMENSION X(3)
{**********************************************************************}
Подпрограмма norml.
Эта подпрограмма находит наибольший из трех элементов собственного вектора
и нормирует собственный вектор по этому наибольшему элементу.
{**********************************************************************}
# FIND THE LARGEST ELEMENT
XBIG = X(1)
IF(X(2).GT.XBIG)XBIG=X(2)
IF(X(3).GT.XBIG)XBIG=X(3)
# Нормирование по XBIG
X(l) = X(1)/XBIG
X(2) = X(2)/XBIG
X(3) = X(3)/XBIG
XL = XBIG
RETURN
END
{**********************************************************************}
Результат работы программы получаем в виде:
|
Номер Итерации |
Собственное Значение ( N / M ** 2 ) |
Собственный вектор |
||
|
X (1) |
X (2) |
X (3) |
||
|
Категории:Предыдущая страница реферата | 1 2 3 4 5 6 7 8 9 10 11 | Следующая страница реферата Поделитесь этой записью или добавьте в закладки |
| |||
Главная