{VERSION 6 0 "IBM INTEL LINUX" "6.0" }
{USTYLETAB {CSTYLE "Maple Input" -1 0 "Courier" 0 1 255 0 0 1 0 1 0 0 
1 0 0 0 0 1 }{PSTYLE "Normal" -1 0 1 {CSTYLE "" -1 -1 "" 0 1 0 0 0 0 
0 0 0 0 0 0 0 0 0 1 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }}
{SECT 0 {EXCHG {PARA 0 "" 0 "" {TEXT -1 16 "Pohyb projektilu" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 37 "eqx := m*diff(vx(t),t) + b*v
x(t) = 0;" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 43 "eqy := m*diff(
vy(t),t) + b*vy(t) + m*g = 0;" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 
0 79 "sol := dsolve(\{eqx, eqy, vx(0)=v0x, vy(0)=v0y\}, \n            \+
  \{vx(t), vy(t)\});" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 14 "sim
plify(sol);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 22 "subs(sol, \{
eqx, eqy\});" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 12 "simplify(%)
;" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 12 "assign(sol);" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 6 "vx(t);" }}}{EXCHG {PARA 0 "> \+
" 0 "" {MPLTEXT 1 0 6 "vy(t);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 
0 18 "limit(vx(t), t=0);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 
"limit(vy(t), t=0);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "limi
t(vx(t), b=0);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "limit(vy(
t), b=0);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "series(vx(t), \+
t, 3);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "series(vy(t), t, \+
3);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 25 "limit(vy(t), t=infin
ity);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "assume(m>0, b>0);
" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 25 "limit(vx(t), t=infinity
);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 25 "limit(vy(t), t=infini
ty);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "b := 'b': m := 'm':
" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 25 "VX := unapply(vx(t),b,t
);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 25 "VY := unapply(vy(t),b
,t);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 36 "X := unapply(int(vx
(t),t=0..s),b,s);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 36 "Y := u
napply(int(vy(t),t=0..s),b,s);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 
1 0 29 "m:=1: g:=9.8: v0x:=0: v0y:=0;" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 54 "plot(\{limit(VY(b,t),b=0), VY(1,t), VY(10,t)\}, t=0..
1);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 74 "plot3d(VY(b,t), t=0.
.1, b=0..10,orientation=[-60,75],\n       axes=NORMAL);" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "v0x:=10: v0y:=10:" }}}{EXCHG {PARA 
0 "> " 0 "" {MPLTEXT 1 0 108 "plot(\{[limit(X(b,t),b=0), limit(Y(b,t),
b=0),t=0..2], [X(.1,t), Y(.1,t), t=0..2], [X(1,t), Y(1,t), t=0..2]\});
" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 35 "Pgrav := (b,t) -> m*g*a
bs(VY(b,t));" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 31 "Pdrag := (b
,t) -> -b*VY(b,t)^2;" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 41 "Pne
t := (b,t) -> Pgrav(b,t) + Pdrag(b,t);" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 65 "PL := (b,T) -> plot(\{Pgrav(b,t), Pdrag(b,t), Pnet(b,
t)\}, t=0..T);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 26 "m :=1: g \+
:= 9.8: v0y := 0:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 10 "PL(1,0
.5);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 8 "PL(1,5);" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "15 0 0" 0 }{VIEWOPTS 1 
1 0 1 1 1803 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }