e_711_05.f90

来自「Fortran77和90/95编程入门对应的程序源码」· F90 代码 · 共 19 行

! example of namelist input

namelist/my/n,m
read (*,nml=my)
write(*,nml=my)
end

!the following are valid input for namelist variable assignment:

! $my n=1/
! $my n=2$
! $my n=3$end
! &my n=4&
! &my n=5$END

! &my
!  n=1
!  m=2
!  /