<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META content=text/html;charset=iso-8859-1 http-equiv=Content-Type>
<META name=GENERATOR content="MSHTML 8.00.6001.18813"></HEAD>
<BODY style="PADDING-LEFT: 10px; PADDING-RIGHT: 10px; PADDING-TOP: 15px"
id=MailContainerBody leftMargin=0 topMargin=0 CanvasTabStop="true"
name="Compose message area">
<DIV><FONT face=Calibri>Try this :</FONT></DIV>
<DIV><FONT face=Calibri></FONT> </DIV>
<DIV><FONT face=Calibri>in the 'while' loop,</FONT></DIV>
<DIV><FONT face=Calibri>------------------------------------------</FONT></DIV>
<DIV><FONT face=Calibri>while ( to<5 )</FONT></DIV>
<DIV><FONT face=Calibri> 'set t 'to</FONT></DIV>
<DIV><FONT face=Calibri> tmp=''</FONT></DIV>
<DIV><FONT face=Calibri> 'd var1' ; tmp=subwrd(result,4)</FONT></DIV>
<DIV><FONT face=Calibri> 'd var2' ; tmp=tmp%'
'subwrd(result,4)</FONT></DIV>
<DIV><FONT face=Calibri> 'd var3' ; tmp=tmp%'
'subwrd(result,4)</FONT></DIV>
<DIV><FONT face=Calibri> 'd var4' ; tmp=tmp%'
'subwrd(result,4)</FONT></DIV>
<DIV><FONT face=Calibri> rrc =
write('c:\prueba_c\pruebas_archivo_ecmwf\ereda_ecmwf_t.txt',tmp)<BR> to =
to + 1<BR>endwhile</FONT></DIV>
<DIV style="FONT: 10pt Tahoma"><FONT size=3
face=Calibri>------------------------------------------</FONT></DIV>
<DIV style="FONT: 10pt Tahoma"><FONT size=3 face=Calibri></FONT> </DIV>
<DIV style="FONT: 10pt Tahoma"><FONT size=3 face=Calibri>so that before you
write to ~.txt file, make a augmented outputs as in the script.</FONT></DIV>
<DIV style="FONT: 10pt Tahoma"><FONT size=3 face=Calibri></FONT> </DIV>
<DIV style="FONT: 10pt Tahoma"><FONT size=3 face=Calibri>here, subwrd(result,4)
is used, for the 4th word of the 'result' contains the value.</FONT></DIV>
<DIV style="FONT: 10pt Tahoma"> </DIV>
<DIV style="FONT: 10pt Tahoma"><FONT size=3 face=Calibri>Good luck,</FONT></DIV>
<DIV style="FONT: 10pt Tahoma"><FONT size=3 face=Calibri>Kim,
WonMoo</FONT></DIV>
<DIV style="FONT: 10pt Tahoma"><FONT size=3 face=Calibri></FONT> </DIV>
<DIV style="FONT: 10pt Tahoma">
<DIV><BR></DIV>
<DIV style="BACKGROUND: #f5f5f5">
<DIV style="font-color: black"><B>From:</B> <A
title="mailto:javier.p@EREDA.COM 링크를 따라가려면 CTRL 키를 누른 상태에서 클릭합니다."
href="mailto:javier.p@EREDA.COM">Javier Peña</A> </DIV>
<DIV><B>Sent:</B> Thursday, September 17, 2009 6:23 PM</DIV>
<DIV><B>To:</B> <A
title="mailto:GRADSUSR@LIST.CINECA.IT 링크를 따라가려면 CTRL 키를 누른 상태에서 클릭합니다."
href="mailto:GRADSUSR@LIST.CINECA.IT">GRADSUSR@LIST.CINECA.IT</A> </DIV>
<DIV><B>Subject:</B> Help</DIV></DIV></DIV>
<DIV><BR></DIV>
<P>We have some data in a netcdf file (u velocity, v velocity,
geopetential,ect) to some dates and some points of a grid.<BR>Now, we extract
each variable in a file with following script:<BR>For example to extract the
temperature:<BR> <BR>'reinit'<BR>'sdfopen ereda'<BR>'set lat 41'<BR>'set
lon 359'<BR>'set lev 1'<BR>to = 1<BR>* Write the variable to a file<BR>*'set
gxout vector'<BR>*'set fwrite z:\dummy.dat'<BR>while (to<5)<BR>'set t
'to<BR>'d t'<BR>rrc =
write('c:\prueba_c\pruebas_archivo_ecmwf\ereda_ecmwf_t.txt',result)<BR>to = to +
1<BR>endwhile</P>
<DIV>We'd like to extract all variables in a same file and the variables are in
differents columns. </DIV>
<DIV>Are there any script to do this?<BR clear=all></DIV>
<DIV></DIV><BR>-- <BR>Javier Peña Álvarez<BR>Energías Renovables<BR><A
href="mailto:javier.p@ereda.com"
target=_blank>javier.p@ereda.com</A><BR>EREDA<BR><BR>
Tel:
+34 91 5014755<BR>
Fax: +34 91 5014756<BR>
c/ Téllez 26, 28007
MADRID<BR>
<A
href="http://www.ereda.com/" target=_blank>www.ereda.com</A><BR></BODY></HTML>