使用write（6，*）语句的Fortran

我在学习Fortran程序

当我使用下面的write语句时，我的代码构建得很好，但没有按预期运行，尤其是

READ（6，*）

可能是什么问题？我如何解决？谢谢

      OPEN(UNIT= 5, FILE='inp.dat')
      OPEN(UNIT= 10, FILE='apr1400.dat')   
      OPEN(UNIT= 11, FILE='ulpu2001.dat')  
      OPEN(UNIT= 12, FILE='aprslice.dat')
      OPEN(UNIT= 6, FILE='HEATFX.dat')
      OPEN(UNIT= 13, FILE='HEATFX1.dat')
      OPEN(UNIT= 14, FILE='HEATFX2.dat')
      OPEN(UNIT= 15, FILE='HEATFX3.dat')  
      OPEN(UNIT= 7, FILE='out.dat')
      OPEN(UNIT= 8, FILE='check.dat')
      OPEN(UNIT= 9, FILE='checkout.dat')

      READ (5, *)IPLANT
      IF(IPLANT.EQ.1)IIP=10
      IF(IPLANT.EQ.2)IIP=11
      IF(IPLANT.EQ.3)IIP=12

      READ (IIP, 250) TITLE
250   FORMAT(A20)

      READ (IIP, 300) ISLICE
300   FORMAT(I1)

      READ (IIP, 400) RADIUS, XLCYL, DIACYL, DEPTH, GAP, AINLET
      IF(ISLICE.EQ.0)READ (IIP, 400) POWER

      READ (6, *)HEATFX
      IF(HEATFX.EQ.1)llk=13
      IF(HEATFX.EQ.2)llk=14
      IF(HEATFX.EQ.3)llk=15
      READ(llk, 400) HEATFX

      READ (IIP, 400) PSYS
      READ (IIP, 400) DTSUBI

      READ (IIP, 400) XKLOSSI, XKLOSSC
      READ (IIP, 405) IPARA

单位编号0、5和6与标准错误、标准输入和标准输出文件相关联

第六单元是一个特殊的单元，这可能是这里的问题所在

---

一般情况下，尝试对文件单位使用较大的数字。我通常使用100、101、102等。

可能会显示报价的来源，标准IIRC中的数字不是固定的。10岁以上是安全的。像

newunit

这样的现代功能使事情变得更简单。