integration

[Michelle Simoes Reboita]

Dear all,

When I programe the expression below the values don't atualize in level z.
What do I do?

sig=[(R/Cp * T/p) - dT/dp]

'set t 22 30'
'define cp=1004'
'define R=287'

z=1
while(z<=nivel)
'define dt=tpbb(z='z')-tpbb(z='z-1')'
'define dp=(lev(z='z')-lev(z='z-1'))*100'
'define dtdp=dt/dp'
'define sig=9.8*(R/cp*(tpbb(z='z')/(lev(z='z')*100))-(dtdp(z='z')))'
z=z+1
endwhile


Michelle


******************************************************
*Michelle Simões Reboita                             *
*Departamento de Ciências Atmosféricas - USP/IAG/ACA *
*Universidade de Sao Paulo                           *
*Rua do Matão, 1226 - CEP 05508900                   *
*Fone: 11 30912836                                   *
******************************************************