| ＴＲＡＮＳＰＯＳＥ |
ＴＲＡＮＳＰＯＳＥ| 書式 | TRANSPOSE(MATRIX) |
| 機能 |
2次元配列MATRIXを転置する。 転置するとは、たとえば次のように行と列を入れ換えることである。
|
| 引数 | MATRIX：任意の型の2次元配列 |
| 戻り値 |
型、種別型パラメタは引数MATRIXと同じである。 MATRIXの形状が(m,n)であるとき、結果の形状は(n,m)である。 |
サンプルプログラム
INTEGER :: i
INTEGER,DIMENSION(2,3) :: vect
INTEGER,DIMENSION(3,2) :: trn
vect(1,:)=(/1, 2, 3/)
vect(2,:)=(/4, 5, 6/)
trn=TRANSPOSE(vect)
WRITE(*,'(2I2)') (trn(i,:),i=1,3)
| 実行例 |
