Документ взят из кэша поисковой машины. Адрес
оригинального документа
: http://num-anal.srcc.msu.ru/lib_na/cat/am/amtcr.htm
Дата изменения: Fri Jun 20 11:38:18 2014 Дата индексирования: Sun Apr 10 01:00:28 2016 Кодировка: Windows-1251 |
Текст подпрограммы и версий ( Фортран ) amtcr.zip |
Тексты тестовых примеров ( Фортран ) tamtcr.zip |
Текст подпрограммы и версий ( Си ) amtcr_c.zip |
Тексты тестовых примеров ( Си ) tamtcr_c.zip |
Текст подпрограммы и версий ( Паскаль ) amtcr_p.zip |
Тексты тестовых примеров ( Паскаль ) tamtcr_p.zip |
Символическое транспонирование прямоугольной разреженной матрицы, заданной в формате RR (C) U
Описание форматов RR (C) U и RR (C) O приведены в описании подпрограммы AMTSR .
Данная подпрограмма по портрету исходной матрицы A вычисляет портрет транспонированной матрицы AT и представляет его в формате RR (C) O.
С.Писсанецки. Технология разреженных матриц. - М.: Мир, 1988
SUBROUTINE AMTCR (IA, JA, N, M, IAT, JAT)
Параметры
IA, JA - | заданный портрет транспонируемой прямоугольной матрицы A в формате RR (C) U; |
N - | заданное число строк транспонируемой матрицы A (тип: целый); |
M - | заданное число столбцов транспонируемой матрицы A (тип: целый); |
IAT - JAT | вычисленный портрет транспонированной матрицы A в формате RR (C) O |
Версии: нет
Вызываемые подпрограммы: нет
Замечания по использованию: нет
INTEGER IA(6), JA(13), IAT(7), JAT(13) DATA IA /1, 4, 6, 8, 11, 14/, * JA /5, 6, 3, 4, 1, 3, 4, 4, 3, 1, 2, 6, 5/ N = 5 M = 6 CALL AMTCR (IA, JA, N, M, IAT, JAT) Результаты: IAT = (1, 3, 4, 7, 10, 12, 14) JAT = (2, 4, 5, 1, 3, 4, 2, 3, 4, 1, 5, 1, 5)