Студопедия Главная Случайная страница Обратная связь

Разделы: Автомобили Астрономия Биология География Дом и сад Другие языки Другое Информатика История Культура Литература Логика Математика Медицина Металлургия Механика Образование Охрана труда Педагогика Политика Право Психология Религия Риторика Социология Спорт Строительство Технология Туризм Физика Философия Финансы Химия Черчение Экология Экономика Электроника

Листинг 7. Перемножение матриц с применением неровных массивов





 

using System;

using System. Diagnostics;

using PerfCounter;

 

namespace BenchJaggedMatrix

{

/// <summary>

/// Перемножение матриц с использованием неровных массивов

/// </summary>

class MatrixMul

{

 

[ STAThread ]

static void Main ( string [] args )

{

int i, n;

 

// Объявляем неровные матрицы

double [][] MatrixA, MatrixB, MatrixC;

Random r = new Random ( 50 );

n = 1000;

 

MatrixA = new double [ n ][];

MatrixB = new double [ n ][];

MatrixC = new double [ n ][];

 

/* Создаем экземпляры массивов и инициализируем их */

for ( i = 0; i <;MatrixA. Length; i ++) {

MatrixA [ i ] = new double [ n ];

MatrixB [ i ] = new double [ n ];

MatrixC [ i ] = new double [ n ];

for ( int j = 0; j <;MatrixA [ i ]. Length; j ++) {

MatrixA [ i ][ j ]=( double ) r. Next ( 50 );

MatrixB [ i ][ j ]=( double ) r. Next ( 50 );

}

}

Counter counter = new Counter ();

 

/* Вызов и замер времени выполнения Matdot */

Console. WriteLine ( "Starting counter..." );

counter. Reset ();

counter. Start ();

Matdot ( MatrixA, MatrixB, MatrixC ); // вызов MatDot

counter. Stop ();

 

Console. WriteLine ( "Time taken: {0}", counter );

Console. WriteLine ( "Obtained {0:F2} MFlops",

counter. MFlops ( 2 * n * n * n ));

Console. ReadLine ();

}

 

public static void Matdot ( double [][] a, double [][] b,

double [][] c )

{

int i,j,k;

double tmp;

 

for ( i = 0; i <;a. Length; i ++)

{

for ( j = 0; j <;c [ i ]. Length; j ++)

{

tmp = c [ i ][ j ];

for ( k = 0; k <;b [ i ]. Length; k ++)

{

tmp += a [ i ][ k ]* b [ k ][ j ];

}

c [ i ][ j ]= tmp;

}

}

}

}

}

 

Листинг 8. Перемножение матриц с применением прямоугольных массивов

using System;

using System. Diagnostics;

using PerfCounter;

 

namespace BenchRectMatrix

{

/// <summary>

/// Перемножение матриц с использованием прямоугольных массивов

/// </summary>

class MatrixMul

{

 

[ STAThread ]

static void Main ( string [] args )

{

int i, n;

 

// Объявляем прямоугольные матрицы

double [,] MatrixA, MatrixB, MatrixC;

Random r = new Random ( 50 );

n = 1000;

 

MatrixA = new double [ n,n ];

MatrixB = new double [ n,n ];

MatrixC = new double [ n,n ];

 

/* Инициализируем случайными значениями */

for ( i = 0; i <;n; i ++)

{

for ( int j = 0; j <;n; j ++)

{

MatrixA [ i,j ]=( double ) r. Next ( 50 );

MatrixB [ i,j ]=( double ) r. Next ( 50 );

}

}

 

Counter counter = new Counter ();

 

/* Вызов и замер времени выполнения Matdot */

Console. WriteLine ( "Starting counter..." );

counter. Reset ();

counter. Start ();

Matdot ( n, MatrixA, MatrixB, MatrixC ); // вызов MatDot

counter. Stop ();

 

Console. WriteLine ( "Time taken: {0}", counter );

Console. WriteLine ( "Obtained {0:F2} MFlops",

counter. MFlops ( 2 * n * n * n ));

Console. ReadLine ();

}

 

public static void Matdot ( int n, double [,] a, double

[,] b, double [,] c )

{

int i,j,k;

double tmp;

 

for ( i = 0; i <;n; i ++)

{

for ( j = 0; j <;n; j ++)

{

tmp = c [ i,j ];

for ( k = 0; k <;n; k ++)

{

tmp += a [ i,k ] * b [ k,j ];

}

c [ i,j ]= tmp;

}

}

}

}

}

 

 

Выполнение этих двух программ на моей тестовой машине дало результаты, показанные на рис. 3. Результаты могут быть еще лучше, если преобразовать многомерные массивы в одномерные. Если вас не заботит синтаксис, это тривиально: просто используйте один индекс как смещение. Например, ниже объявляется одномерный массив для использования вместо двухмерного:

 

Листинг 9.

 

double [] myArray = new double [ ROW_DIM * COLUMN_DIM ];

 

Рис. 3. Неровные массивы против прямоугольных

 

Для индексации элементов в таком массиве указывайте следующее смещение:

 







Дата добавления: 2015-08-29; просмотров: 437. Нарушение авторских прав; Мы поможем в написании вашей работы!




Картограммы и картодиаграммы Картограммы и картодиаграммы применяются для изображения географической характеристики изучаемых явлений...


Практические расчеты на срез и смятие При изучении темы обратите внимание на основные расчетные предпосылки и условности расчета...


Функция спроса населения на данный товар Функция спроса населения на данный товар: Qd=7-Р. Функция предложения: Qs= -5+2Р,где...


Аальтернативная стоимость. Кривая производственных возможностей В экономике Буридании есть 100 ед. труда с производительностью 4 м ткани или 2 кг мяса...

КОНСТРУКЦИЯ КОЛЕСНОЙ ПАРЫ ВАГОНА Тип колёсной пары определяется типом оси и диаметром колес. Согласно ГОСТ 4835-2006* устанавливаются типы колесных пар для грузовых вагонов с осями РУ1Ш и РВ2Ш и колесами диаметром по кругу катания 957 мм. Номинальный диаметр колеса – 950 мм...

Философские школы эпохи эллинизма (неоплатонизм, эпикуреизм, стоицизм, скептицизм). Эпоха эллинизма со времени походов Александра Македонского, в результате которых была образована гигантская империя от Индии на востоке до Греции и Македонии на западе...

Демографияда "Демографиялық жарылыс" дегеніміз не? Демография (грекше демос — халық) — халықтың құрылымын...

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

Примеры задач для самостоятельного решения. 1.Спрос и предложение на обеды в студенческой столовой описываются уравнениями: QD = 2400 – 100P; QS = 1000 + 250P   1.Спрос и предложение на обеды в студенческой столовой описываются уравнениями: QD = 2400 – 100P; QS = 1000 + 250P...

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

Studopedia.info - Студопедия - 2014-2025 год . (0.01 сек.) русская версия | украинская версия