program main
     call init
        call viewport(0.1, 0.1, 0.5, 0.5)
        call xyworld(-1.0, -0.2, 1.0, 1.8)
        call arrow(-1.0, 0.0, 1.0, 0.0, 0.05, 0.0, 1.5)
        call arrow(0.0, -0.2, 0.0, 1.8, 0.05, 0.0, 1.5)
        call parabola(-0.8, 1.5, 0.0, 0.0, 0.8, 1.5 , 0.0, 2.0,1)
        call setchar(1, 20)
        call text(0.95,-0.2, 1,'x')
        call text(-0.2, 1.75, 1,'y')
     call fin
  stop
  end