<P>
Hello,<BR>
You are doing in a wrong way<BR>
IREC=1<BR>
DO L=1,LYR<BR>
WRITE(13,REC=IREC) U<BR>
REC=REC+1<BR>
ENDDO<BR>
This should work<BR>
<BR>
Shailendra Rai<BR>
University of Allahabad<BR>
Allahabad <BR>
INDIA<BR>
----------------------------------------------------------------------<BR>
<BR>
On Tue, 21 Jun 2005 Arpita Mandal wrote :<BR>
&gt;hi<BR>
&gt;i have tried it in the same way as said by you<BR>
&gt;<BR>
&gt;<BR>
&gt;do<BR>
&gt;l=1,lyr<BR>
&gt;write(13,rec=1)u<BR>
&gt;rec=rec+1<BR>
&gt;enddo<BR>
&gt;<BR>
&gt;but still i am not getting the right data. i am not&nbsp; getting contours -20<BR>
&gt;to 60, instead i am getting 300 to 1000 interval 100<BR>
&gt;please suggest help<BR>
&gt;arpita<BR>

</P>
<br><br>
<A target="_blank" HREF="http://clients.rediff.com/signature/track_sig.asp"><IMG SRC="http://ads.rediff.com/RealMedia/ads/adstream_nx.cgi/www.rediffmail.com/inbox.htm@Bottom" BORDER=0 VSPACE=0 HSPACE=0></a>