<html><body>
<DIV>Thanks again for all your help.&nbsp; I made an intersting yet simple discovery along the way to solving this&nbsp;problem...&nbsp;</DIV>
<DIV>&nbsp;</DIV>
<DIV>** Variables&nbsp;written out using fwrite MUST&nbsp;be&nbsp;read back into Grads in the exact same order. **</DIV>
<DIV>&nbsp;</DIV>
<DIV>For example:</DIV>
<DIV>&nbsp;</DIV>
<DIV>set fwrite grads.fwrite<BR>set gxout fwrite<BR>d var1<BR>d var2<BR>disable fwrite</DIV>
<DIV>&nbsp;</DIV>
<DIV>The ctl file to&nbsp;read the data back into grads must list the variables in the exact same order they are written out (e.g.):</DIV>
<DIV>.....</DIV>
<DIV>vars 2<BR>var1&nbsp; 0 107,1,1&nbsp; ** var1 [deg]<BR>var2&nbsp; 0 100,1,1&nbsp; ** var2 [m]<BR>ENDVARS</DIV>
<DIV>&nbsp;</DIV>
<DIV>If the order ir reversed (i.e var2, var1)&nbsp; you'll be reading degrees for meters&nbsp;or&nbsp;visa versa.</DIV>
<DIV>&nbsp;</DIV>
<DIV>Thanks again, <BR>Mark</DIV>
<DIV>&nbsp;</DIV>
<BLOCKQUOTE style="PADDING-LEFT: 5px; MARGIN-LEFT: 5px; BORDER-LEFT: #1010ff 2px solid">-------------- Original message -------------- <BR><BR>&gt; The "options yrev" should not be used. Even though your original file has x <BR>&gt; and y reversed, fwrite writes the data from grads arrays so everything is in <BR>&gt; the order grads expects. I don't think that would give you the results you <BR>&gt; report, though. The grid should just be skewed around since you are reading <BR>&gt; rows and columns in the wrong order. The little endian may be a problem. <BR>&gt; If you are writing and reading the files on the same machine, you don't need <BR>&gt; to specify the endian type. Again, fwrite uses the expected format for the <BR>&gt; machine you are on. Since you only have two variables with one time and <BR>&gt; level, there isn't much more that could be wrong. <BR>&gt; <BR>&gt; &gt; -----Original Message----- <BR>&gt; &gt; From: Mark Sponsler [mailto:msponsler@COMCAST.NET] <BR>
 &gt; &gt; Sent: Monday, October 17, 2005 2:42 PM <BR>&gt; &gt; To: GRADSUSR@LIST.CINECA.IT <BR>&gt; &gt; Subject: fwrite (again) <BR>&gt; &gt; <BR>&gt; &gt; <BR>&gt; &gt; Sorry to be so bothersome but I have another simple question <BR>&gt; &gt; that I could <BR>&gt; &gt; not answer after reviewing the documentation. <BR>&gt; &gt; <BR>&gt; &gt; When using the fwrite defaults, it streams the data to a <BR>&gt; &gt; binary file for <BR>&gt; &gt; eventualy re-ingestion into GRADS. Is some level of fortran <BR>&gt; &gt; manipulation <BR>&gt; &gt; of the fwrite output required before it can be re-read by Grads? <BR>&gt; &gt; <BR>&gt; &gt; I ask because I was able to manually generate a control file <BR>&gt; &gt; and get Grads <BR>&gt; &gt; to read the file producing some results, but the data is way off <BR>&gt; &gt; (Significant Wave Heights are all too high and and Direction <BR>&gt; &gt; is set to 180 <BR>&gt; &gt; degrees for all grib points). <BR>&gt; &gt; <BR>&gt; &gt; Here
 's my modified control file: <BR>&gt; &gt; <BR>&gt; &gt; dset grads.fwrite <BR>&gt; &gt; undef 9.999E+20 <BR>&gt; &gt; options little_endian <BR>&gt; &gt; options yrev <BR>&gt; &gt; ydef 157 linear -78.000000 1 <BR>&gt; &gt; xdef 288 linear 0.000000 1.250000 <BR>&gt; &gt; tdef 1 linear 18Z12nov2004 03hr <BR>&gt; &gt; zdef 1 linear 1 1 <BR>&gt; &gt; vars 2 <BR>&gt; &gt; DIRPWsfc 0 107,1,1 ** surface Primary wave direction [deg] <BR>&gt; &gt; HTSGWsfc 0 100,1,1 ** surface Sig height of wind waves and swell [m] <BR>&gt; &gt; ENDVARS <BR>&gt; &gt; <BR>&gt; &gt; Here's the control file for original dataset that fwrite used as it's <BR>&gt; &gt; source: <BR>&gt; &gt; <BR>&gt; &gt; dset nww3.all.grb <BR>&gt; &gt; index nww3.all.grb.idx <BR>&gt; &gt; undef 9.999E+20 <BR>&gt; &gt; title nww3.all.grb <BR>&gt; &gt; * produced by grib2ctl v0.9.12.5p33e <BR>&gt; &gt; dtype grib 233 <BR>&gt; &gt; options yrev <BR>&gt; &gt; ydef 157 linear -78.000000 1 <BR>&gt; &gt; xdef 288 linear 0.00000
 0 1.250000 <BR>&gt; &gt; tdef 61 linear 18Z12nov2004 03hr <BR>&gt; &gt; zdef 1 linear 1 1 <BR>&gt; &gt; vars 11 <BR>&gt; &gt; DIRPWsfc 0 107,1,1 ** surface Primary wave direction [deg] <BR>&gt; &gt; DIRSWsfc 0 109,1,1 ** surface Secondary wave direction [deg] <BR>&gt; &gt; HTSGWsfc 0 100,1,1 ** surface Sig height of wind waves and swell [m] <BR>&gt; &gt; PERPWsfc 0 108,1,1 ** surface Primary wave mean period [s] <BR>&gt; &gt; PERSWsfc 0 110,1,1 ** surface Secondary wave mean period [s] <BR>&gt; &gt; UGRDsfc 0 33,1,1 ** surface u wind [m/s] <BR>&gt; &gt; VGRDsfc 0 34,1,1 ** surface v wind [m/s] <BR>&gt; &gt; WDIRsfc 0 31,1,1 ** surface Wind direction [deg] <BR>&gt; &gt; WINDsfc 0 32,1,1 ** surface Wind speed [m/s] <BR>&gt; &gt; WVDIRsfc 0 101,1,1 ** surface Direction of wind waves [deg] <BR>&gt; &gt; WVPERsfc 0 103,1,1 ** surface Mean period of wind waves [s] <BR>&gt; &gt; ENDVARS <BR>&gt; &gt; </BLOCKQUOTE></body></html>