知識の箱
主に気象を研究する上で得た知識と、WEBページ作成のために得た知識を記録しています。
fortranでnamelistの活用
Fortran90では、外部から変数を与えるときに、
namelistを用いると便利である。
namelistの使い方．
(1) namelistを作る。
———————————
&indata
indir=”./input”
infile=”input.txt”
outdir=”./output”
outfile=”output.txt”
/
&ingrid
xgrid=144
ygrid=73
zgrid=17
time=365
/
———————————
(2) Fortranプログラムから呼び出す。
———————————
program sample
implicit none
integer, parameter :: maxlen=200
integer, parameter :: infu=11, outfu=12
integer, parameter :: nmlfu=20
character(len=maxlen) :: indir, infile, outdir, outfile
integer :: xgrid, ygrid,zgrid, time
namelist/indata/indir, infile, outdir, outfile
namelist/ingrid/xgrid, ygrid, zgrid, time
open (unit=nmlfu, file=’namelist’)
read (unit=nmlfu, nml=indata)
read (unit=nmlfu, nml=ingrid)
close(unit=nmlfu)
(中略)
stop
end program sample
———————————