[gradsusr] grads (wrf model) .txt output

[Antonio Ricchi]

Hello everyone.
I export the values of the WRF model .
I wrote a few lines but does not work very well.

'reinit'
'open /NMM/wrfems/runs/a/emsprd/grads/control.ctl'
'c'
'set lat 45.00'
'set lon 10.00'
'set grads off'
'set t 2'
a = t'.txt'
kt = 06
'd vvelprs(lev=700)'
linha = sublin(result,2)
vvel1 = subwrd(linha,4)
vvel2 = substr(vvel1,1,4)
if ( vvel2 = 0 ) ; vvel2 = 0.00 ; endif
write (a, 'VVEL', append)
write (a, '+'%kt%' '%vvel2, append)
'quit'



I write the value for each hour in a txt file.
I'm hoping for some suggestions
-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://gradsusr.org/pipermail/gradsusr/attachments/20100523/83f535c9/attachment-0003.html