|
Текст подпрограммы и версий ( Фортран ) am19r.zip , am19d.zip |
Тексты тестовых примеров ( Фортран ) tam19r.zip , tam19d.zip |
|
Текст подпрограммы и версий ( Си ) am19r_c.zip , am19d_c.zip |
Тексты тестовых примеров ( Си ) tam19r_c.zip , tam19d_c.zip |
|
Текст подпрограммы и версий ( Паскаль ) am19r_p.zip , am19e_p.zip |
Тексты тестовых примеров ( Паскаль ) tam19r_p.zip , tam19e_p.zip |
Умножение прямоугольной разреженной матрицы, заданной в формате RR (C) U, на заполненный вектор - столбец
Описание формата RR (C) U приведено в описании подпрограммы AMTSR .
Пусть заданы прямоугольная разреженная матрица A размеров N на M в формате RR (C) U и заполненный вектор - столбец B длины M. Подпрограмма AM19R вычисляет заполненный вектор - столбец C длины N, равный произведению матрицы A на вектор - столбец B
С.Писсанецки. Технология разреженных матриц. -М.: Мир, 1988
SUBROUTINE AM19R ( IA, JA, AN, B, N, M, C)
Параметры
| IA, JA - AN | заданные портрет и ненулевые элементы матрицы A в формате RR (C) U; |
| B - | вещественный одномерный массив M, содержащий компоненты заданного заполненного вектора - столбца; |
| N - | заданное число строк матрицы A (тип: целый); |
| M - | заданное число столбцов матрицы A (тип: целый); |
| C - | вещественный одномерный массив длины N, содержащий компоненты результирующего вектора |
Версии
| AM19D - | умножение прямоугольной разреженной матрицы, заданной в формате RR (C) U, на заполненный вектор - столбец в режиме удвоенной точности; при этом параметры AN, B и C должны быть описаны в режиме DOUBLE PRECISION |
Вызываемые подпрограммы: нет
Замечания по использованию: нет
DIMENSION IA(5), JA(10), AN(10), B(6), C(4)
DATA IA /1, 3, 7, 9, 11/,
* JA /5, 3, 4, 3, 1, 5, 1, 6, 4, 2/,
* AN /- 1., 2., 3., 3., 4., 7., - 2., - 1., 1., 1./,
* B /1., 1., 1., 1., 1., 1./
N = 4
M = 6
CALL AM19R (IA, JA, AN, B, N, M, C)
Результаты: C = ( 1, 17, - 3, 2 )