- #36
jelanier
- 67
- 1
I have written some code that shows gains of OpenMP. This code shows gains and verifies output by comparison. Using my old laptop (2 core i5) I get at best 3X resolution. Probably better on more modern machines. I have attached code and msys2 compile shell.
http://www.chemroc.com/MISC/OpenMP/MP_Test.f
http://www.chemroc.com/MISC/OpenMP/MP_Test.sh
*************************************************************
This is output using my laptop:
***********************************************************
C:\OpenMP\Test Timing - random>set OMP_NUM_THREADS=1
C:\OpenMP\Test Timing - random>MP_Test
MP time 2.125 seconds
xM( 540) 0.480
xM( 540) 1.127
NO MP time 2.062 seconds
x( 540) 0.480
x( 540) 1.127
Percentage Time 103.030%
C:\OpenMP\Test Timing - random>set OMP_NUM_THREADS=2
C:\OpenMP\Test Timing - random>MP_Test
MP time 1.219 seconds
xM( 109) 0.821
xM( 109) 1.469
NO MP time 2.062 seconds
x( 109) 0.821
x( 109) 1.469
Percentage Time 59.091%
C:\OpenMP\Test Timing - random>set OMP_NUM_THREADS=4
C:\OpenMP\Test Timing - random>MP_Test
MP time 0.750 seconds
xM( 869) 0.151
xM( 869) 0.696
NO MP time 2.094 seconds
x( 869) 0.151
x( 869) 0.696
Percentage Time 35.821%
C:\OpenMP\Test Timing - random>set OMP_NUM_THREADS=8
C:\OpenMP\Test Timing - random>MP_Test
MP time 0.750 seconds
xM( 384) 0.952
xM( 384) 1.669
NO MP time 2.094 seconds
x( 384) 0.952
x( 384) 1.669
Percentage Time 35.821%
C:\OpenMP\Test Timing - random>set OMP_NUM_THREADS=16
C:\OpenMP\Test Timing - random>MP_Test
MP time 0.750 seconds
xM( 186) 0.869
xM( 186) 1.551
NO MP time 2.031 seconds
x( 186) 0.869
x( 186) 1.551
Percentage Time 36.923%
*******************************************************
Later,
Jim
http://www.chemroc.com/MISC/OpenMP/MP_Test.f
http://www.chemroc.com/MISC/OpenMP/MP_Test.sh
*************************************************************
This is output using my laptop:
***********************************************************
C:\OpenMP\Test Timing - random>set OMP_NUM_THREADS=1
C:\OpenMP\Test Timing - random>MP_Test
MP time 2.125 seconds
xM( 540) 0.480
xM( 540) 1.127
NO MP time 2.062 seconds
x( 540) 0.480
x( 540) 1.127
Percentage Time 103.030%
C:\OpenMP\Test Timing - random>set OMP_NUM_THREADS=2
C:\OpenMP\Test Timing - random>MP_Test
MP time 1.219 seconds
xM( 109) 0.821
xM( 109) 1.469
NO MP time 2.062 seconds
x( 109) 0.821
x( 109) 1.469
Percentage Time 59.091%
C:\OpenMP\Test Timing - random>set OMP_NUM_THREADS=4
C:\OpenMP\Test Timing - random>MP_Test
MP time 0.750 seconds
xM( 869) 0.151
xM( 869) 0.696
NO MP time 2.094 seconds
x( 869) 0.151
x( 869) 0.696
Percentage Time 35.821%
C:\OpenMP\Test Timing - random>set OMP_NUM_THREADS=8
C:\OpenMP\Test Timing - random>MP_Test
MP time 0.750 seconds
xM( 384) 0.952
xM( 384) 1.669
NO MP time 2.094 seconds
x( 384) 0.952
x( 384) 1.669
Percentage Time 35.821%
C:\OpenMP\Test Timing - random>set OMP_NUM_THREADS=16
C:\OpenMP\Test Timing - random>MP_Test
MP time 0.750 seconds
xM( 186) 0.869
xM( 186) 1.551
NO MP time 2.031 seconds
x( 186) 0.869
x( 186) 1.551
Percentage Time 36.923%
*******************************************************
Later,
Jim