|
Текст подпрограммы и версий ( Фортран ) amz7r.zip , amz7d.zip |
Тексты тестовых примеров ( Фортран ) tamz7r.zip , tamz7d.zip |
|
Текст подпрограммы и версий ( Си ) amz7r_c.zip , amz7d_c.zip |
Тексты тестовых примеров ( Си ) tamz7r_c.zip , tamz7d_c.zip |
|
Текст подпрограммы и версий ( Паскаль ) amz7r_p.zip , amz7e_p.zip |
Тексты тестовых примеров ( Паскаль ) tamz7r_p.zip , tamz7e_p.zip |
Преобразование симметричной ленточной матрицы, заданной в компактной форме представления для симметричной матрицы, в компактную форму.
Симметричная ленточная матрица А порядка N с NС ко - диагоналями, заданная в компактной форме представления для симметричной матрицы, преобразуется в компактную форму представления. Таким образом, АМZ7R выполняет действие, обратное по отношению к подпрограмме АМZ6R.
SUBROUTINE AMZ7R (A, N, NC, B)
Параметры
| A - | вещественный вектор длины N на (N + 1)/2, в котором задается симметричная ленточная матрица в компактной форме представления для симметричной матрицы; |
| N - | порядок матрицы (тип: целый); |
| NC - | число ко - диагоналей (тип: целый); |
| B - | вещественный двумерный массив размера N на (NС + 1), в котором запоминается исходная симметричная ленточная матрица в компактной форме представления. |
Версии
| AMZ7D - | преобразование симметричной ленточной матрицы, заданной с удвоенной точностью в компактной форме представления для симметричной матрицы, в компактную форму. |
Вызываемые подпрограммы: нет.
Замечания по использованию
|
Вектор А и массив B должны занимать разное место в памяти. В подпрограмме АМZ7D параметры А и B должны иметь тип DОUВLЕ РRЕСISIОN. |
DIMENSION A(10), B(4, 2)
DATA A /1.1, 2.1, 2.2, 0., 3.2, 3.3, 0., 0., 4.3, 4.4/
N = 4
NC = 1
CALL AMZ7R (A, N, NC, B)
Результаты: В = ( 0., 2.1, 3.2, 4.3, 1.1, 2.2, 3.3, 4.4 )