{VERSION 6 0 "IBM INTEL NT" "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 }{CSTYLE "2D Math" -1 2 "Times" 0 1 0 0 0 0 0 0 2 0 0 0 0 
0 0 1 }{CSTYLE "2D Comment" 2 18 "" 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 1 }
{CSTYLE "2D Output" 2 20 "" 0 1 0 0 255 1 0 0 0 0 0 0 0 0 0 1 }
{PSTYLE "Normal" -1 0 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 
2 2 1 1 1 1 }1 1 0 0 0 0 1 0 1 0 2 2 0 1 }{PSTYLE "Maple Output" -1 
11 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 1 1 1 }3 3 0 
0 0 0 1 0 1 0 2 2 0 1 }{PSTYLE "Title" -1 18 1 {CSTYLE "" -1 -1 "Times
" 1 18 0 0 0 1 2 1 1 2 2 2 1 1 1 1 }3 1 0 0 12 12 1 0 1 0 2 2 19 1 }}
{SECT 0 {EXCHG {PARA 18 "" 0 "" {TEXT -1 29 "Fourierova \370ada na int
ervalu " }{XPPEDIT 18 0 "`<,>`(alpha,beta);" "6#-%$<,>G6$%&alphaG6#%%b
etaG" }{TEXT -1 1 "," }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 16 "Pokud je \+
N lich\351" }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "> " 0 "" 
{MPLTEXT 1 0 114 "  unapply(a[0]/2+sum(a[i]*cos(2*i*Pi*(x-alpha)/(beta
-alpha))+b[i]*sin(2*i*Pi*(x-alpha)/(beta-alpha)),i=1..N-1),x);" }}
{PARA 11 "" 1 "" {XPPMATH 20 "6#j+6#%\"xG6\"6$%)operatorG%&arrowGF&,&*
&#\"\"\"\"\"#F-&%\"aG6#\"\"!F-F--%$sumG6$,&*&&F06#%\"iGF--%$cosG6#,$*,
F.F-F:F-%#PiGF-,&9$F-%&alphaG!\"\"F-,&%%betaGF-FCFDFDF-F-F-*&&%\"bGF9F
--%$sinGF=F-F-/F:;F-,&%\"NGF-F-FDF-F&F&F&6#\"+@fE8?" }}}{EXCHG {PARA 
0 "> " 0 "" {MPLTEXT 1 0 2 "\n\n" }{TEXT -1 15 "Pokud je N sud\351" }
{MPLTEXT 1 0 156 "  unapply(a[0]/2+sum(a[i]*cos(2*i*Pi*(x-alpha)/(beta
/alpha))+b[i]*sin(2*i*Pi*(x-alpha)/(beta-alpha)),i=1..N-1)+a[N]*cos(N*
2*Pi*(x-alpha)/(beta-alpha)),x);\n;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6
#j+6#%\"xG6\"6$%)operatorG%&arrowGF&,(*&#\"\"\"\"\"#F-&%\"aG6#\"\"!F-F
--%$sumG6$,&*&&F06#%\"iGF--%$cosG6#,$*.F.F-F:F-%#PiGF-,&9$F-%&alphaG!
\"\"F-%%betaGFDFCF-F-F-F-*&&%\"bGF9F--%$sinG6#,$*,F.F-F:F-F@F-FAF-,&FE
F-FCFDFDF-F-F-/F:;F-,&%\"NGF-F-FDF-*&&F06#FRF--F<6#,$*,F.F-FRF-F@F-FAF
-FNFDF-F-F-F&F&F&6#\"+@fE8?" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 3 "kde
" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 169 "a[i]:=(2/(beta-alpha)*
(Int(f(x)*cos(2*i*Pi*(x-alpha)/(beta-alpha)),x=alpha..beta)));\nb[i]:=
(2/(beta-alpha)*(Int(f(x)*sin(2*i*Pi*(x-alpha)/(beta-alpha)),x=alpha..
beta)));" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>&%\"aG6#%\"iG,$,$-%$IntG6
$*&-%\"fG6#%\"xG\"\"\"-%$cosG6#,$*,\"\"#F2F'F2%#PiGF2,&F1F2%&alphaG!\"
\"F2,&%%betaGF2F;F<F<F2F2/F1;F;F>*&F8F2F=F<F2" }}{PARA 11 "" 1 "" 
{XPPMATH 20 "6#>&%\"bG6#%\"iG,$,$-%$IntG6$*&-%\"fG6#%\"xG\"\"\"-%$sinG
6#,$*,\"\"#F2F'F2%#PiGF2,&F1F2%&alphaG!\"\"F2,&%%betaGF2F;F<F<F2F2/F1;
F;F>*&F8F2F=F<F2" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "
" {MPLTEXT 1 0 111 "alpha:='alpha';\nsimplify(int(cos(2*Pi*(x-alpha)/(
beta-alpha))*cos(2*Pi*(x-alpha)/(beta-alpha)),x=alpha..beta));" }}
{PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#
>%&alphaGF$" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#,&*&\"\"#!\"\"%&alphaG
\"\"\"F&*&F%F&%%betaGF(F(" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 
"" }}}}{MARK "8 0 0" 0 }{VIEWOPTS 1 1 0 1 1 1803 1 1 1 1 }
{PAGENUMBERS 0 1 2 33 1 1 }