<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META http-equiv=Content-Type content=text/html;charset=ISO-8859-1>
<META content="MSHTML 6.00.2900.2604" name=GENERATOR>
<STYLE></STYLE>
</HEAD>
<BODY text=#003300 bgColor=#ffffff>
<DIV><FONT color=#000000>Dear Jose PEsquero,</FONT></DIV>
<DIV><FONT color=#000000></FONT>&nbsp;</DIV>
<DIV><FONT color=#000000>Thanks for your e-mail.</FONT></DIV>
<DIV><FONT color=#000000>I didnīt realize that new vars TES and TE have added, 
or appended, the lev. I would like to drwar 1-D graphics with z or lev in the 
vertical and theta-e/s in the horizontal (vertical profiles of TE and TES). In 
this case, I do not know yet how to draw such graphics with these variables (how 
can I assign for each level a different variable TExxx for the same graph?). At 
first I thought that de vars created tha way were like the lev-variables 
normally used in grads (such as air, hgt, etc.) for which you just can set fix 
x, y and t releasing z free.</FONT></DIV>
<DIV><FONT color=#000000>Thanks again for worthy help.</FONT></DIV>
<DIV><FONT color=#000000>Eduardo.</FONT></DIV>
<DIV><FONT color=#000000>(and as you see, I am not a GRADS Smart users at 
all!!!)</FONT></DIV>
<BLOCKQUOTE 
style="PADDING-RIGHT: 0px; PADDING-LEFT: 5px; MARGIN-LEFT: 5px; BORDER-LEFT: #000000 2px solid; MARGIN-RIGHT: 0px">
  <DIV style="FONT: 10pt arial">----- Original Message ----- </DIV>
  <DIV 
  style="BACKGROUND: #e4e4e4; FONT: 10pt arial; font-color: black"><B>From:</B> 
  <A title=pesquero@cptec.inpe.br href="mailto:pesquero@cptec.inpe.br">Jose 
  Fernando Pesquero</A> </DIV>
  <DIV style="FONT: 10pt arial"><B>To:</B> <A title=eduardo.agosta@gmail.com 
  href="mailto:eduardo.agosta@gmail.com">Eduardo Agosta Scarel</A> </DIV>
  <DIV style="FONT: 10pt arial"><B>Sent:</B> Thursday, April 07, 2005 1:10 
  PM</DIV>
  <DIV style="FONT: 10pt arial"><B>Subject:</B> Re: a bit more about 
  dimensions</DIV>
  <DIV><BR></DIV>Eduardo,<BR><BR>Every looping step you have a new TE and TES. 
  When i=1 you have TE1000 and TES1000 and follwing until the TE300 and TES300. 
  Out of the in the next line you can display or do other calculation with those 
  variables if you want it. Each variable has the value for that level and the 
  next one wonīt be write over this variable (will be defined a new one every 
  looping step)<BR><BR>The script seems normal, but what graphic type you are 
  looking for? (1-D, 2-D?)<BR><BR>Pesquero<BR><BR><BR><BR>
  <BLOCKQUOTE cite=mid3367a2e4050407081251449408@mail.gmail.com type="cite"><PRE wrap="">Dear Pesquero, thanks for your help, It was really great.

But I wrote the script bellow following your suggestions, I do not
know why TE'level' and TES'level do not give different results, i mean
de variables saved only last calculation I think.

Could anybody help? What do I do wrong in the script?
Thanks again (and I appreciate a lot this forum!!)

*******************************
'set lat -60 10'
'set lon -120 -30'
'set t 1 610'

'define HR=rhum.1/100'

'define Tair=air.2+273.15'

'define rm=shum.3'

***********************
i = 1
ultimonivel=8
str="1000 925 850 700 500 600 400 300"

while (i &lt;= ultimonivel)

level = subwrd(str,i)
'set lev 'level

'define airlift=1/(1/(Tair-55)-log(HR)/2840)+55'
'define A=0.2854*(1-0.28*10e-3*rm)'
'define B=3.376/airlift-0.00254'
'define C=1+0.81*10e-3*rm'
'define TE1=Tair*pow(1000/lev, A)'
'define TE2=exp(B*rm*C)'
'define TE'level'=TE1*TE2'

'define es=exp(-2937.4/Tair -4.29283*log(Tair) + 22.5518)'

'define presion=lev/10'
'define epsi=0.622'
'define rs=epsi*es/presion'

'define A=0.2854*(1-0.28*10e-3*rs)'

'define B=3.376/Tair-0.00254'
'define C=1+0.81*10e-3*rs'
'define TES1=Tair*pow(1000/lev, A)'
'define TES2=exp(B*rs*C)'
'define TES'level'=TES1*TES2'

i = i+1
endwhile


  </PRE></BLOCKQUOTE><BR></BLOCKQUOTE></BODY></HTML>