SHAPE |
書式 | SHAPE(SOURCE) | ||
機能 | 配列またはスカラの形状を返す。 | ||
引数 |
| ||
戻り値 | 型、種別パラメタは基本整数型で形状はSOURCEの 次元数に等しい1次元配列である。 |
REAL,DIMENSION(4,3) :: a REAL,DIMENSION(-2:2) :: b INTEGER,DIMENSION(1) :: s INTEGER,DIMENSION(2) :: t s=SHAPE(a) ! 配列aは(4,3) WRITE(*,*) s ! s(1)=4,s(2)=3 t=SHAPE(b) ! 配列aは(-2:2) WRITE(*,*) t ! t(1)=5
実行例 |