Käyttöympäristö tekstin ja numeerisen tiedon luovaan käsittelyyn

Vino heittoliike (lentorata)

Alkutilanne (ennen aktivointia):

   1 *
   2 *Vino heittoliike (lentorata)
   3 *Alkunopeus v0=14 m/s                 Putoamiskiihtyvyys g=9.81 m/s^2
   4 *Lähtökulma A=40(5)50 astetta  (siis 40, 45 ja 50 astetta)
   5 *
   6 *Lähtökulma radiaaneina a=A/360*2*PI  PI=3.141592653589793
   7 *
   8 *GPLOT x(t)=v0*cos(a)*t,  
   9 *      y(t)=v0*sin(a)*t-g*t^2/2
  10 *
  11 *HEADER=[Swiss(50)],Vino_heittoliike_(lentorata)
  12 *t=[line_width(2)],0,20,0.1
  13 *MODE=1000,600 XDIV=100,800,100 YDIV=100,400,100 PEN=[Swiss(15)]
  14 *WSIZE=WY,0.6*WY WHOME=WX-WY,0
  15 *XSCALE=0(1)20 YSCALE=0(1)10 GRID=1,1            OUTFILE=RATA
  16 *

Aktivointi synnyttää kuvan:

 Edellinen | Seuraava