Форум программистов, компьютерный форум CyberForum.ru

Параллельная программа для метода холецкого с помощью openMp и mpi - C++

Войти
Регистрация
Восстановить пароль
Другие темы раздела
C++ Файл, структура, бинарное дерево http://www.cyberforum.ru/cpp/thread36023.html
Доброго времени суток!!! Помогите решить задачку, у самой не получается=(( Написать программу, которая содержит динамическую информацию о нарушении правил дорожного движения. (на один автомобиль база может содержать записи о нескольких нарушениях). Сведения о каждом автомобиле включает в себя: -номер автомобиля (3-х значный); -фамилию владельца; -список нарушений; -размер штрафа за каждое...
C++ Написать 2 класса Кто может, помогите с задачами: 1. Разработать класс объектов типа "строки, которые способны отображать себя в заданном месте экрана заданным шрифтом и цветом", используя перегруженность и наследование. 2. Описать абстрактный класс объектов, для которых определены операции &&, ||, ~. Операцию ~ определить полностью для случая, когда объекты имеют тип signed char. А то я сам в написании... http://www.cyberforum.ru/cpp/thread35974.html
C++ Работа с файлами
Создать файл, содержащий сведения о результатах охоты. Данные должны быть представлены в виде следующей структуры: -фамилия охотника; -количество убитых животных; -общая масса всех животных. Написать программу, которая вызначает самого результативнишого охотника-за количеством животных и по весу животных. Каждую из функций разместить в отдельном заголовочном файле.
C++ Вычислить сумму отрицательных элементов одномерного массива
Ребят помогите, погибаю! Создать функцию, параметром которой является одномерный массив. Тело функции реалиховать двумя способами: через обращение к элементам массива через указатели и обычным способом. Продемонстрировать возможность применения созданной функции к строкам двумерного массива. Создать функцию, вычисляющую сумму отрицательных эл-ов одномерного массива в случае, если их более...
C++ Написать списки смежностей для неориентированного графа http://www.cyberforum.ru/cpp/thread35928.html
помогите пожалста написать списки смежностей для неориентированного графа (на си) !!
C++ Сортировки массива целых чисел Необходимо написать программы сортировок массива(с подсчетом количества сранений и обменов): 1.Вставка 2.Пузырек 3.Шелла 4.Быстрая 5.Включения и т.д. Очень нужно)))Реализация на С.Только если можно с коментами плиз.Может у кого уже есть)) подробнее

Показать сообщение отдельно
Кирилл7785
Сообщений: n/a
11.03.2011, 22:29     Параллельная программа для метода холецкого с помощью openMp и mpi
рискну предложить следующий кусок кода:
C
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
/*  Решает систему уравнений для квадратной
 *  симметричной положительно определённой
 *  (с диагональным преобладанием) матрицы
 *  коэффициентов А:
 *        A*x=b;
 *  где A размеров nodesxnodes. Матрица А
 *  предполагается не разреженной. Нумерация 
 *  элементов везде начинается с нуля.
 *  Процедура представляет собой разложение Холесского:
 *        A=L*transpose(L),
 *  после которого выполняются прямое исключение и 
 *  обратная подстановка. A и b не сохраняются. 
*/
void eqsolv_simple_holesskii(Real **A, int nodes, Real *b, Real *x) {
    // Разложение Холесского: замена A верхним и нижним 
    // треугольными множителями.
    A[0][0]=sqrt(A[0][0]);
    A[1][0]/=A[0][0];
    A[0][1]=A[1][0];
    A[1][1]=sqrt(A[1][1]-A[1][0]*A[1][0]);
 
    int irow,irow1;
    int icol, icol1;
    Real sum;
    int k;
    for (irow=2; irow<nodes; irow++) {
        irow1=irow-1;
        A[irow][0]/=A[0][0];
        A[0][irow]=A[irow][0];
        #pragma omp parallel for shared(irow1,A) private(icol, icol1, sum, k)
        for (icol=1; icol<=irow1; icol++) {
            icol1=icol-1;
            sum=0.0;   
            for (k=0; k<=icol1; k++) sum+=A[irow][k]*A[icol][k];
            A[irow][icol]=(A[irow][icol]-sum)/A[icol][icol];
            A[icol][irow]=A[irow][icol];
        }
        sum=0.0;
        #pragma omp parallel for shared(A,irow,irow1) private(k) reduction (+: sum)
        for (k=0; k<=irow1; k++) sum+=A[irow][k]*A[irow][k];
        A[irow][irow]=sqrt(A[irow][irow]-sum);
    }
    
    // Прямое исключение. Происходит разрушение правой части
    b[0]/=A[0][0];
 
    for (irow=1; irow<nodes; irow++) {
        irow1=irow-1;
        sum=0.0;
        #pragma omp parallel for shared(A,b,irow,irow1) private(icol) reduction (+: sum)
        for (icol=0; icol<=irow1; icol++) sum+=A[irow][icol]*b[icol];
        b[irow]=(b[irow]-sum)/A[irow][irow];
    }
 
    // Обратная подстановка используется верхний треугольный множитель
    x[nodes-1]=b[nodes-1]/A[nodes-1][nodes-1];
    for (k=1; k<=nodes; k++) {
        irow=nodes+1-k-1;
        irow1=irow+1;
        sum=0.0;
        #pragma omp parallel for shared(A,x,irow,irow1,nodes) private(icol) reduction (+: sum)
        for (icol=irow1; icol<nodes; icol++) sum+=A[irow][icol]*x[icol];
        x[irow]=(b[irow]-sum)/A[irow][irow];
    }
 
} // eqsolv_simple_holesskii
Вот результаты решения СЛАУ размером 2274x2274 которая возникла из метода конечных элементов:
(используемый компилятор Visual Studio 2008, проц U7300 два ядра 1.3 ГГц каждый)
Режим компиляции Debug Release
Serial 25c 6c
Parallel 22c 7c
для подключения OpenMP надо сделать следующее Project-> имя проекта->Properties
выбрать All Configurations далее Configuration Properties->C/C++->Language включить OpenMP YES

Как видно из теста распараллеливание не ускоряет вычисления. Вопрос у всех ли так ? И если да то как Вы думаете почему?

Добавлено через 14 минут
кстати решение в параллельной версии тоже немного (чуть чуть) другое получается если сравнивать его с серийной версией. Может ли такое быть и в чём причина ?
 
Текущее время: 13:16. Часовой пояс GMT +3.
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2017, vBulletin Solutions, Inc.
Рейтинг@Mail.ru