24 lines
287 B
Fortran
24 lines
287 B
Fortran
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
! ==========================================================================
|
|
|
|
program scripinterp
|
|
|
|
use scripinterp_mod
|
|
|
|
character (char_len) :: nm_in
|
|
write(6,*) 'enter the name of an input namelist'
|
|
read(5,*) nm_in
|
|
call process_grid(nm_in)
|
|
|
|
end program scripinterp
|