1addpath(pathname) 2 3output_st_ssyrk_asm_blis 4output_st_dsyrk_asm_blis 5output_st_csyrk_1m_blis 6output_st_zsyrk_1m_blis 7 8output_st_ssyrk_openblas 9output_st_dsyrk_openblas 10output_st_csyrk_openblas 11output_st_zsyrk_openblas 12 13 14plot_lower = 0; 15 16 17% SSYRK Single threaded 18 19axes1 = subplot(4, 4, 2); 20hold(axes1,'on'); 21plot(data_st_ssyrk_asm_blis(:,1), data_st_ssyrk_asm_blis(:,3), 'LineWidth', 1.25,'Color', [0 0 1]); 22plot(data_st_ssyrk_openblas(:,1), data_st_ssyrk_openblas(:,3), 'LineWidth', 1.25,'Color', [0 1 0]); 23ylabel( 'GFLOPS', 'FontSize', fontsize, 'FontWeight', 'bold', 'FontName', 'Helvetica Neue'); 24%xlabel( 'matrix dimension m=n=k', 'FontSize', fontsize, 'FontWeight', 'bold', 'FontName', 'Helvetica Neue' ); 25title('SSYRK (single-threaded)','FontSize', fontsize, 'FontWeight', 'bold', 'FontName', 'Helvetica Neue'); 26box(axes1,'on'); 27set(axes1,'FontSize', fontsize, 'FontWeight', 'bold', 'FontName', 'Helvetica Neue'); 28v = axis; % extract the current ranges 29axis( [ 0 v(2) 0 speak ] ) 30 31% DSYRK single threaded 32 33axes1 = subplot(4, 4, 6); 34hold(axes1,'on'); 35plot(data_st_dsyrk_asm_blis(:,1), data_st_dsyrk_asm_blis(:,3), 'LineWidth', 1.25,'Color', [0 0 1]); 36plot(data_st_dsyrk_openblas(:,1), data_st_dsyrk_openblas(:,3), 'LineWidth', 1.25,'Color', [0 1 0]); 37ylabel( 'GFLOPS', 'FontSize', fontsize, 'FontWeight', 'bold', 'FontName', 'Helvetica Neue'); 38%xlabel( 'matrix dimension m=n=k', 'FontSize', fontsize, 'FontWeight', 'bold', 'FontName', 'Helvetica Neue' ); 39title('DSYRK (single-threaded)','FontSize', fontsize, 'FontWeight', 'bold', 'FontName', 'Helvetica Neue'); 40box(axes1,'on'); 41set(axes1,'FontSize', fontsize, 'FontWeight', 'bold', 'FontName', 'Helvetica Neue'); 42%legend({'BLIS', 'OpenBLAS', 'ARMPL'},'FontSize', fontsize, 'FontWeight', 'bold', 'FontName', 'Helvetica Neue', 'Location', 'best'); 43 44v = axis; % extract the current ranges 45axis( [ 0 v(2) 0 dpeak ] ) 46 47% CSYRK single threaded 48 49axes1 = subplot(4, 4, 10); 50hold(axes1,'on'); 51plot(data_st_csyrk_1m_blis(:,1), data_st_csyrk_1m_blis(:,3), 'LineWidth', 1.25,'Color', [0 0 1]); 52plot(data_st_csyrk_openblas(:,1), data_st_csyrk_openblas(:,3), 'LineWidth', 1.25,'Color', [0 1 0]); 53ylabel( 'GFLOPS', 'FontSize', fontsize, 'FontWeight', 'bold', 'FontName', 'Helvetica Neue'); 54%xlabel( 'matrix dimension m=n=k', 'FontSize', fontsize, 'FontWeight', 'bold', 'FontName', 'Helvetica Neue' ); 55title('CSYRK (single-threaded)','FontSize', fontsize, 'FontWeight', 'bold', 'FontName', 'Helvetica Neue'); 56box(axes1,'on'); 57set(axes1,'FontSize', fontsize, 'FontWeight', 'bold', 'FontName', 'Helvetica Neue'); 58v = axis; % extract the current ranges 59axis( [ 0 v(2) 0 speak ] ) 60 61% ZSYRK single threaded 62 63axes1 = subplot(4, 4, 14); 64hold(axes1,'on'); 65plot(data_st_zsyrk_1m_blis(:,1), data_st_zsyrk_1m_blis(:,3), 'LineWidth', 1.25,'Color', [0 0 1]); 66plot(data_st_zsyrk_openblas(:,1), data_st_zsyrk_openblas(:,3), 'LineWidth', 1.25,'Color', [0 1 0]); 67ylabel( 'GFLOPS', 'FontSize', fontsize, 'FontWeight', 'bold', 'FontName', 'Helvetica Neue'); 68xlabel( 'matrix dimension m=n=k', 'FontSize', fontsize, 'FontWeight', 'bold', 'FontName', 'Helvetica Neue' ); 69title('ZSYRK (single-threaded)','FontSize', fontsize, 'FontWeight', 'bold', 'FontName', 'Helvetica Neue'); 70box(axes1,'on'); 71set(axes1,'FontSize', fontsize, 'FontWeight', 'bold', 'FontName', 'Helvetica Neue'); 72% legend({'BLIS', 'BLIS (AVX2)','OpenBLAS', 'MKL'},'FontSize', fontsize, 'FontWeight', 'bold', 'FontName', 'Helvetica Neue', 'Location', 'South'); 73 74v = axis; % extract the current ranges 75axis( [ 0 v(2) 0 dpeak ] ) 76 77clear *syrk* 78rmpath(pathname) 79 80addpath(pathname_armpl) 81 82output_st_ssyrk_armpl 83output_st_dsyrk_armpl 84output_st_csyrk_armpl 85output_st_zsyrk_armpl 86 87% Ssyrk Single threaded 88 89subplot(4, 4, 2); 90plot(data_st_ssyrk_armpl(:,1), data_st_ssyrk_armpl(:,3), '--', 'LineWidth', 1.25,'Color', [1 0 1]); 91 92subplot(4, 4, 6); 93plot(data_st_dsyrk_armpl(:,1), data_st_dsyrk_armpl(:,3), '--', 'LineWidth', 1.25,'Color', [1 0 1]); 94 95subplot(4, 4, 10); 96plot(data_st_csyrk_armpl(:,1), data_st_csyrk_armpl(:,3), '--', 'LineWidth', 1.25,'Color', [1 0 1]); 97 98subplot(4, 4, 14); 99plot(data_st_zsyrk_armpl(:,1), data_st_zsyrk_armpl(:,3), '--', 'LineWidth', 1.25,'Color', [1 0 1]); 100 101clear *syrk* 102rmpath(pathname_armpl) 103 104