Matrix transposition: Difference between revisions

Content added Content deleted
(Added Haskell example)
No edit summary
Line 196: Line 196:
writefln(" n (m's transpose) = ", n.toString()) ;
writefln(" n (m's transpose) = ", n.toString()) ;
}</pre>
}</pre>


=={{header|Fortran}}==
In ISO Fortran 90 and later, use the TRANSPOSE function:
REAL, DIMENSION(N,M) :: A = (/ ((i+2*j,i=1,n),j=1,m) /)
REAL, DIMENSION(M,N) :: B
B = TRANSPOSE(A)

In MIL-STD-1753 Fortran and later, use nested structured DO loops:

In ANSI FORTRAN 66 and later, use nested labeled DO loops:


=={{header|Haskell}}==
=={{header|Haskell}}==