| NAMELIST文 |
NAMELIST文| [例1] |
INTEGER :: x
INTEGER,DIMENSION(5) :: a
NAMELIST /name/ x,a
x=987; a=0; a(1)=12
WRITE(*,name) !または、WRITE(*,NML=name)
| 出力 |
| [例2] |
INTEGER :: x,y
CHARACTER (LEN=10) :: moji
NAMELIST /name/ x,y,moji
READ(*,name)
| 出力 |