your mail

[Shailendra Rai]

Hello,
You are doing in a wrong way
IREC=1
DO L=1,LYR
WRITE(13,REC=IREC) U
REC=REC+1
ENDDO
This should work

Shailendra Rai
University of Allahabad
Allahabad 
INDIA
----------------------------------------------------------------------

On Tue, 21 Jun 2005 Arpita Mandal wrote :
>hi
>i have tried it in the same way as said by you
>
>
>do
>l=1,lyr
>write(13,rec=1)u
>rec=rec+1
>enddo
>
>but still i am not getting the right data. i am not  getting contours -20
>to 60, instead i am getting 300 to 1000 interval 100
>please suggest help
>arpita
-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://gradsusr.org/pipermail/gradsusr/attachments/20050622/7915d761/attachment.html