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