Формальные параметры.
Процедура TRED1. Входные: N (тип integer) - раз¬мер квадратной матрицы N?N, для которой вычисляются соб¬ственные значения; tol (тип real) - константа, за¬ви¬ся¬щая от свойств конкретной вычислительной системы; А (тип real) - массив размером N?N для размещения эле¬мен¬тов сим¬мет-рической матрицы, для которой вы¬чис¬ля¬¬ют¬ся соб¬ст¬вен¬ные значения. Выходные: А (тип real) - мас¬сив размером N?N, в котором только под¬ди¬а¬го¬наль¬ные элементы со¬дер¬жат информацию о пре¬об¬ра¬зо¬ва-нии Ха¬усхолдера, эле¬мен¬ты верхнего треугольного мас¬сива оп¬ределяют исходную мат¬рицу А; D (тип real) - мас¬сив размером N?1, со¬дер¬жа¬щий диагональные эле¬мен¬ты трех¬диагональной матрицы Аn-1; Е - массив раз¬ме¬ром N?1, N - 1 элементов которого от Е[2] до Е[N] оп¬р嬬де¬ля¬ют внедиагональные элементы трех¬ди¬а¬го¬наль¬ной мат¬ри¬цы Аn-1. Первый элемент массива Е[1] равен нулю; Е2 (тип real) - массив, содержащий слу¬жеб¬ную ин¬¬фор¬ма¬цию для дальнейших расчетов.
Процедура GAUSS. Входные: N (тип integer) - раз¬мер квад¬ратной матрицы N?N; ААА (тип real) - ис¬ход¬ная квад¬рат¬ная матрица А. Выходные: АА (тип real) - мат¬pица, об¬рат¬ная данной.
Процедура TQL1. Входные: N (тип integer) - порядок трех¬диагональной матрицы Аn-1; massheps (тип real) - кон¬стан¬та, зависящая от свойств конкретной вы¬чис¬ли¬тель¬ной сис¬темы, представляет наименьшее число, для ко¬торого еще выполняется условие 1 + massheps > 1; D (тип real) - мас¬сив размером N?1, содержащий ди¬аго¬наль¬ные эле¬мен¬ты трех¬диагональной матрицы Аn-1; Е - массив раз-мером N?1, N - 1 элементов которого от Е[2] до Е[N] оп¬ре¬д嬬ля¬ют вне¬диагональные элементы трех¬ди¬а¬¬-го¬наль¬ной мат¬р謬цы Аn-1. Первый элемент массива Е[1] ра¬вен ну¬лю. Надо за¬метить, что он вообще не ис¬поль¬¬зу¬ется и может быть про¬из¬воль¬ным. Массив E в прграм¬ме используется как ра¬бо¬чий. Вы-ходные: D (тип re¬al) - массив размером N?1, со¬дер¬жа¬щий N собственных знବчений матрицы Аn-1, рас-по¬ло¬жен¬ных в порядке их во第¬растания; Е (тип real) - мас¬сив ис¬поль¬¬зуется как ра¬б¬чий для хранения про¬ме¬жу¬точ¬ных ре¬зуль¬татов; ZА (тип real) - массив размером N?N, в ко¬то¬ром пре䬬¬ва¬ри¬тель¬¬но записывается единичная матрица, ес¬ли на¬до вы¬¬¬чис¬лять собственные векторы трехдиагональной мат¬-р謬цы
