Подпрограмма:  PAR_TRSV

Назначение

Выбор пaраметров распараллеливания для целевых программ комплекса PARALG, решающих системы линейных алгебраических уравнений на распределенной памяти с трехдиагональными матрицами

Описание

Эта служебная подпрограмма выбирает и вычисляет за пользователя параметры распараллеливания, которые конкретизируют распределение вычислений между параллельными процессами и значения которых необходимо передавать целевым программам решения систем линейных алгебраических уравнений с трехдиагональными матрицами

Литература:

http://num_anal.srcc.msu.ru/par_prog/
http://software.intel.com/en-us/articles/intel-math-kernel-library-documentation/
http://www.netlib.org/scalapack/slug/index.html

Использование 

         CALL  PAR_TRSV(NAME, N, NPROCS, MMIN, NB)

   Параметры
NAME - имя целевой подпрограммы, с помощью которой пользователь собирается решать свою задачу (одно из PDDTSV, PDPTSV); (входной параметр, тип символьный);
N - порядок исходной матрицы системы (входной параметр, тип целый);
NPROCS - число процессов, которое может выделить пользователь для решения задачи (входной параметр, тип целый);
MMIN - минимальное количество локальной памяти, которое необходимо выделить на каждом из параллельных процессов для решения задачи (выходной параметр, тип целый);
NB - величина блока, на которые делится исходная матрица системы; NB полагается равным 0, если пользователь доверяет выбор его значения этой подпрограмме (входной и выходной параметр, тип целый); 
   Вызываемые подпрограммы: нет 
   Замечания по использованию
  1.  Подпрограмма является последовательной фортранной программой и не использует распределенную память (требуется только один процессор)

Пример использования

Необходимо выбрать размер блока NB, число строк и столбцов решетки процессов (NPROW,NPCOL) и вычислить размер локальной памяти, необходимой для решения системы уравнений с помощью подпрограммы PDDTSV.
Матрица системы - квадратная порядка 9.
Выделяемое число процессов NPROCS = 3. NB = 0.

Фрагмент фортранного текста вызывающей программы
(полный текст теста можно получить в tpr_trsv.zip) 

      PROGRAM TPR_TRSV
*
      INTEGER            N, NPROCS, MMIN, NB, NPROW, NPCOL
      CHARACTER*(*)      NAME
      PARAMETER          ( NAME = 'PDDTSV')
      EXTERNAL PAR_TRSV
*
      N = 9
      NPROCS = 3
      NB=0
*
      CALL PAR_TRSV(NAME, N, NPROCS, MMIN, NB)
      STOP
      END

Результаты:

      NB = 3
      NPROW = 1
      NPCOL = 3
      MMIN = 95