<html dir="ltr"><head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<meta name="GENERATOR" content="MSHTML 8.00.7600.16535">
<style id="owaTempEditStyle"></style><style title="owaParaStyle"><!--P {
MARGIN-TOP: 0px; MARGIN-BOTTOM: 0px
}
--></style>
</head>
<body ocsi="x">
<div style="FONT-FAMILY: Tahoma; DIRECTION: ltr; COLOR: #000000; FONT-SIZE: 13px">
<div></div>
<div dir="ltr"><font color="#000000" size="2" face="Tahoma">Bob,</font></div>
<div dir="ltr"><font size="2" face="tahoma"></font> </div>
<div dir="ltr"><font size="2" face="tahoma">Use a ftp client and go to <a href="ftp://ftp.cpc.ncep.noaa.gov/">ftp.cpc.ncep.noaa.gov</a><a></a> and then into the wd52dg<a></a>/snow directory.
</font></div>
<div dir="ltr"><font size="2" face="tahoma"></font> </div>
<div dir="ltr"><font size="2" face="tahoma">There is a wkly_89x89<a></a> directory. Download wk2010<a></a>.</font></div>
<div dir="ltr"><font size="2" face="tahoma"></font> </div>
<div dir="ltr"><font size="2" face="tahoma">There is a progs<a></a> directory and the readsnow.f<a></a> file. Download readsnow.f<a></a> file. Uncomment the open(unit=93 line and edit it to read the file wk2010<a></a> in your local path. Edit the open(unit=95
line to save the output file of a name of your choosing. Compile the application using 'gfortran<a></a> -o readsnow<a></a> readsnow.f<a></a>'. Run it './readsnow<a></a>'</font></div>
<div dir="ltr"><font size="2" face="tahoma"></font> </div>
<div dir="ltr"><font size="2" face="tahoma">
<div dir="ltr"><font size="2" face="tahoma">There is a grads_snw<a></a> directory and a control file. Download plt_snw.ctl<a></a> and edit the top line to be the same name as your output file from unit-95 above.</font></div>
<div dir="ltr"><font face="tahoma"></font> </div>
<div dir="ltr"><font face="tahoma">grads -l</font></div>
<div dir="ltr"><font face="tahoma">open plt_snw.ctl<a></a></font></div>
<div dir="ltr"><font face="tahoma">d snow</font></div>
<div dir="ltr"><font face="tahoma"></font> </div>
<div dir="ltr"><font face="tahoma">If any of this makes no sense you need to take some basic IT and programming courses.
</font></div>
<div dir="ltr"><font face="tahoma"></font> </div>
<div dir="ltr"><font face="tahoma">John Huddleston, PhD, PE</font></div>
<div dir="ltr"><font size="2" face="tahoma"></font> </div>
</font></div>
<div style="DIRECTION: ltr" id="divRpF992463">
<hr tabindex="-1">
<font color="#000000" size="2" face="Tahoma"><b>From:</b> gradsusr-bounces@gradsusr.org [gradsusr-bounces@gradsusr.org] On Behalf Of bob duker [dukerbob@gmail.com]<br>
<b>Sent:</b> Tuesday, May 04, 2010 11:08 PM<br>
<b>To:</b> gradsusr@gradsusr.org<br>
<b>Subject:</b> [gradsusr] Help new to grads<br>
</font><br>
</div>
<div></div>
<div>
<p>Hello All,<br>
I'm doing snow Research and looking for a program to covert the climate prediction center (CPC) Northern Hemosphere raw weekly snow data (in 1's and 0's) into a useable number. I don't have much coding experience or computer science background, so i'm not sure
how to covert the data myself, or what program to use. Also I don't have any fortran compiler. The CPC does covert the data into a nice table format, but they don't keep it up todate. Their website is
<a href="http://www.cpc.ncep.noaa.gov/data/snow/" target="_blank">http://www.cpc.ncep.noaa.gov/data/snow/</a>. On their website they have a link to grads.<br>
<br>
The program they give for reading weekly 89*89 snow data is<br>
<br>
PROGRAM AREA<br>
C*********************************************************************<br>
C<br>
C THIS PROGRAM SIMPLY READS IN THE SNOW DATA AND<br>
C WRITES IT OUT FOR A GIVEN YEAR.<br>
C<br>
C VARIABLES:<br>
C<br>
C ISNDAT - 89 X 89 SNOW DATA <br>
C<br>
C FILES:<br>
C<br>
C A YEAR OF WEEKLY SNOW DATA IS STORED IN A FILE WITH<br>
C THE NAMING CONVENTION:<br>
C<br>
C wk19xx xx - is the year (ex. wk1973)<br>
C<br>
C*********************************************************************</p>
<p> DIMENSION ISNDAT(89,89)<br>
CHARACTER*1 ICHAR1,ICHAR2<br>
OPEN(11,FILE='INFILE',<br>
* FORM='FORMATTED',ACCESS='SEQUENTIAL')<br>
OPEN(12,FILE='OUTFILE',<br>
* FORM='FORMATTED',ACCESS='SEQUENTIAL')<br>
DO 199 LP = 1,52<br>
C*********************************************************************<br>
C<br>
C READS IN THE WEEKLY SNOW DATA.<br>
C<br>
C*********************************************************************<br>
DO 200 I = 1,89<br>
READ(11,100,END=10) IYEARS,IWKS,IROW,ICHAR1,(ISNDAT(I,J),J=1,45)<br>
100 FORMAT (I4,2I2,A1,45I1)<br>
READ(11,101,END=10)IYEARS,IWKS,IROW,ICHAR2,(ISNDAT(I,J),J=46,89)<br>
101 FORMAT (I4,2I2,A1,44I1)<br>
C*********************************************************************<br>
C<br>
C WRITE OUT THE WEEKLY SNOW DATA.<br>
C<br>
C*********************************************************************<br>
WRITE(12,100) IYEARS,IWKS,IROW,ICHAR1,(ISNDAT(I,J),J=1,45)<br>
WRITE(12,101) IYEARS,IWKS,IROW,ICHAR2,(ISNDAT(I,J),J=46,89)<br>
200 CONTINUE<br>
READ(11,102) ICONST<br>
102 FORMAT(I4)<br>
WRITE(12,102) ICONST<br>
C<br>
199 CONTINUE<br>
10 CONTINUE<br>
999 STOP<br>
END</p>
<p>I'm using windows 7 64bit operating system. My question is how do i use grads to view the snow data or is there a fortran compiler the above program will work on that i should use instead?<br>
Thanks,<br>
Bob R Duke</p>
</div>
</div>
</body>
</html>