help

[Omar Müller]

I read the data in a matrix dum and them I write dum in an unformatted file.
Someone have a program for create the binary file from a data file?


> two dimensional aray being replaced by one dimensional ?


> >I prove the next code for create binary data files
> >
> >
> > program crea_dat
> >
> >        real dum(2,3)
> >        parameter (ni=1,nj=1,nk=1,nt=1)
> >        OPEN(8,FILE='bin.dat',status='replace',FORM='UNFORMATTED')
> >        OPEN(7,FILE='data.dat',STATUS='OLD')
> >        do t=1,nt !temp
> >          do v=1,nv !var
> >            do n=1,nk !level
> >                do i=1,2 !long
> >                        do j=1,3 !lat
> >                                read(7,*,END=150)d
> > 150                             dum(i,j)=d
> >                        end do
> >                end do
> >                write(8)dum
> >            end do
> >          end do
> >        end do
> >        CLOSE(8)
> >        CLOSE(7)
> > end
> >
> > where data.dat is:
> > 1
> > 2
> > 3
> > 1
> > 2
> > 3
> >
> > but I obtain in GRADS:
> > 0 1 1 2 2 3 when I use d command in gxout print.
> > Where is the error?
> > Plese help me, I'm from Argentina.