Class | dcl_read_name |
In: |
dcl_read_name.f90
|
ネームリスト変数を読み込むルーチンを含んだモジュール
Subroutine : | |
stat : | integer |
subroutine dcl_read_nml(stat) implicit none integer :: stat read(5,nml=input,iostat=stat) read(5,nml=filename,iostat=stat) read(5,nml=file_form,iostat=stat) read(5,nml=dcl_dump,iostat=stat) read(5,nml=map_info,iostat=stat) read(5,nml=val_cont,iostat=stat) read(5,nml=option,iostat=stat) read(5,nml=factor,iostat=stat) end subroutine