Question

我正在尝试使用gfortran编译一段代码，但是它失败并出现以下错误：

Error: Nonnegative width required in format string at (1)
../src/powmes.f90:410.20:
     write(lunit,'(I,E,E,E)') wavenum(k),power(k),nmodes(k),errorexpan(k)

414   if (filepower_fold(1:1) /= '#') then
415      fileout=trim(filepower_fold)//'.waven'
416      if (verbose) write(*,*) 'Output '//trim(fileout)
417      open(file=fileout,form='formatted',status='unknown',unit=lunit,err=2)
418      do k=0,ngrid/2
419         do ifold=0,nfoldpow-1
420            write(lunit,'(I,$)') waven(k,ifold)
421         enddo
422         write(lunit,'(I)') waven(k,nfoldpow)
423      enddo
424      close(lunit)

我该怎么编译呢？

Answer 1

尝试将格式字符串I更改为Iw，其中w为正数。与E相同，仅使用Ew.d 有关说明，请参阅此链接： http://www.cs.mtu.edu/~shene/COURSES/cs201/NOTES/chap05/format.html

请注意：使用I3写出1234可能会打印***，因此请确保您的格式足够广。

编辑：请参阅@ M.S.B.关于如何避免整数格式问题的答案。

Answer 2

如前所述，您需要指定宽度。像ES14.5这样的东西可能适用于浮点格式。整数格式有一个捷径：I0将使编译器使用所需的位数。

错误：格式字符串中所需的非负宽度（1）

2 个答案: