<DIV>
<P class=MsoNormal style="MARGIN: 0cm 0cm 0pt"><SPAN lang=EN-GB>Dear Yoshihiro,</SPAN></P>
<P class=MsoNormal style="MARGIN: 0cm 0cm 0pt"><SPAN lang=EN-GB>I tried, as you advised;</SPAN></P>
<P class=MsoNormal style="MARGIN: 0cm 0cm 0pt"><SPAN lang=EN-GB>recl=4*l*m,</SPAN></P>
<P class=MsoNormal style="MARGIN: 0cm 0cm 0pt"><SPAN lang=EN-GB>write(10) cor, no loop,</SPAN></P>
<P class=MsoNormal style="MARGIN: 0cm 0cm 0pt"><SPAN lang=EN-GB>The resulting binary file looks much better than before, but 'd cor' gives 'display nan to nan interval inf.'</SPAN></P>
<P class=MsoNormal style="MARGIN: 0cm 0cm 0pt"><SPAN lang=EN-GB>Thanks all the same, i will keep trying.</SPAN></P>
<P class=MsoNormal style="MARGIN: 0cm 0cm 0pt"><SPAN lang=EN-GB>Zilore</SPAN></P>
<P class=MsoNormal style="MARGIN: 0cm 0cm 0pt"><SPAN lang=EN-GB> <?xml:namespace prefix = o ns = "urn:schemas-microsoft-com:office:office" /><o:p></o:p></SPAN></P><BR><BR><B><I>Yoshihiro Yamasaki <yamasaki@FIS.UA.PT></I></B> wrote:
<BLOCKQUOTE class=replbq style="PADDING-LEFT: 5px; MARGIN-LEFT: 5px; BORDER-LEFT: #1010ff 2px solid">Hi !<BR>Try the following :<BR><BR>parameter ( L = , M = )<BR>dimension cor (L,M)<BR>open your file with ---> recl = 4 * L * M<BR>irec = 1<BR>write(10,rec=irec) cor<BR><BR>no do loop is needed<BR><BR>yyamazaki<BR><BR><BR>Em Thu, 17 Mar 2005 03:12:18 -0800<BR>zilore mumba <ZMUMBA@YAHOO.COM>escreveu:<BR>><BR>><BR>><BR>> Dear Yoshihiro,<BR>><BR>> Thanks very much for sparing your time to spot my silly<BR>>slip. Evidently the program was writing zeros. However it<BR>>is still not displaying as required.<BR>><BR>><BR>><BR>><BR>> Yoshihiro Yamasaki <YAMASAKI@FIS.UA.PT>wrote:Dear<BR>>Zilone,<BR>><BR>> Assuming that you have DIMENSION COR(55,57), you made a<BR>> mistake in your do loop index ( do j and not k )<BR>><BR>> do J = 1 , m<BR>> irec=irec+1<BR>> write(10,rec=irec) (cor(i,j),i=1,l)<BR>> enddo<BR>><BR>>
good
luck !<BR>><BR>><BR>> Em Wed, 16 Mar 2005 23:21:42 -0800<BR>> zilore mumba escreveu:<BR>>> I have an apparently very simple problem.<BR>>> I have correlation data cor(i,j) over an xy domain.<BR>>>Using a fortran program I have written the data into<BR>>>binary to display in Grads. Apparently Grads is able to<BR>>>open the data file.<BR>>> when I put recl=4*l, the display is blank (with only map<BR>>>of Africa of course)<BR>>> when I put recl=8*l, the display says constant field<BR>>>value=0.<BR>>><BR>>> Here are snippets from my fortran program:<BR>>><BR>>> open<BR>>>(10,file='zcor824.dat',form='unformatted',access='direct',<BR>>>recl=4*(l+1))<BR>>><BR>>> irec=0<BR>>> do k=1,m<BR>>> irec=irec+1<BR>>> write(10,rec=irec) (cor(i,j),i=1,l)<BR>>> enddo<BR>>><BR>>> and my ctl file<BR>>><BR>>> dset zcor824.dat<BR>>>
undef
-1.00E+09<BR>>> title correlation<BR>>> xdef 55 linear -30 1.5<BR>>> ydef 57 linear -42 1.5<BR>>> zdef 1 levels 850<BR>>> tdef 999 linear 00Z29AUG97 6hr<BR>>> vars 1<BR>>> cor 1 99 linear correl coeff<BR>>> endvars<BR>>><BR>>> Any help would be very welcome to resolve my problem<BR>>> Thanks all.<BR>>><BR>>><BR>>><BR>>><BR>>><BR>>> ---------------------------------<BR>>> Do you Yahoo!?<BR>>> Yahoo! Small Business - Try our new resources site!<BR>><BR>><BR>><BR>><BR>><BR>> ---------------------------------<BR>> Do you Yahoo!?<BR>> Yahoo! Small Business - Try our new resources site!<BR></BLOCKQUOTE></DIV><BR><BR><p>
<hr size=1>Do you Yahoo!?<br>
Yahoo! Small Business - <a href="http://us.rd.yahoo.com/evt=31637/*http://smallbusiness.yahoo.com/resources/">Try our new resources site!</a>