小编G.C*_*hri的帖子

我是 Fortran 新手，想寻求帮助。我的代码很简单。它只是进入一个循环，然后使用系统内部过程进入名称为 code 的文件并运行 evalcode.x 程序。

program subr1
  implicit none
  integer :: i,
  real    ::  T1,T2 

  call cpu_time(T1)
  do i=1,6320
    call system ("cd ~/code; ../evalcede/source/evalcode.x test ")
  enddo
  call cpu_time(T2)

  print *, T1,T2

end program subr1

测得程序实际运行的时间是 0.5 秒，但这段代码实际执行所需的时间是 1.5 小时！程序暂停或等待，我不知道为什么。