<html>
<head>
<style>
.hmmessage P
{
margin:0px;
padding:0px
}
body.hmmessage
{
FONT-SIZE: 10pt;
FONT-FAMILY:Tahoma
}
</style>
</head>
<body class='hmmessage'>
Dear Dai,<BR>
&nbsp;<BR>
If you want to plot contour using station data, you need to&nbsp;open a empty grid file and &nbsp;interpolate to the grid first.&nbsp;&nbsp; It seemed that you missed something.<BR>
&nbsp;<BR>
Here are a sample<BR>
&nbsp;<BR>
'open grid.ctl'<BR>'open stn.ctl'<BR>
........<BR>
&nbsp;<BR>
'define a=oacres(g,prep.2,4)'<BR>
'd a'<BR>
&nbsp;<BR>
&nbsp;<BR>
Hope help.<BR>
&nbsp;<BR>
&nbsp;<BR>

<HR>
Date: Tue, 22 Jan 2008 18:00:00 -0700<BR>From: qdai@MATH.UALBERTA.CA<BR>Subject: Re: [GrADS] How to plot stations climatology contour in a map?<BR>To: GRADSUSR@LIST.CINECA.IT<BR><BR>
<META content="Microsoft SafeHTML" name=Generator><BR>
<BLOCKQUOTE>
<FONT size=2>Dear Jayakrishnan,</FONT><BR>
<FONT size=2>In order to plot the station climatology <STRONG>contour</STRONG>, I used the C++ program, ctl file and gs file similar to yours. But it is still not working. The attachment is my TXT file (station ID, latitude, longitude, climatology), format is "A7, F6.2 F8.2, F8.1". So could you please use my TXT data&nbsp;file and your C++ program, ctl file and gs file to test again?? Thanks a lot.</FONT><BR>
<FONT size=2>Best,</FONT><BR>
<FONT size=2>Qingfang</FONT><BR>
<FONT size=2></FONT><BR>
<FONT size=2><B>On Tue, 22 Jan 2008 12:21:51 +0530, Jayakrishnan PR wrote</B> <BR>&gt; Dear Qingfang Dai, <BR>&gt; &nbsp;&nbsp;&nbsp; I have followed the same method as given by you in plotting station data and was successful in plotting the shaded plots of the required value. I herewith attaches the ctl file which I used and the c program. The program looks almost same with some modifications. May be you can compare it with your purposes because It is working well for me. <BR>&gt; &nbsp; <BR>&gt; I have two suggestions....One is that it is better to create station map from out side the gs file and incorperate it in the ctl file. Next suggestion is that before running in the gs file kindly try the procedures in the command terminal. That will be better to know where the error has occured. <BR>&gt; Hope this helps......best wishes.... <BR>&gt; &nbsp; <BR>&gt; &nbsp; <BR>&gt; <BR>&gt; &nbsp; <BR>&gt; <SPAN class=EC_gmail_quote>On 1/22/08, <B class=EC_gmail_sendername>Qingfang D
 ai</B> &lt;<A href="mailto:qdai@math.ualberta.ca">qdai@math.ualberta.ca</A>&gt; wrote:</SPAN> </FONT><BR>
<BLOCKQUOTE class=EC_gmail_quote style="PADDING-LEFT: 1ex; BORDER-LEFT: #ccc 1px solid"><BR>&gt; <FONT size=2><BR>&gt; <FONT face=verdana,arial,helvetica,sans-serif size=2>Dear GrADS Users,</FONT> <BR>&gt; <FONT face=verdana,arial,helvetica,sans-serif size=2>I want to plot the stations' climatology contour. My&nbsp;TXT data file is the format of (stnid, lat, lon, climatology value). So I did as followings but it doesn't work. I don't how I shuld do. </FONT><BR>&gt; <FONT face=verdana,arial,helvetica,sans-serif size=2><STRONG>First, I used the following C++ program to write the TXT file into DAT file:</STRONG></FONT> <BR>&gt; #include "stdafx.h" <BR>&gt; #include &lt;stdio.h&gt; <BR>&gt; int main(int argc, char* argv[]) <BR>&gt; { <BR>&gt; &nbsp; /* Structure that describes a report header in a stn file */ <BR>&gt; &nbsp; struct rpthdr <BR>&gt; &nbsp; { <BR>&gt; &nbsp;&nbsp;&nbsp; char&nbsp; id[8];&nbsp;&nbsp; &nbsp; /* Station ID */ <BR>&gt; &nbsp;&nbsp;&nbsp; float lat;&nbsp
 ;&nbsp;&nbsp;&nbsp; &nbsp; /* Latitude of Station */ <BR>&gt; &nbsp;&nbsp;&nbsp; float lon;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; /* Longitude of Station */ <BR>&gt; &nbsp;&nbsp;&nbsp; float t;&nbsp;&nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp; /* Time in grid-relative units */ <BR>&gt; &nbsp;&nbsp;&nbsp; int&nbsp;&nbsp; nlev;&nbsp;&nbsp;&nbsp;&nbsp; /* Number of levels following */ <BR>&gt; &nbsp;&nbsp;&nbsp; int&nbsp;&nbsp; flag;&nbsp;&nbsp;&nbsp;&nbsp; /* Level independent var set flag */ <BR>&gt; &nbsp; } hdr; <BR>&gt; &nbsp; FILE&nbsp; *ifile, *ofile; <BR>&gt; &nbsp; char&nbsp; rec[80]; <BR>&gt; &nbsp; //int&nbsp;&nbsp; flag,year,month,yrsav,mnsav; <BR>&gt; &nbsp; int&nbsp;&nbsp; i; <BR>&gt; &nbsp; float val; <BR>&gt; /* Open files */ <BR>&gt; &nbsp; ifile = fopen ("clim.txt","r");&nbsp; <BR>&gt; &nbsp; ofile = fopen ("clim.dat","wb");&nbsp; <BR>&gt; &nbsp;&nbsp; if (ifile==NULL || ofile==NULL) { <BR>&gt; &nbsp;&nbsp;&nbsp; printf("Error opening files\n"); <BR>&gt; &nbsp;&nbsp;&nbsp; r
 eturn 1; <BR>&gt; &nbsp; } <BR>&gt; /* Read, write loop */ <BR>&gt; &nbsp; val = 0.0;&nbsp; <BR>&gt; &nbsp; while (fgets(rec,79,ifile)!=NULL) {&nbsp;&nbsp;&nbsp; <BR>&gt; &nbsp;&nbsp;&nbsp; /* Format conversion */&nbsp; <BR>&gt; &nbsp;&nbsp;sscanf (rec+8," %g %g %g",&amp;hdr.lat,&amp;hdr.lon,&amp;val);&nbsp; <BR>&gt; &nbsp;&nbsp;&nbsp; for (i=0; i&lt;8; i++) hdr.id[i] = rec[i]; <BR>&gt; &nbsp;&nbsp;&nbsp; /* Write this report */ <BR>&gt; &nbsp;&nbsp;&nbsp; hdr.nlev = 1; <BR>&gt; &nbsp;&nbsp;&nbsp; hdr.flag = 1; <BR>&gt; &nbsp;&nbsp;&nbsp; hdr.t = 0.0; <BR>&gt; &nbsp;&nbsp;&nbsp; fwrite (&amp;hdr,sizeof(struct rpthdr), 1, ofile); <BR>&gt; &nbsp;&nbsp;&nbsp; fwrite (&amp;val,sizeof(float), 1, ofile); <BR>&gt; &nbsp; } <BR>&gt; &nbsp; /* Time group terminator */ <BR>&gt; &nbsp; hdr.nlev = 0; <BR>&gt; &nbsp; fwrite (&amp;hdr,sizeof(struct rpthdr), 1, ofile); <BR>&gt; &nbsp; fclose(ifile); <BR>&gt; &nbsp; fclose(ofile); <BR>&gt; &nbsp; return 0; <BR>&gt; } <BR>&gt; <BR>&gt; <STRO
 NG>Second, I write the ctl file&nbsp;'clim.ctl'&nbsp; as</STRONG> <BR>&gt; DSET ^clim.dat <BR>&gt; DTYPE&nbsp; station <BR>&gt; STNMAP ^clim.map <BR>&gt; UNDEF -999.9 <BR>&gt; TITLE 61-90 climatology <BR>&gt; TDEF&nbsp; 1 LINEAR Jan1960 1mo <BR>&gt; VARS&nbsp; 1 <BR>&gt; prep&nbsp;&nbsp;1&nbsp; 99&nbsp; &nbsp;precipitation climatology&nbsp;of station <BR>&gt; ENDVARS <BR>&gt; <STRONG>Finally, I write the&nbsp;gs file&nbsp;'<A href="http://clim.gs/" target=_blank>clim.gs</A>'&nbsp; as</STRONG> <BR>&gt; '!stnmap -i ../stnmap/AB_elev.ctl' <BR>&gt; 'reinit' <BR>&gt; 'open ../stnmap/AB_elev.ctl' <BR>&gt; 'set gxout contour' <BR>&gt; 'set grads off' <BR>&gt; 'set mproj nps' <BR>&gt; 'set grid off' <BR>&gt; 'set frame off' <BR>&gt; 'set cstyle 3' <BR>&gt; 'set csmooth off' <BR>&gt; 'set t 1 1' <BR>&gt; 'd prep' <BR>&gt; 'set font 1' <BR>&gt; 'set string 1 tc 3' <BR>&gt; 'set strsiz 0.15 0.15' <BR>&gt; 'draw title 1961-1990 Climatology in January' <BR>&gt; 'printim ../Clim.gif gif w
 hite' <BR>&gt; Thanks. <BR>&gt; Qingfang <BR>&gt; </FONT></BLOCKQUOTE><BR>&gt; <BR clear=all>Sincerely <BR>&gt; -- <BR>&gt; *********************************************** <BR>&gt; Jayakrishnan.P.R <BR>&gt; Junior Research Fellow <BR>&gt; Department of Atmospheric Sciences <BR>&gt; Cochin University of Science And Technology (CUSAT), Cochin-16 <BR>&gt; Kerala, India. <BR>&gt; Mob: 09895417565 <BR>&gt; <BR>&gt; *********************************************** <BR><BR><BR>-- <BR>Department of Math and Stat Sciences (<A href="http://www.math.ualberta.ca/" target=_blank>http://www.math.ualberta.ca</A>) <BR><BR></BLOCKQUOTE><br /><hr />Express yourself instantly with MSN Messenger! <a href='http://clk.atdmt.com/AVE/go/onm00200471ave/direct/01/' target='_new'>MSN Messenger</a></body>
</html>