command-line - 检查程序的参数是否为空？

Question

我运行一个从 Fortran 源代码编译的程序:

  ./a.out N t

这里N和t定义了两个正整数。这是为此的代码:

  character(len=10) :: arg
  call get_command_argument(1, arg)
  read(arg,'(I10)') N
  call get_command_argument(2, arg)
  read(arg,'(I10)') t

接下来，我想做以下事情:如果我既不输入 N 也不输入 t(即，如果 arg,1 为空)，那么程序建议通过程序输入它们(我不知道什么是模拟Fortran 中的 scanf)。如何明确地做到这一点，你能帮忙吗？

Answer 1

如果我没理解错的话，你正在寻找类似的东西

character(len=10) :: arg
call get_command_argument(1, arg)
if (trim(arg) == '') then
  write(*,*) 'Please enter N:'
  read(*,*) N
else
  read(arg,'(I10)') N
end if

call get_command_argument(2, arg)
if (trim(arg) == '') then
  write(*,*) 'Please enter t:'
  read(*,*) t
else
  read(arg,'(I10)') t
end if