I think that your problem is when you read the next line, make sure
that the dat file is generated correctly use one line of rain.prn file
and try again running stnmap an ctl.<br>
<br><br><div><span class="gmail_quote">On 9/4/05, <b class="gmail_sendername">Rochelle Balmori</b> &lt;<a href="mailto:rtfbalmori@gmail.com">rtfbalmori@gmail.com</a>&gt; wrote:</span><blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;">
Hello,<br><br>I'm trying to use the stnmap utility but I always get this error message:<br><br>Open Error:&nbsp;&nbsp;Data file type invalid<br>&nbsp;&nbsp;--&gt; The invalid description file record is:<br>&nbsp;&nbsp;--&gt; options sequential<br><br>
&nbsp;&nbsp;The data file was not opened.<br>File name is:&nbsp;&nbsp;rain.ctl<br><br>OR (if i interchange the 2nd and 3rd line of my descriptor file)<br><br>[balmori@methost7 mo]$ stnmap -i rain.ctl<br>Open Error:&nbsp;&nbsp;Data file type invalid<br>
&nbsp;&nbsp;--&gt; The invalid description file record is:<br>&nbsp;&nbsp;--&gt; dtype station<br><br>&nbsp;&nbsp;The data file was not opened.<br>File name is:&nbsp;&nbsp;rain.ctl<br><br><br>I've used and read almost all the archived messages regarding stnmap but was
<br>still unsuccessful.<br><br>I used rain.prn (an example) as my data file<br><br>4.23&nbsp;&nbsp;&nbsp;&nbsp;93.13&nbsp;&nbsp;&nbsp;&nbsp;17.21<br>-5.25&nbsp;&nbsp; 105.18&nbsp;&nbsp;&nbsp;&nbsp;26.43<br>3.80&nbsp;&nbsp;&nbsp;&nbsp;98.70&nbsp;&nbsp;&nbsp;&nbsp;24.39<br>3.57&nbsp;&nbsp;&nbsp;&nbsp;98.68&nbsp;&nbsp;&nbsp;&nbsp;17.30<br>1.55&nbsp;&nbsp;&nbsp;&nbsp;98.88&nbsp;&nbsp;&nbsp;&nbsp;47.72<br>1.23&nbsp;&nbsp;&nbsp;&nbsp;
97.63&nbsp;&nbsp;&nbsp;&nbsp;20.18<br>1.12&nbsp;&nbsp; 104.12&nbsp;&nbsp; 124.57<br>0.92&nbsp;&nbsp; 104.53&nbsp;&nbsp;&nbsp;&nbsp;27.68<br>0.47&nbsp;&nbsp; 101.45&nbsp;&nbsp;&nbsp;&nbsp;11.30<br>3.20&nbsp;&nbsp; 106.25&nbsp;&nbsp;&nbsp;&nbsp;61.65<br>3.95&nbsp;&nbsp; 108.38&nbsp;&nbsp;&nbsp;&nbsp;90.12<br>-0.47&nbsp;&nbsp; 102.32&nbsp;&nbsp;&nbsp;&nbsp; 9.37<br>-1.63&nbsp;&nbsp; 103.65&nbsp;&nbsp;&nbsp;&nbsp;10.96<br>-2.90&nbsp;&nbsp; 104.70&nbsp;&nbsp;&nbsp;&nbsp;37.96
<br>-2.17&nbsp;&nbsp; 106.13&nbsp;&nbsp;&nbsp;&nbsp;21.86<br>-3.88&nbsp;&nbsp; 102.33&nbsp;&nbsp;&nbsp;&nbsp; 5.71<br>-4.45&nbsp;&nbsp; 105.18&nbsp;&nbsp;&nbsp;&nbsp;28.49<br><br>Then I used stngrads.f to convert this to the binary file<br><br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;program stngrads<br>c<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;real&nbsp;&nbsp;&nbsp;&nbsp;rlat, rlon, rval, tim
<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;integer iyear, imonth, iflag, nlev, nflag, year, month<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;character outfile*72,infile*72, stid*4<br><br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;print *, 'Enter input file name: '<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;read (*,'(a)') infile<br><br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;print *, 'Enter output file name: '
<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;read (*,'(a)') outfile<br><br>c&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; size = 17*3<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;open (8, file=infile)<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;open (55,file=outfile,form='unformatted',access='sequential')<br>c&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; open c(55,file=outfile,form='unformatted',access='direct',recl=4*17*3)
<br>c&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; size = 17*4<br>c<br>C&nbsp;&nbsp;&nbsp;&nbsp; Read and Write<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;do i = 1, 17<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;READ (8, *) RLAT,RLON,RVAL<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;TIM = 0.0<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;STID = char(i+64)//'XXX'<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;NLEV = 1<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;NFLAG = 1<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;WRITE (55) STID,RLAT,RLON,TIM,NLEV,NFLAG
<br>c&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;write (*,*) STID,RLAT,RLON,TIM,NLEV,NFLAG<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;WRITE (55) RVAL<br>c&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;write (*,*) RVAL<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;enddo<br>c<br>C&nbsp;&nbsp;&nbsp;&nbsp; On end of file write last time group terminator.<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;NLEV = 0<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;write (10)
<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;WRITE (55) STID,RLAT,RLON,TIM,NLEV,NFLAG<br>close (55)<br>close (8)<br><br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;STOP<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;END<br><br>I was not able to use RECORDTYPE='STREAM' because pgf90 (fortran compiler)<br>did not recognize it so I used the 'sequential' option as suggested by some
<br>in the archive. I was able to produce the binary file (rain.out).Then I used<br>this descriptor file to create a station map:<br><br>DSET&nbsp;&nbsp;&nbsp;&nbsp;^rain.out<br>OPTIONS sequential<br>DTYPE&nbsp;&nbsp; station<br>STNMAP&nbsp;&nbsp;rain.map<br>UNDEF&nbsp;&nbsp; -
999.0<br>TITLE&nbsp;&nbsp; stations<br>TDEF&nbsp;&nbsp;&nbsp;&nbsp;1 linear jan1979 1hr<br>VARS&nbsp;&nbsp;&nbsp;&nbsp;1<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;f 0 99 data<br>ENDVARS<br><br>I've also experimented on changing the value for NLEV and NFLAG to either 1<br>or 0 (but I always use 1 because I have surface data) but still it did not
<br>work. I'm compiling it in a linux machine (redhat 7.2) using a portland<br>group compiler (pgf90).<br><br>Could somebody suggest what I should do?<br><br>Thanks very much.<br><br>Rochelle<br>San Jose State University<br>
</blockquote></div><br>