{VERSION 2 3 "DEC ALPHA UNIX" "2.3" }
{USTYLETAB {CSTYLE "Maple Input" -1 0 "Courier" 0 1 255 0 0 1 0 1 0 0 
1 0 0 0 0 }{CSTYLE "2D Math" -1 2 "Times" 0 1 0 0 0 0 0 0 2 0 0 0 0 0 
0 }{CSTYLE "2D Output" 2 20 "" 0 1 0 0 255 1 0 0 0 0 0 0 0 0 0 }
{PSTYLE "Normal" -1 0 1 {CSTYLE "" -1 -1 "" 0 1 0 0 0 0 0 0 0 0 0 0 0 
0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "Maple Output" 0 11 1 
{CSTYLE "" -1 -1 "" 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 }3 3 0 -1 -1 -1 0 0 
0 0 0 0 -1 0 }{PSTYLE "" 11 12 1 {CSTYLE "" -1 -1 "" 0 1 0 0 0 0 0 0 
0 0 0 0 0 0 0 }1 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }}
{SECT 0 {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "R:=(x^9+1)/(x^10-1);
" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"RG*&,&*$%\"xG\"\"*\"\"\"F*F*F*
,&*$F(\"#5F*!\"\"F*F." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 25 "A:
=numer(R):\nB:=denom(R):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 32 
"F:=resultant(z*diff(B,x)-A,B,x);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>
%\"FG,6%\"zG\"$+\"*$F&\"\"#!%+X*$F&\"\"$\"'++7*$F&\"\"%!(++5#*$F&\"\"&
\")++?D*$F&\"\"'!*+++5#*$F&\"\"(\"+++++7*$F&\"\")!+++++X*$F&\"\"*\",++
+++\"*$F&\"#5!,+++++\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 30 "d
ec:=convert(R,fullparfrac,x);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$de
cG-%$SumG6$*&,&%'_alphaG#\"\"\"\"#5F+F,F,,&%\"xGF,F*!\"\"F0/F*-%'RootO
fG6#,6*$%#_ZG\"\"*F,*$F7\"\")F0*$F7\"\"(F,*$F7\"\"'F0*$F7\"\"&F,*$F7\"
\"%F0*$F7\"\"$F,*$F7\"\"#F0F7F,F0F," }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 217 "unlikely:=proc(s) \n  local sf;\n  if has(s,Sum) the
n\n    if op(0,s)=Sum and has(op(2,s),RootOf) then\n         add(sf,sf
=\{allvalues(subs(op(2,s),op(1,s)))\})\n    else map(unlikely,s)\n    \+
fi\n  else s\n  fi\nend: # unlikely\n" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 19 "DEC:=unlikely(dec);" }}{PARA 12 "" 1 "" {XPPMATH 20 "
6#>%$DECG,4*$,&%\"xG\"\"\"!\"\"F)F*#F)\"\"&*&,(*$F,#F)\"\"##F)\"#S#\"
\"$F3F)*(%\"IGF)F1F0,&F,F)F/F)F0F2F),*F(F)F/#F*\"\"%#F)F;F)F6F:F*F)*&,
(F/#F*F3F4F)*(F7F)F1F0,&F,F)F/F*F0F2F),*F(F)F/F<F<F)F@F:F*F)*&,(F/F?F4
F)F@F?F),*F(F)F/F<F<F)F@F<F*F)*&,(F/F2F4F)F6F?F),*F(F)F/F:F<F)F6F<F*F)
*&,(F/F?#F)\"\")F)F6F?F),*F(F)F/F<F:F)F6F<F*F)*&,(F/F2FKF)F@F?F),*F(F)
F/F:F:F)F@F<F*F)*&,(F/F2FKF)F@F2F),*F(F)F/F:F:F)F@F:F*F)*&,(F/F?FKF)F6
F2F),*F(F)F/F<F:F)F6F:F*F)" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 
63 "for i in DEC do \n  n:=remove(has,i,x);\n  evalc(subs(z=n,F))\nod;
" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"nG#\"\"\"\"\"&" }}{PARA 11 "" 
1 "" {XPPMATH 20 "6#\"\"!" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"nG,(*
$\"\"&#\"\"\"\"\"##F)\"#S#\"\"$F,F)*(%\"IGF)F*F(,&F'F)F&F)F(F+" }}
{PARA 11 "" 1 "" {XPPMATH 20 "6#\"\"!" }}{PARA 11 "" 1 "" {XPPMATH 20 
"6#>%\"nG,(*$\"\"&#\"\"\"\"\"##!\"\"\"#S#\"\"$F-F)*(%\"IGF)F*F(,&F'F)F
&F,F(#F)F-" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#\"\"!" }}{PARA 11 "" 1 "
" {XPPMATH 20 "6#>%\"nG,(*$\"\"&#\"\"\"\"\"##!\"\"\"#S#\"\"$F-F)*(%\"I
GF)F*F(,&F'F)F&F,F(F+" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#\"\"!" }}
{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"nG,(*$\"\"&#\"\"\"\"\"##F)\"#S#\"
\"$F,F)*(%\"IGF)F*F(,&F'F)F&F)F(#!\"\"F," }}{PARA 11 "" 1 "" {XPPMATH 
20 "6#\"\"!" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"nG,(*$\"\"&#\"\"\"
\"\"##!\"\"\"#S#F)\"\")F)*(%\"IGF)F*F(,&F'F)F&F)F(F+" }}{PARA 11 "" 1 
"" {XPPMATH 20 "6#\"\"!" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"nG,(*$
\"\"&#\"\"\"\"\"##F)\"#S#F)\"\")F)*(%\"IGF)F*F(,&F'F)F&!\"\"F(#F2F," }
}{PARA 11 "" 1 "" {XPPMATH 20 "6#\"\"!" }}{PARA 11 "" 1 "" {XPPMATH 
20 "6#>%\"nG,(*$\"\"&#\"\"\"\"\"##F)\"#S#F)\"\")F)*(%\"IGF)F*F(,&F'F)F
&!\"\"F(F+" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#\"\"!" }}{PARA 11 "" 1 "
" {XPPMATH 20 "6#>%\"nG,(*$\"\"&#\"\"\"\"\"##!\"\"\"#S#F)\"\")F)*(%\"I
GF)F*F(,&F'F)F&F)F(#F)F-" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#\"\"!" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "7 0 0" 0 }
{VIEWOPTS 1 1 0 1 1 1803 }