根据你已有的代码来看，不会出错，实际上在我这里也是正常的。

建议你无省略的上传所有代码（可打包，上传附件）

由于write 后面的部分没有参与所以省略不计
程序如下

[Fortran] 查看源码 复制源码

program xx
    implicit none
    include "param.h"
    include "TECIO_mod.f90"
    real(8) :: X(ngi,ngj),Y(ngi,ngj),T(ni,nj),SS(ni,nj),TURB(ni,nj),U(ni,nj),V(ni,nj),yvd(ngj),dx(ni)
    real(8),allocatable :: XT(:,:),YT(:,:),TT(:,:),SST(:,:),TURBT(:,:),UT(:,:),VT(:,:)
    real(8) :: dys,ytmp1,ytmp2
    integer :: i,j,ii,jj,tloop,io
    integer :: dts,dto,tts1,tts2
    integer :: iyr,imon,iday,ihour,niu,njs
    integer :: js(ni)
!====Variables for Tecplot-Binary Output
    integer(4) :: ti,tiii,imax,jmax,kmax,debug,disdouble,visdouble
    integer(4) :: strandid,parentzn
    integer(4) :: pvl(7),valloc(7),sharingzone(7)
    real(8) :: soltime1,soltime2
    character(len=1) :: nulchar
    character(len=15) :: timchar1,timchar2
    include "output_step.h"
    
!====debug==
    write(*,*)nnts(1,1)
    write(*,*)nnts(1,2)
    write(*,*)nnts(2,1)
    write(*,*)nnts(2,2)

end

output_step.h 文件的内容已经完整传上来了。可以看到前面的代码都只是定义变量的部分，跟这部分应该没有关系。

传所有代码吧