哭死，折腾了两个小时，这个弱智问题，求大家帮帮忙，看看哪里出问题了，

Kimmy-24686

fortran十进制直接成二进制，配相应的ctl，在grads中显示出来的值是错的，求求大侠帮帮忙吧，parameter (N=46)
integer i
real yr,x(N),y(N),z(N)
open(10,file='D:\2017\ice_jx_year_jibing_1970-2015-dong.TXT')
    do i=1,N
      read(10,*) yr,x(i),y(i)  
    enddo
   close(10)
   open(100,file='D:\2017\ice_jx_year_jibing_1970-2015-dong.grd',form='binary')
   do i=1,N
   write(100)x(i), y(i)
   ENDDO
end
下面是相应的ctl，用grads是可以打开的，可是画出来的图却显示全是0，
dset d:\2017\ice_jx_year_jibing_1970-2015-dong.grd
undef -999.0
title SVD time coefficient of rainfall and NP MLD
xdef  1 linear  119.5    1.0
ydef   1 linear  19.739  0.333
zdef   1 levels  5     
tdef  46 linear   jan1969  1yr
vars 2
tcf 1 999 mean Jul rainfall (mm)
tcg 1 999 mean Jan mld
endvars

Kimmy-24686

就是ctl中的第一个变量，也是x（i）

男紫汗

先写一个变量试试。。。

Kimmy-24686

问题已经解决，谢谢大家！

字俣丞

请问一下，怎么解决的？我也是这个问题