Текст подпрограммы и версий ( Фортран ) ammir.zip |
Тексты тестовых примеров ( Фортран ) tammir.zip |
Текст подпрограммы и версий ( Си ) ammir_c.zip |
Тексты тестовых примеров ( Си ) tammir_c.zip |
Текст подпрограммы и версий ( Паскаль ) ammir_p.zip |
Тексты тестовых примеров ( Паскаль ) tammir_p.zip |
Символическое умножение прямоугольных разреженных матриц, заданных в формате RR (C) U
Описание формата RR (C) U приведено в описании подпрограммы AMTSR .
Пусть в формате RR (C) U заданы матрица A размеров p на q и матрица B размеров q на r. Результирующая матрица C, являющаяся произведением матриц A и B, имеет размеры p на r, а ее элементы определяются формулой
q ci k = ∑ a i j bj k , i = 1, 2,..., p ; k = 1, 2,..., r j =1
Эта формула выражает элемент ci k как скалярное произведение i - й строки матрицы A на k - й столбец матрицы B. Однако поскольку матрица B задана строчным форматом, то к ее столбцам нет непосредственного доступа. Эту трудность можно обойти путем изменения порядка вычислений попарных произведений при вычислении ci k : при фиксированных i и j элемент a i j умножается на все элементы bj k j - й строки матрицы B; полученные произведения прибавляются к соответствующим компонентам вещественного вспомогательного массива X, начальные значения которых равны нулю. Когда таким образом обработаны все элементы i - й строки матрицы A, массив X содержит полную i - ю строку матрицы C. Поясним этот алгоритм на примере умножения матриц второго порядка:
| a11 a12 | | b11 b12 | | c11 c12 | | a21 a22 | | b21 b22 | = | c21 c22 |
По определению имеем:
c11 = a11 b11 + a12 b21 c12 = a11 b12 + a12 b22 c21 = a21 b11 + a22 b21 c22 = a21 b12 + a22 b22
Изменим порядок вычислений попарных произведений следующим образом:
x1 = a11 b11 x2 = a11 b12 x1 = x1 + a12 b21 x2 = x2 + a12 b22 c11 = x1 c12 = x2 x1 = a21 b11 x2 = a21 b12 x1 = x1 + a22 b21 x2 = x2 + a22 b22 c21 = x1 c22 = x2
Отметим, что в описанном алгоритме каждый элемент матрицы A последовательно умножается на все элементы каждой строки матрицы B, которые легко доступны, поскольку матрица B задана в строчном формате.
Естественно разбить алгоритм на два этапа - символический и численный.
Результирующая матрица C получается в неупорядоченном формате RR (C) U, даже если представления матриц A и B были упорядочены. Чтобы упорядочить представление матриц, можно дважды применить алгоритм численного транспонирования (подпрограмма AMTSR ). Можно также упорядочить только портрет матрицы C двойным применением алгоритма символического транспонирования (подпрограмма AMTCR ), а затем уже применить алгоритм численного умножения. Так как при численном умножении формат представления матрицы C не меняется, то конечный результат будет упорядоченным.
Число операций умножения в данном алгоритме определяется формулой
q n (AB) = ∑ n ( ai ) n ( bi ) , i =1
где n ( ai ) и n ( bi ) - количество ненулевых элементов в i - х строках матриц A и B соответственно. Число сложений будет примерно таким же, если засчитывать сложения с нулями
С.Писсанецки. Технология разреженных матриц. - М.: Мир, 1988
SUBROUTINE AMMIR ( IA, JA, IB, JB, NP, NQ, NR, IC, JC, IX)
Параметры
IA, JA - | заданный портрет матрицы A в формате RR (C) U; |
IB, JB - | заданный портрет матрицы B в формате RR (C) U; |
NP - | заданное число строк матрицы A (тип: целый); |
NQ - | заданное число столбцов матрицы A и строк матрицы B (тип: целый). |
NR - | заданное число столбцов матрицы B (тип: целый). |
IC, JC - | полученный портрет результирующей матрицы C = A * B в формате RR (C) U; |
IX - | целый одномерный массив длины NR, используемый в подпрограмме в качестве рабочего |
Версии: нет
Вызываемые подпрограммы нет
Замечания по использованию нет
DIMENSION IA(5), JA(6), IB(6), JB(6), IC(5), JC(4), IX(3) DATA IA /1, 4, 4, 6, 7/, * JA /1, 5, 4, 4, 2, 1/, * IB /1, 2, 4, 6, 6, 7/, * JB /2, 2, 1, 2, 1, 2/ NP = 4 NQ = 5 NR = 3 CALL AMMIR (IA, JA, IB, JB, NP, NQ, NR, IC, JC, IX) Результаты: IC = ( 1, 2, 2, 4, 5 ) JC = ( 2, 2, 1, 2 )