PCDVD數位科技討論區
PCDVD數位科技討論區   註冊 常見問題 標記討論區為已讀

回到   PCDVD數位科技討論區 > 電腦硬體討論群組 > 系統組件
帳戶
密碼
 

  回應
 
主題工具
hollowaysxp
Senior Member
 
hollowaysxp的大頭照
 

加入日期: Oct 2005
您的住址: 桃園-TW
文章: 1,446
引用:
作者fusopada
for(i=1;i<=10000;<i++)
STRASSEN(N,A,B,C);

for loop "<i++)" C complier 是可以過關
但是link LIB 可能會有不可預期結果之執行碼產生



程式碼是到PCDVD再打的片段程式
不是...程式複製過來的...所以有錯誤@@

矩陣32 x 32
N=32那邊能用的數值為2的x次方。
如 2 4 8 16 32 64 128
程式碼
代碼:
#include <iostream>
#include <time.h>
//#include <math.h>
#include <stdlib.h>
using namespace std;

const int N=32; //常量N用�S定�矩u的大小

void main()
{
	

	
	

	int i=0;
	int start_time;
	int end_time;
	int result;

    void STRASSEN(int n,int A[][N],int B[][N],int C[][N]); 
    void input(int n,int p[][N]);
    void output(int n,int C[][N]);//函䓡䟕明部分

    int A[N][N],B[N][N],C[N][N];  //定�三:矩uA,B,C

    cout<<"InputA[N][N]:"<<endl<<endl;
    input(N,A);
    cout<<endl<<"Input B[N][N]:"<<endl<<endl;
    input(N,B);
	
	start_time = time(0);
	
	for(i=1;i<=100;i++)
		STRASSEN(N,A,B,C);

	

    output(N,C);  //经出+算�C果

	end_time = time(0);
	result = end_time - start_time;
		
	cout << endl << endl;
	cout << result << "秒" << endl;

	cout << start_time << endl;
	cout << end_time << endl << endl << endl;

	
//	for(i=1;i<=10;i++)
		//cout << (rand() %6 )+1<< endl;
}


void input(int n,int p[][N])  //矩u经入函䓡
{
    int i,j;

    for(i=0;i<n;i++)
    {
        cout<<"請輸入第"<<i+1<<"行"<<endl;
        for(j=0;j<n;j++)
            (rand() % 6)+1 >>p[i][j];
    }
}

void output(int n,int C[][N]) //据矩u经出函䓡
{
    int i,j;
    cout<<"出矩u:"<<endl;
    for(i=0;i<n;i++)
    {
        cout<<endl;
        for(j=0;j<n;j++)
            cout<<C[i][j]<<"  ";
    }
    cout<<endl<<endl;

}

void MATRIX_MULTIPLY(int A[][N],int B[][N],int C[][N])  //按通常的矩u乘法+算C=AB的子算法(�做2�)
{
    int i,j,t;
    for(i=0;i<2;i++)                     //+算A*B-->C
        for(j=0;j<2;j++)
        {    
            C[i][j]=0;                   //+算完一:C[i][j],C[i][j]倃重新à值!零
            for(t=0;t<2;t++)
            C[i][j]=C[i][j]+A[i][t]*B[t][j];
        }
}

void MATRIX_ADD(int n,int X[][N],int Y[][N],int Z[][N]) //矩u加法函䓡X+Y—>Z
{
    int i,j;
    for(i=0;i<n;i++)
        for(j=0;j<n;j++)
            Z[i][j]=X[i][j]+Y[i][j];
}

void MATRIX_SUB(int n,int X[][N],int Y[][N],int Z[][N]) //矩u濶法函䓡X-Y—>Z
{
    int i,j;
    for(i=0;i<n;i++)
        for(j=0;j<n;j++)
            Z[i][j]=X[i][j]-Y[i][j];

}


void STRASSEN(int n,int A[][N],int B[][N],int C[][N])  //STRASSEN函䓡(𣽡㦒)
{
    int A11[N][N],A12[N][N],A21[N][N],A22[N][N];
    int B11[N][N],B12[N][N],B21[N][N],B22[N][N];
    int C11[N][N],C12[N][N],C21[N][N],C22[N][N];
    int M1[N][N],M2[N][N],M3[N][N],M4[N][N],M5[N][N],M6[N][N],M7[N][N];
    int AA[N][N],BB[N][N],MM1[N][N],MM2[N][N];

    int i,j;//,x;


    if (n==2)
        MATRIX_MULTIPLY(A,B,C);//按通常的矩u乘法+算C=AB的子算法(�做2�)
    else
    {
        for(i=0;i<n/2;i++)                         //////////
            for(j=0;j<n/2;j++)

                {
                    A11[i][j]=A[i][j];
                    A12[i][j]=A[i][j+n/2];
                    A21[i][j]=A[i+n/2][j];
                    A22[i][j]=A[i+n/2][j+n/2];
                    B11[i][j]=B[i][j];
                    B12[i][j]=B[i][j+n/2];
                    B21[i][j]=B[i+n/2][j];
                    B22[i][j]=B[i+n/2][j+n/2];
                }                                   //圝矩uA和B式分!四�




    MATRIX_SUB(n/2,B12,B22,BB);                        //////////
    STRASSEN(n/2,A11,BB,M1);//M1=A11(B12-B22)

    MATRIX_ADD(n/2,A11,A12,AA);
    STRASSEN(n/2,AA,B22,M2);//M2=(A11+A12)B22

    MATRIX_ADD(n/2,A21,A22,AA);
    STRASSEN(n/2,AA,B11,M3);//M3=(A21+A22)B11

    MATRIX_SUB(n/2,B21,B11,BB);
    STRASSEN(n/2,A22,BB,M4);//M4=A22(B21-B11)

    MATRIX_ADD(n/2,A11,A22,AA);
    MATRIX_ADD(n/2,B11,B22,BB);
    STRASSEN(n/2,AA,BB,M5);//M5=(A11+A22)(B11+B22)

    MATRIX_SUB(n/2,A12,A22,AA);
    MATRIX_SUB(n/2,B21,B22,BB);
    STRASSEN(n/2,AA,BB,M6);//M6=(A12-A22)(B21+B22)

    MATRIX_SUB(n/2,A11,A21,AA);
    MATRIX_SUB(n/2,B11,B12,BB);
    STRASSEN(n/2,AA,BB,M7);//M7=(A11-A21)(B11+B12)
                                                    //+算M1,M2,M3,M4,M5,M6,M7(𣽡㦒部分)


    MATRIX_ADD(N/2,M5,M4,MM1);                        ////////////
    MATRIX_SUB(N/2,M2,M6,MM2);
    MATRIX_SUB(N/2,MM1,MM2,C11);//C11=M5+M4-M2+M6

    MATRIX_ADD(N/2,M1,M2,C12);//C12=M1+M2

    MATRIX_ADD(N/2,M3,M4,C21);//C21=M3+M4

    MATRIX_ADD(N/2,M5,M1,MM1);
    MATRIX_ADD(N/2,M3,M7,MM2);
    MATRIX_SUB(N/2,MM1,MM2,C22);//C22=M5+M1-M3-M7

    for(i=0;i<n/2;i++)
        for(j=0;j<n/2;j++)
        {
            C[i][j]=C11[i][j];
            C[i][j+n/2]=C12[i][j];
            C[i+n/2][j]=C21[i][j];
            C[i+n/2][j+n/2]=C22[i][j];
        }                                            //+算�C果送回C[N][N]

    }

}
     
      
__________________
My Computer [2003.09]-已送人

CPU:Intel Pentium4 2.6CG
M/B:MSI 865PE Neo 2-LS
RAM:Transcend DDR400 512MB x 2 (Dual) (Samsung UCCC)
Display Card:GeCube ATI X1300XT 256MB
HDD:Maxtor 160GB
DVD:Pioneer A09XL
Power:SevenTeam (350W)
keyboard:Logitech 飆風手 精華版



-----------------------------------
My Computer [2009.06]

[COLOR=Yellow]CPU:Intel Core 2 Duo E8200 +Thermalright Ultra-120A
M/B:ASUS P5Q
RAM:ADATA DDRII 800 2GB x 2 (海力士) + Transcend DDRII 800 2GBx2
Display Card:SAPPHIRE HD 4830 GDDR3 512MB
HDD:WD 160GB JB IDE + WD 200GB + WD 250GB AAKS SATAII + WD 640GB AAKS SATAII + WD 500GB AACS SATAII + WD 2TB 64MB + ExcelStor 160GB SATAII
DVD:Pioneer A09XL
Power:SevenTeam ST-420BKV(420W) Ver 2.0
Sound Card:Creative Sound Blaster Audigy 2 + ONKYO SE-90PCI
Speaker:Creative INSPIRE T2900
keyboard:Logitech 飆風手 精華版
Mouse:Logitech G1 換 OMRON D2F-01F 按鍵
LCD Monitor:ViewSonic VX2235wm
TV Card:UPMOST MTV雙語電視卡

歡迎到我的論壇閒聊
http://nitcs.itrello.com/forum/
舊 2006-10-21, 12:10 AM #11
回應時引用此文章
hollowaysxp離線中  
jamin
Senior Member
 
jamin的大頭照
 

加入日期: Dec 2002
文章: 1,370
果然

記憶體用太兇了吧

遞迴 + 瘋狂使用區域變數
CPU cache 再大也沒用
 
__________________
要討論也要找能溝通的, 跟狂吠的狗溝通只是浪費時間. 每日一句 : 很多不等於多數,也不等於少數
舊 2006-10-21, 12:37 AM #12
回應時引用此文章
jamin離線中  
hollowaysxp
Senior Member
 
hollowaysxp的大頭照
 

加入日期: Oct 2005
您的住址: 桃園-TW
文章: 1,446
那我們老師說要把矩陣設為64 x 64,昨天又說要設定128 x 128

然後設成64 x 64後,運算會堆疊溢位 NET 2005錯誤。
老師說去改一下編譯器裡記憶體分配大小(NET 2005不知從何去改).....這些遞回事放在堆疊我知道....但實際上是放RAM還是CPU的CACHE哪?我就不知道了@@
__________________
My Computer [2003.09]-已送人

CPU:Intel Pentium4 2.6CG
M/B:MSI 865PE Neo 2-LS
RAM:Transcend DDR400 512MB x 2 (Dual) (Samsung UCCC)
Display Card:GeCube ATI X1300XT 256MB
HDD:Maxtor 160GB
DVD:Pioneer A09XL
Power:SevenTeam (350W)
keyboard:Logitech 飆風手 精華版



-----------------------------------
My Computer [2009.06]

[COLOR=Yellow]CPU:Intel Core 2 Duo E8200 +Thermalright Ultra-120A
M/B:ASUS P5Q
RAM:ADATA DDRII 800 2GB x 2 (海力士) + Transcend DDRII 800 2GBx2
Display Card:SAPPHIRE HD 4830 GDDR3 512MB
HDD:WD 160GB JB IDE + WD 200GB + WD 250GB AAKS SATAII + WD 640GB AAKS SATAII + WD 500GB AACS SATAII + WD 2TB 64MB + ExcelStor 160GB SATAII
DVD:Pioneer A09XL
Power:SevenTeam ST-420BKV(420W) Ver 2.0
Sound Card:Creative Sound Blaster Audigy 2 + ONKYO SE-90PCI
Speaker:Creative INSPIRE T2900
keyboard:Logitech 飆風手 精華版
Mouse:Logitech G1 換 OMRON D2F-01F 按鍵
LCD Monitor:ViewSonic VX2235wm
TV Card:UPMOST MTV雙語電視卡

歡迎到我的論壇閒聊
http://nitcs.itrello.com/forum/
舊 2006-10-21, 05:07 AM #13
回應時引用此文章
hollowaysxp離線中  
anderson1127
Elite Member
 

加入日期: Jan 2002
文章: 4,032
不好意思,沒注意到樓主的簽名檔.....

不管如何,先把DRAM的大小調成一樣,再用原來的程式跑一次!!
這樣的比較才有意義!! 另外,不曉得能不能轉到Linux or FreeBSD上頭
來compile執行??
__________________
您想買新硬碟嗎? 購買前請務必參考這篇文章,是我的實際經驗

還想讓統一賺你的錢嗎?統一集團成員(能見度高的):
星巴克、家樂福、7-11、無印良品、黑貓宅急便、聖娜多堡、阪急百貨、
康是美、博客來、夢時代、Mister Donut 、Cold Stone 、龜甲萬、
維力33%股權、光泉31%股權、Smile速邁樂、紅心辣椒、台北轉運站(統一企業BOT)

統一LP33膠囊有環保署早已列管的一級管制品: DNOP塑化劑
舊 2006-10-21, 09:15 AM #14
回應時引用此文章
anderson1127離線中  
Rafale
Major Member
 

加入日期: Aug 2006
文章: 117
你們學校真有錢,可以請問哪一間嗎?
我那間窮學校還停留在P4 3.0G(應是478pin的),甚至還有SP2800
記憶體也都只有512MB而已
舊 2006-10-21, 09:48 AM #15
回應時引用此文章
Rafale離線中  
alan0888
Advance Member
 
alan0888的大頭照
 

加入日期: Feb 2003
您的住址: 台北縣
文章: 381
引用:
作者anderson1127
不好意思,沒注意到樓主的簽名檔.....

不管如何,先把DRAM的大小調成一樣,再用原來的程式跑一次!!
這樣的比較才有意義!! 另外,不曉得能不能轉到Linux or FreeBSD上頭
來compile執行??


引用:
作者樓主
學校用PD-3.4G + 1G RAM
我的P4-2.6CG + 1G RAM DDR 400
測試絕對客觀,你們放心。


1G != 1G ? 大小不是一樣?
舊 2006-10-21, 09:54 AM #16
回應時引用此文章
alan0888離線中  
hollowaysxp
Senior Member
 
hollowaysxp的大頭照
 

加入日期: Oct 2005
您的住址: 桃園-TW
文章: 1,446
引用:
作者Rafale
你們學校真有錢,可以請問哪一間嗎?
我那間窮學校還停留在P4 3.0G(應是478pin的),甚至還有SP2800
記憶體也都只有512MB而已


中歷萬能

去年有一間電腦教室換
P4-3.2G LGA 775 + 1G DDR 400+6600LE
今年
PD-3.4G + 1G RAM DDR ? +6600 顯卡

我想怎麼不換core 2 duo
__________________
My Computer [2003.09]-已送人

CPU:Intel Pentium4 2.6CG
M/B:MSI 865PE Neo 2-LS
RAM:Transcend DDR400 512MB x 2 (Dual) (Samsung UCCC)
Display Card:GeCube ATI X1300XT 256MB
HDD:Maxtor 160GB
DVD:Pioneer A09XL
Power:SevenTeam (350W)
keyboard:Logitech 飆風手 精華版



-----------------------------------
My Computer [2009.06]

[COLOR=Yellow]CPU:Intel Core 2 Duo E8200 +Thermalright Ultra-120A
M/B:ASUS P5Q
RAM:ADATA DDRII 800 2GB x 2 (海力士) + Transcend DDRII 800 2GBx2
Display Card:SAPPHIRE HD 4830 GDDR3 512MB
HDD:WD 160GB JB IDE + WD 200GB + WD 250GB AAKS SATAII + WD 640GB AAKS SATAII + WD 500GB AACS SATAII + WD 2TB 64MB + ExcelStor 160GB SATAII
DVD:Pioneer A09XL
Power:SevenTeam ST-420BKV(420W) Ver 2.0
Sound Card:Creative Sound Blaster Audigy 2 + ONKYO SE-90PCI
Speaker:Creative INSPIRE T2900
keyboard:Logitech 飆風手 精華版
Mouse:Logitech G1 換 OMRON D2F-01F 按鍵
LCD Monitor:ViewSonic VX2235wm
TV Card:UPMOST MTV雙語電視卡

歡迎到我的論壇閒聊
http://nitcs.itrello.com/forum/

此文章於 2006-10-21 12:25 PM 被 hollowaysxp 編輯.
舊 2006-10-21, 12:21 PM #17
回應時引用此文章
hollowaysxp離線中  
浪人-心太
Elite Member
 
浪人-心太的大頭照
 

加入日期: Oct 2006
您的住址: Taiwan
文章: 4,251
引用:
作者hollowaysxp
中歷萬能
去年有一間電腦教室換
P4-3.2G LGA 775 + 1G DDR 400+6600LE
今年
PD-3.4G + 1G RAM DDR ? +6600 顯卡
我想怎麼不換core 2 duo


因為要幫店家清庫存 加上學校一般都沒什麼預算 所以就......幫忙清倉吧!
__________________
參號機 2010.1.9 正式服役 2021 微升級續撐
AMD Athlon II X4 620 + Cooler Master S524
GA-MA785GT-UD3H + Adata DDR3 1600 2G x 2 + Kingston DDR3 1600 4G x 2
WD1003FZEX 1TB(黑標) + WD20PURZ 2TB(紫標) + HDT725032VLA360 320g
Asus GT 710 + Chimei 24VD + Seasonic GX-550 + Zippy WK-730
Clooer Master PAC-T01-E1 + Edifier MR5
順發卡號 : 0 1 5 6 8 9 0 0 歡迎享用
家庭劇院
LG UM7600PWA + PolkAudio RTi6 x 2 + CSi25 + PSW10 + PhonoMaster PM-470
攝影器材
Canon PowerShot G7 + LA-DC58H + WC-DC58B + S23 Plus
舊 2006-10-21, 12:32 PM #18
回應時引用此文章
浪人-心太離線中  
hollowaysxp
Senior Member
 
hollowaysxp的大頭照
 

加入日期: Oct 2005
您的住址: 桃園-TW
文章: 1,446
引用:
作者Rafale
你們學校真有錢,可以請問哪一間嗎?
我那間窮學校還停留在P4 3.0G(應是478pin的),甚至還有SP2800
記憶體也都只有512MB而已


說到這個...我們前知道兩間電腦教室
就說的那兩間教室P4-3.2G LGA775和PD-3.4G
上面這兩間好像是寫多媒體電腦教室

其他的還停在P4-1.8G、256MB(網際工程教室-電腦只拿來老師廣播教學...偶爾裝Cisco模擬器...玩Router)。
還有PIII-866+256MB(嵌入式系統教室 寫組合語言)
__________________
My Computer [2003.09]-已送人

CPU:Intel Pentium4 2.6CG
M/B:MSI 865PE Neo 2-LS
RAM:Transcend DDR400 512MB x 2 (Dual) (Samsung UCCC)
Display Card:GeCube ATI X1300XT 256MB
HDD:Maxtor 160GB
DVD:Pioneer A09XL
Power:SevenTeam (350W)
keyboard:Logitech 飆風手 精華版



-----------------------------------
My Computer [2009.06]

[COLOR=Yellow]CPU:Intel Core 2 Duo E8200 +Thermalright Ultra-120A
M/B:ASUS P5Q
RAM:ADATA DDRII 800 2GB x 2 (海力士) + Transcend DDRII 800 2GBx2
Display Card:SAPPHIRE HD 4830 GDDR3 512MB
HDD:WD 160GB JB IDE + WD 200GB + WD 250GB AAKS SATAII + WD 640GB AAKS SATAII + WD 500GB AACS SATAII + WD 2TB 64MB + ExcelStor 160GB SATAII
DVD:Pioneer A09XL
Power:SevenTeam ST-420BKV(420W) Ver 2.0
Sound Card:Creative Sound Blaster Audigy 2 + ONKYO SE-90PCI
Speaker:Creative INSPIRE T2900
keyboard:Logitech 飆風手 精華版
Mouse:Logitech G1 換 OMRON D2F-01F 按鍵
LCD Monitor:ViewSonic VX2235wm
TV Card:UPMOST MTV雙語電視卡

歡迎到我的論壇閒聊
http://nitcs.itrello.com/forum/
舊 2006-10-21, 01:19 PM #19
回應時引用此文章
hollowaysxp離線中  


    回應


POPIN
主題工具

發表文章規則
不可以發起新主題
不可以回應主題
不可以上傳附加檔案
不可以編輯您的文章

vB 代碼打開
[IMG]代碼打開
HTML代碼關閉



所有的時間均為GMT +8。 現在的時間是07:24 AM.


vBulletin Version 3.0.1
powered_by_vbulletin 2025。