stnmap生成map的时候出错

251764374

integer,parameter::sta=160,year=63,imon=12
real temp(sta,year,imon)


数组是读进去了的，按月输出的txt文件也没有问题，输出二进制程序如下：
filename='E:\EOF\160\ssta.grd'
open(5,file=filename,status='replace',form='binary')

do j=1,year
        do k=1,imon
                tim=0.0
                nlev=1
                flag=1

                do i=1,sta
                        write(5) stid(i),lat(i),lon(i),tim,nlev,flag,temp(i,j,k)/10
                enddo
                nlev=0
                write(5) stid(i-1),lat(i-1),lon(i-1),tim,nlev,flag
        enddo
enddo
close(5)

ctl文件如下：
dset E:\EOF\160\zhan\sta.grd
dtype station
stnmap E:\EOF\160\zhan\sta.map
undef -999.9
title monthly temperature For 63 years
tdef 756 linear Jan1951 1mo
vars 1
temp 0 99 monthly temperature
endvars

251764374

没有 大神能够帮忙解决一下吗？