trend and r2

[diego]

I all :
I have 1825 daily files, of u,v components of wind
data.  I want to find the anomalies  daily (value -
average value); but the program does not work.

anio = 2001
t1 = 1
t2 = 365

****************
'open ../temp.ctl'
'q file'
var1 = ug
var2 = vg
'disable fwrite'
'set gxout fwrite'
'set fwrite  'anio'_rms.bin'

'define promu= ave('var1',t='t1',t='t2')'
'define promv= ave('var2',t='t1',t='t2')'
'define promtot= mag('promu'*0.00156,'promv'*0.00156)'
'define mmaa= 0.00156*mag('var1','var2')'
'd 'mmaa'-'promtot''
*'d hcurl('var1'*0.00156,'var2'*0.00156)'
'disable fwrite'


Thankyou in advance



______________________________________________
LLama Gratis a cualquier PC del Mundo.
Llamadas a fijos y móviles desde 1 céntimo por minuto.
http://es.voice.yahoo.com