how to make time dependence of new var?
Gavr Alexander
gavr at SAIL.MSK.RU
Wed Jun 28 18:19:29 EDT 2006
Hello everybody!
I have a very simple question:
the script below produce "diff" parameter, which varies it time only.
How can I plot it out?
Because now it produce just the last constant of calculation, but I
need to see the curve (xO - time; yO - value).
Thanx in advance!
'q file'
tmp = sublin(result,5)
tmax=subwrd(tmp,12)
t=1
while(t<=tmax)
'set t 't
'd nceplat'
nceplat=subwrd(result,4)
'd nceplon'
nceplon=subwrd(result,4)
'd wrflat'
wrflat=subwrd(result,4)
'd wrflon'
wrflon=subwrd(result,4)
clat=(nceplat+wrflat)/2
tmp01=nceplat-wrflat
tmp02=nceplon-wrflon
tmp03=math_cos(clat*3.14/180)
tmp04=math_pow(tmp01*tmp03*111,2)+math_pow(tmp02*tmp03*111,2)
# HERE IM PRODUCING THE FINAL VARIABLE:
'diff='math_sqrt(tmp04)
t=t+1
endwhile
More information about the gradsusr
mailing list