Anonymous user
Matrix multiplication: Difference between revisions
no edit summary
m (→{{header|BASIC}}: Added trans template) |
No edit summary |
||
Line 260:
writefln("(n * m) * n = ", n.mmul(m).mmul(n).toString()) ;
}</pre>
=={{header|Fortran}}==
In ISO Fortran 90 and later, use the MATMUL intrinsic function:
REAL, DIMENSION(N,M) :: A = RESHAPE( (/ (I, I=1, N*M) /), (/ N, M /) )
REAL, DIMENSION(M,K) :: B = RESHAPE( (/ (I, I=1, M*K) /), (/ M, K /) )
REAL, DIMENSION(N,K) :: C
C = MATMUL( A, B )
=={{header|Haskell}}==
| |||