From: utzoo!decvax!ucbvax!C70:info-cpm Newsgroups: fa.info-cpm Title: [decvax!duke!hes: IBM PC benchmark: program] Article-I.D.: ucb.1086 Posted: Sat May 15 01:04:49 1982 Received: Sun May 16 00:31:31 1982 >From W8SDZ@Mit-Mc Sat May 15 01:04:19 1982 Date: 14 May 82 11:19:46-EDT (Fri) From: decvax!duke!hes at Berkeley To: info-micro at mit-ai Re: IBM PC benchmark: program Article-I.D.: duke.2140 Via: news.usenet; 14 May 82 8:58-PDT I have had several requests for the details of my becnhmark. This is the matrix program I used. I left out blank spaces between the line numbers and statements, etc., which are put in here for readability. 10 DIM A(10,10), B(10,10), C(10,10) 20 FOR I = 1 TO 10 30 FOR J = 1 TO 10 40 A(I,J) = 1./3. 50 B(I,J) = 1./7. 60 NEXT 70 NEXT 80 FOR I = 1 TO 10 90 FOR J = 1 TO 10 100 FOR K = 1 TO 10 110 C(I,J) = C(I,J) + A(I,K)*B(K,J) 120 NEXT 130 NEXT 140 NEXT 150 PRINT C(1,1) The last statement signals the completion of the program and by printing out a value of approx .476l9 indicates that the program ran more or less in the manner hoped for. --henry schaffer