回 帖 发 新 帖 刷新版面

主题:list-directed I/O syntax error

compile 和 build 都通过了,编译时有警告,运行时就出现上面的错误了。程序要贴出来吗?很长啊

回复列表 (共5个回复)

沙发

把具体的警告和错误完整的帖上来就可以了。

板凳

program ifd2
      PARAMETER MXLYR=101,MXN=10000,MXSVP=101,MXTRK=101,NIU=1, NOU=2, 
     C          NPU=6 ,PI=3.141592654,DEG=57.29578
      COMPLEX ACOFX,ACOFY,BCOF,BOTX,BOTY,BTA,HNX,HNKL,SURX,SURY,TEMP
     C        U,X,Y 

      COMMON /IFDCOM/ACOFX,ACOFT,ALPHA,BCOF,BETA(MXLYR),BOTX,BOTY, 

     C BTA(MXN),C0,CSVP(MXSVP),DR,DR1,DZ,FRQ,IHNK,ISF,ITYPEB,

     C ITYPES,IXSVP(MXLYR),KSVP,N,Nl,NLYR,NSVP,NWSVP,MM,R0,R12(MXN),RA, 

     C RHO(MXLYR),RSVP,SURX,SURY,THETA,TRACK(MXTRK,2),U(MXN),M,

     C X(MXN),XXO,Y(MXN),ZA,ZLYR(MXLYR),ZP,ZS,ZSVP(MXSVP) 
       
     

C      *** READ INPUT PARAMETERS 

      OPEN (NIU,file='IFD.IN',action='read') 

      READ(NIU,*) FRQ,ZS,C0,ISF,RA,ZA,N,IHNK,ITYPEB,ITYPES 
    READ(NIU,*) RMAX,DR,WDR,WDZ,PDR,PDZ,ISFLD,ISVP,IBOT 
    END
    
    
    
    
IFD.IN文件是
100,30,0,0,0,240,500,0,3,0
20000,2,50,10,10,50,0,0,0


错误是
forrtl:severe<59>:list-directer I/O syntax error,unit 1,file D:\mywork\example\test ifd\IFD.IN

3 楼

我这里没有问题,建议你把 NIU=1 改成 NIU = 11 试试看

4 楼

完整的错误还包括是
Incrementally linked image--PC correlation disabled
改成NIU=11后,错误就变成unit11了
可能是我的设置的问题吗?

5 楼


请问你的这个问题是如何解决的,我也遇到了这样的问题

我来回复

您尚未登录,请登录后再回复。点此登录或注册