{VERSION 6 0 "IBM INTEL LINUX" "6.0" }
{USTYLETAB {CSTYLE "Maple Input" -1 0 "Courier" 0 0 255 0 0 1 0 1 0 0 
1 0 0 0 0 1 }{CSTYLE "" 0 21 "" 0 1 0 0 0 1 0 0 0 0 2 0 0 0 0 1 }
{PSTYLE "Normal" -1 0 1 {CSTYLE "" -1 -1 "Times" 0 0 0 0 0 1 0 1 0 0 
0 0 0 0 0 1 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "Heading 1" 0 3 
1 {CSTYLE "" -1 -1 "" 1 18 0 0 0 0 0 1 0 0 0 0 0 0 0 1 }1 0 0 0 6 6 0 
0 0 0 0 0 -1 0 }{PSTYLE "Heading 2" 3 4 1 {CSTYLE "" -1 -1 "" 1 14 0 
0 0 0 0 0 0 0 0 0 0 0 0 1 }0 0 0 -1 4 4 0 0 0 0 0 0 -1 0 }{PSTYLE "Hea
ding 3" 4 5 1 {CSTYLE "" -1 -1 "" 1 13 0 0 0 0 0 1 0 0 0 0 0 0 0 1 }0 
0 0 -1 0 0 0 0 0 0 0 0 -1 0 }{PSTYLE "Title" 0 18 1 {CSTYLE "" -1 -1 "
" 1 24 0 0 0 0 0 1 1 0 0 0 0 0 0 1 }3 0 0 -1 12 12 0 0 0 0 0 0 19 0 }
{PSTYLE "R3 Font 0" -1 256 1 {CSTYLE "" -1 -1 "Courier" 1 11 255 0 0 
1 2 1 2 0 0 0 0 0 0 1 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "R3 Fo
nt 2" -1 257 1 {CSTYLE "" -1 -1 "Courier" 1 11 0 0 0 1 1 1 2 0 0 0 0 
0 0 1 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "newpage" -1 258 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 1 0 -1 0 }{PSTYLE "R3 Font 0" -1 259 1 {CSTYLE "" -1 -1 "Courier
" 1 12 255 0 0 1 2 1 2 0 0 0 0 0 0 1 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 
}}
{SECT 0 {PARA 18 "" 0 "" {TEXT -1 17 "Maple V Release 4" }}{SECT 1 
{PARA 3 "" 0 "" {TEXT -1 16 "Uzitecn\351 pr\355kazy" }}{SECT 1 {PARA 
4 "" 0 "" {TEXT -1 17 "Glob\341ln\355 promenn\351" }}{PARA 0 "" 0 "" 
{TEXT -1 69 "  Pouz\355vaj\355 se pro syst\351mov\341 nastaven\355 a p
reddefinovan\351 konstanty.   " }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 
0 10 "Digits; \n\n" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 7 "Order;
\n" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 26 "Digits := 20; \nevalf
(Pi);\n" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 33 "Order:=10;\nseri
es(exp(x)/x,x=0);\n" }}}{PARA 0 "" 0 "" {TEXT -1 32 "Pozor pri numeric
k\375ch v\375poctech!" }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 21 "Dig
its:=10: Order:=6:" }}}}{SECT 1 {PARA 4 "" 0 "" {TEXT -1 12 "Prejmenov
\341n\355" }}{PARA 0 "" 0 "" {TEXT -1 76 "Vyuzijeme ke zkr\341cen\355 \+
jiz existuj\355c\355ch funkc\355 nebo zaveden\355 nov\375ch konstant.
" }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 33 "f:= sin(x) + sin(x)^2 + \+
sin(x)^3;" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "alias(S = sin(
x));" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 2 "f;" }}}{EXCHG {PARA 
0 "> " 0 "" {MPLTEXT 1 0 20 "alias(S = S);\nf; S;\n" }}}{EXCHG {PARA 
0 "> " 0 "" {MPLTEXT 1 0 26 "alias(Luda=Pi, E=exp(1));\n" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 10 "Luda^2, E;" }}}{EXCHG {PARA 0 "> " 
0 "" {MPLTEXT 1 0 9 "evalf(%);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 
1 0 21 "alias(Luda=Luda,E=E):" }}}}{SECT 1 {PARA 4 "" 0 "" {TEXT -1 
16 "Podm\355nen\375 pr\355kaz" }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 
0 56 "x:='x':\nfunkce:= x -> if x>=0 then 2 else x^2 - 1   fi;\n" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 35 "funkce(1),  funkce(0),  funk
ce(-5);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "plot(funkce,-2..
2);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 86 "### WARNING: persist
ent store makes one-argument readlib obsolete\nreadlib(piecewise):\n" 
}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 46 "p:=piecewise(x<0, -1, x>1
, -(x-2)^4 + 2, x^2);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 45 "pl
ot(p,x=-2..3.4, discont=true, thickness=2);" }}}{EXCHG {PARA 0 "> " 0 
"" {MPLTEXT 1 0 11 "int(p, x);\n" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 12 "diff(p, x);\n" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 
1 0 21 "simplify(p*(x-1)*2);\n" }}}}{SECT 1 {PARA 4 "" 0 "" {TEXT -1 
10 "Substituce" }}{PARA 0 "" 0 "" {TEXT -1 47 "N\341hrada c\341sti v
\375razu jin\375m v\375razem nebo c\355slem." }}{EXCHG {PARA 0 "> " 0 
"" {MPLTEXT 1 0 55 "unassign('x','y','z','a','b'):\nf:= x^2 + y^2 + z \+
;    \n" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 26 "subs( x=1, y=5, \+
z=-1, f);\n" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 12 "f;\nx, y, z;
\n" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "subs(x=(a + b), f);" 
}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "subs(x=y, y=z, f);\n" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "subs( y=z,  x=y, f);" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "subs(\{x=y, y=z\}, f);" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{PARA 0 "" 0 "" {TEXT 
-1 0 "" }}}{SECT 1 {PARA 4 "" 0 "" {TEXT -1 23 "Skl\341d\341n\355 funk
c\355        " }}{PARA 0 "" 0 "" {TEXT -1 35 "(f@g)(x) = ( f o g )(x) \+
= f( g(x) )" }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 30 "f:= x -> x^3;
\ng:= x -> x + 1;\n" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 11 "( f@
g )(x);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 20 " g@f ;    (g@f)(
x);\n" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 11 "(f@@3)(x);\n" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 10 "(g@@4)(x);" }}}{EXCHG {PARA 
0 "> " 0 "" {MPLTEXT 1 0 10 "(D@@2)(f);" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 13 "(D@@2)(f)(2);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 
1 0 29 "(sin@arcsin)(x);\nsin@arcsin;\n" }}}}{SECT 1 {PARA 4 "" 0 "" 
{TEXT -1 5 "Tisk " }}{PARA 0 "" 0 "" {TEXT -1 66 "Zobrazen\355 hodnot \+
a v\375razu. Vhodn\351 pro zobrazen\355 v\375sledku procedur." }}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 29 "a:= 1/2;\nb:= ( a + x)^2 / x
;\n" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "print(a, b, a - 3);
\n" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 14 "a, b, a-3, a;\n" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 21 "lprint(a, b, a - 3);\n" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 39 "lprint( ` a m\341 prirazenu \+
hodnotu `, a);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 38 "print( ` \+
a m\341 prirazenu hodnotu `, a);" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 6 "x:= 5;" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 14 "p
rint(x, 'x');" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "lprint(x, \+
'x');" }}}}{SECT 1 {PARA 4 "" 0 "" {TEXT -1 15 "Tabelace funkce" }}
{PARA 0 "" 0 "" {TEXT -1 87 "Tabelace funkce na seznamu, aplikace funk
ce 'po c\341stech' na jednotliv\351 operandy v\375razu." }}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 52 "x:='x':\nseznam:= [ -1, 2, 3, -4];
\nf:= x -> x^2 - 1;\n" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "ma
p(abs, seznam);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "map(f, s
eznam);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 32 "vyraz:= 1 + ln(3
) + exp(2) + x;\n" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "map(si
n, vyraz);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 14 "map(f, vyraz)
;" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 43 "seznam1:= seznam;\nsez
nam2:= [ 5, 6, 7, 8];\n" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "
f:= (x, y) -> x*y;" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 25 "zip(f
, seznam1, seznam2);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 30 "sez
nam1:= [1, 2, 3, 4, 5, 6];\n" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 
0 28 "zip(f, seznam1, seznam2,Pi);" }}}}{SECT 1 {PARA 4 "" 0 "" {TEXT 
-1 26 "Rozlozen\355 v\375razu (na kusy)" }}{PARA 0 "" 0 "" {TEXT -1 
39 "S nekter\375mi pr\355kazy jsme se uz setkali." }}{PARA 0 "" 0 "" 
{TEXT -1 69 "op(v\375raz);   op(n, vyraz);        operandy,   n-t\375 \+
 operand          " }}{PARA 0 "" 0 "" {TEXT -1 57 "nops(v\375raz);    \+
                        Number of OPeradS" }}{PARA 0 "" 0 "" {TEXT -1 
63 "subsop(index = prepis, v\375raz);    prepis prvku seznamu, mnoziny
" }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 37 "unassign('a','b','c'):\n
f:= a + b +c;\n" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 6 "op(f);" }
}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 9 "op(2, f);" }}}{EXCHG {PARA 
0 "> " 0 "" {MPLTEXT 1 0 8 "op(0,f);" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 8 "nops(f);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 
"subsop(2 = x, f);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 26 "f:= x
 + 2*y + sin(3*z^2);\n" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "n
ops( op(3, f));" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "op( 0, o
p(3, f));" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "op( 1, op(3, f
));" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "op( 2, op(3, f));" }
}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 40 "seznam3:= [ op(seznam1), o
p(seznam2) ];\n" }}}}{SECT 1 {PARA 4 "" 0 "" {TEXT -1 16 "Uzivatelsk
\351 typy" }}{EXCHG {PARA 0 "" 0 "" {TEXT -1 2 "  " }{MPLTEXT 1 0 50 "
whattype(3);                                #c\355slo" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 49 "whattype(3/2);                     \+
        #c\355slo" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 49 "whatty
pe(3.);                              #c\355slo" }}}{EXCHG {PARA 0 "> \+
" 0 "" {MPLTEXT 1 0 51 "whattype(`text`);                          #re
tezec" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 56 "whattype(a[i]);   \+
                         #index. prom." }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 50 "whattype(a * b);                           #soucin" }
}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 50 "whattype(sin(x));         \+
                 #funkce" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 53 
"whattype((a,b) -> sin(a)*sin(b));          #procedura" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 50 "whattype(1..11);                   \+
        #rozsah" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 48 "whattype
(array( [ [1, 0], [0, 1] ]));      #pole" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 51 "whattype(a or b);                          #boolean" 
}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 60 "whattype(a = b - c);     \+
                  #rovnost (relace)" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 53 "whattype(a < b - c);                       #nerovnost
" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 62 "whattype(1, a, b, c);  \+
                    #posloupnost v\375razu" }}}{EXCHG {PARA 0 "> " 0 "
" {MPLTEXT 1 0 50 "whattype([a, b, c]);                       #seznam
" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 51 "whattype(\{a, b, c\}); \+
                      #mnozina" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 
1 0 46 "type( \{a, b, c\}, set );\ntype( 3.5, integer );\n" }}}}{SECT 
1 {PARA 4 "" 0 "" {TEXT -1 11 "Predpoklady" }}{EXCHG {PARA 0 "> " 0 "
" {MPLTEXT 1 0 108 "assume(no1, real); \nassume(no2, complex); \nassum
e(no>0); \nassume(small, RealRange(0,1));\nassume(r<1, r>-1);\n" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 27 "no1, no2, no, small, r, rr;
" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 14 "about(no1, r);" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 7 "r:='r';" }}}{EXCHG {PARA 0 ">
 " 0 "" {MPLTEXT 1 0 22 "is(small<=1);\nis(r>2);" }}}{EXCHG {PARA 0 ">
 " 0 "" {MPLTEXT 1 0 37 "assume(r>-1);\nassume(r<1);\nabout(r);\n" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 85 "unassign('x','y','n','u','v'
):\nassume(xpos>0, ypos>0, apos>0); assume(npos, posint);\n" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "v:=sqrt(1/u)-1/sqrt(u);" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 12 "simplify(v);" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 34 "assume(u, positive);\nsimplify(v);
\n" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 45 "simplify(exp(xpos)^yp
os), simplify(exp(x)^y);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 43 
"simplify(ln(xpos^ypos)) ,simplify(ln(x^y));" }}}{EXCHG {PARA 0 "> " 
0 "" {MPLTEXT 1 0 46 "simplify(ln(exp(xpos))), simplify(ln(exp(x)));" 
}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 43 "simplify(ln(xpos*ypos)), \+
simplify(ln(x*y));" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 47 "assum
e(nint, integer):\ncos(nint*Pi), cos(n*Pi);" }}}{EXCHG {PARA 0 "> " 0 
"" {MPLTEXT 1 0 38 "additionally(nint,odd);\ncos(nint*Pi);\n" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 64 "u:='u';\nxpos:='xpox': ypos:
='ypos': apos:='apos': npos:='npos':\n" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 30 "simplify(v, assume=positive);\n" }}}{PARA 0 "" 0 "" 
{TEXT -1 0 "" }}}}{SECT 1 {PARA 3 "" 0 "" {TEXT -1 13 "Resen\355 rovni
c" }}{SECT 1 {PARA 4 "" 0 "" {TEXT -1 36 "Algebraick\351 resen\355 rov
nic a nerovnic" }}{PARA 5 "" 0 "" {TEXT -1 7 "Rovnice" }}{EXCHG {PARA 
0 "> " 0 "" {MPLTEXT 1 0 31 "solve(x^3 + 216 = 0, x);      \n" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 5 "%[2];" }}}{EXCHG {PARA 0 "> \+
" 0 "" {MPLTEXT 1 0 24 "x:='x': y:='y': z:='z':\n" }}}{EXCHG {PARA 0 "
> " 0 "" {MPLTEXT 1 0 106 "rovnice:= \{ x   + 3*y - z   = 17,\n       \+
             y + z   =  5,\n            x   -   y + 2*z = 10   \};\n" 
}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "nezname:= \{x, y, z\};" }
}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 33 "reseni:= solve(rovnice, ne
zname);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 25 "assign(reseni);
\nx, y, z;\n" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 9 "rovnice;\n" 
}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 55 "unassign('x','y','z'):\np
oly:= 4*x^3 - 4*x^2 - 11*x +7;\n" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 21 "res:= solve(poly, x);" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 11 "evalf(res);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 
0 53 "x:='x':\ng:= x^7 - 2*x^6 - 4*x^5 - x^3 + x^2 +6*x +4;\n" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "res:=solve(g=0, x);" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "evalf(res[3]);\n" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 129 "### WARNING: allvalues now returns
 a list of symbolic values instead of a sequence of lists of numeric v
alues\nallvalues(res[3]);\n" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 
44 "solve( \{y^2 + 1 = x,  x  + 2 = y\}, \{x,y\}); \n" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 25 "solve( sin(x) = 1/2, x);\n" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 58 "raedlib(forget):\nforget(sol
ve):\n_EnvAllSolutions := true:\n" }}}{EXCHG {PARA 0 "" 0 "" {MPLTEXT 
0 21 26 "_EnvAllSolutions := false:" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 25 "solve( sin(x) = 1/2, x);\n" }}}{EXCHG {PARA 0 "> " 0 
"" {MPLTEXT 1 0 23 "about(indets(%,name));\n" }}}{EXCHG {PARA 0 "> " 
0 "" {MPLTEXT 1 0 35 "plot([sin(x),1/2], x=-2*Pi..3*Pi);\n" }}}{PARA 
0 "" 0 "" {TEXT -1 0 "" }}{PARA 5 "" 0 "" {TEXT -1 10 " Nerovnice" }}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 32 "solve((x-1)*(x-2)*(x-3) < 0,
 x);" }}}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 55 "eqns := exp(x)*x^2 >= 1/2;\nsolve(eqns, \{x\});\neval
f(%);\n" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 230 "with(plots, ine
qual):\ninequal( \{ x+y>0, x-y<=1,y=2\}, x=-3..3, y=-3..3,\n    option
sfeasible=(color=red),\n    optionsopen=(color=blue,thickness=2),\n   \+
 optionsclosed=(color=green, thickness=3),\n    optionsexcluded=(color
=yellow) );\n" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 28 "rov:=(x-2)
^2 / (x^2-4) = 0;\n" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 11 "solv
e(rov);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 14 "subs(x=2,rov);" 
}}}}{SECT 1 {PARA 4 "" 0 "" {TEXT -1 24 "Numerick\351 resen\355 rovnic
 " }}{PARA 0 "" 0 "" {TEXT -1 56 "Rozumejte nepresn\351 (tedy treba na
 500 desetinn\375ch m\355st)." }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "rov:= sin(x^2) = 0; " }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 12 "fsolve(rov);" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 25 "plot(sin(x^2), x= 0..10);" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 69 "fsolve(rov, x = 0..1);\nfsol
ve(rov, x = 1..2);\nfsolve(rov, x = 2..3);\n" }}}{EXCHG {PARA 0 "> " 
0 "" {MPLTEXT 1 0 104 "rov1:= sin(x*y) + cos(x*z) = 0:\nrov2:= x + y +
 z = 1:\nrov3:= x - y = 5:\nsoustava:= \{ rov1, rov2, rov3\};\n" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 29 "fsolve( soustava, \{x, y, z
\});" }}}{PARA 0 "" 0 "" {TEXT -1 33 "Dals\355 paramatry pr\355kazu vi
z Help." }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 167 "### WARNING: persistent store makes one-argument rea
dlib obsolete\nreadlib(realroot):\n### WARNING: persistent store makes
 one-argument readlib obsolete\nreadlib(sturm):\n" }}}{EXCHG {PARA 0 "
> " 0 "" {MPLTEXT 1 0 35 "pol:=x^7-2*x^6-4*x^5-x^3+x^2+6*x+4;" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 36 "sturm(pol, x, -infinity, inf
inity);\n" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "realroot(pol);
\n" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 28 "plot(pol, x=-2..5, -1
0..10);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 25 "fsolve(pol, x, c
omplex);\n" }}}}{SECT 1 {PARA 4 "" 0 "" {TEXT -1 29 "Resen\355 diferen
ci\341ln\355ch rovnic" }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "x:=
'x': y:='y':" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 42 "difrov1:= d
iff(y(x), x) * x^2 + y(x) = 0;\n" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 22 "dsolve(difrov1, y(x));" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 35 "dsolve(\{difrov1, y(1) = a\}, y(x));\n" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 72 "difrov2:= (D@@2)(y)(x) - y(x) = exp
(x);\npocpod:= D(y)(0) = -1, y(0)= 1;\n" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 23 "dsolve(difrov2, y(x));\n" }}}{EXCHG {PARA 0 "> " 0 "
" {MPLTEXT 1 0 46 "dsolve(\{difrov2, pocpod\}, y(x)); \nys:=rhs(%):\n
" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 49 "dsolve(\{difrov2, pocpo
d\}, y(x), method=laplace);\n" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 
0 55 "numres:=dsolve(\{difrov2, pocpod\}, y(x), type=numeric);\n" }}}
{PARA 0 "" 0 "" {TEXT -1 91 "V\375sledek je ve tvaru procedury (funkce
), muzeme spoc\355tat funkcn\355 hodnotu v libovoln\351m bode." }}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 21 "numres(0); numres(1);" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 29 "yn:=x->rhs(op(2,numres(x)));
\n" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 7 "yn(1);\n" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 46 "dsolve(\{difrov2, pocpod\}, y(x), t
ype=series);\n" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 28 "yr:=conve
rt(rhs(%),polynom);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "dyr:
=diff(yr, x);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 66 "op(subs(x=
0,[x,yr,dyr]));\nx:=1: x, evalf(yr), evalf(dyr);\nx:='x':\n" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 46 "plot(\{unapply(ys,x),yn,unap
ply(yr,x)\}, 0..5);\n" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }
}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 99 "### WARNING: persistent st
ore makes one-argument readlib obsolete\nreadlib(isolate):\nalias(y=y(
x)):\n" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 33 "difrov1:=x*diff(y
,x)=y*ln(x*y)-y;" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "dsolve(
difrov1, y);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 13 "isolate(%,y
);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 35 "dsolve(difrov1, y, ex
plicit=true);\n" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 11 "expand(%
);\n" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "subs(_C1=1/C,%);\n
" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 26 "testeq(subs(%, difrov1)
);\n" }}}}}{SECT 1 {PARA 3 "" 0 "" {TEXT -1 37 "Z\341kladn\355 operace
 s vektory a maticemi" }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{EXCHG {PARA 
0 "> " 0 "" {MPLTEXT 1 0 47 "A:= array( [[1,2,3], [4, 1, 5], [1/2, 4, \+
-1]]);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 14 "evalm(A + A);\n" 
}}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 25 "Ainv:= evalm( A ^(-1) );
\n" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "evalm( A &* Ainv );\n
" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 28 "evalm( A - lambda * &*(
) );\n" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 9 "print(A);" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 2 "A;" }}}}{PARA 0 "" 0 "" 
{TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}}{MARK "2" 0 }
{VIEWOPTS 1 1 0 1 1 1803 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }