Parent Directory | Revision Log | Patch
revision 12 by guez, Mon Jul 21 16:05:07 2008 UTC | revision 13 by guez, Fri Jul 25 19:59:34 2008 UTC | |
---|---|---|
# | Line 14 contains | Line 14 contains |
14 | ||
15 | !------------------------------------------------- | !------------------------------------------------- |
16 | ||
print *, "Call sequence information: read_iniprint" | ||
17 | print *, "Enter namelist 'iniprint_nml'." | print *, "Enter namelist 'iniprint_nml'." |
18 | read(unit=*, nml=iniprint_nml) | read(unit=*, nml=iniprint_nml) |
19 | write(unit=*, nml=iniprint_nml) | write(unit=*, nml=iniprint_nml) |
|
ViewVC Help | |
Powered by ViewVC 1.1.21 |