{VERSION 3 0 "DEC ALPHA UNIX" "3.0" }
{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 }}
{SECT 0 {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 21 "omega:=exp(I*k*Pi/n)
:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "omega/(x-omega);" }}
{PARA 11 "" 1 "" {XPPMATH 20 "6#*&-%$expG6#*&*(%\"IG\"\"\"%\"kGF*%#PiG
F*\"\"\"%\"nG!\"\"F-,&%\"xGF*F$!\"\"F/" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 13 "evalc(Re(%));" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#,&*&
*&-%$cosG6#*&*&%\"kG\"\"\"%#PiGF,\"\"\"%\"nG!\"\"F,,&%\"xGF,F&!\"\"F,F
.,&*$)F1\"\"#F.F,*$)-%$sinGF(F7F.F,F0F,*&*$)F:F7F.F.F4F0F3" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "normal(%,expanded);" }}{PARA 11 "" 
1 "" {XPPMATH 20 "6#*&,(*&%\"xG\"\"\"-%$cosG6#*&*&%\"kGF'%#PiGF'\"\"\"
%\"nG!\"\"F'F'*$)F(\"\"#F/!\"\"*$)-%$sinGF*F4F/F5F/,**$)F&F4F/F'F%!\"#
F2F'F6F'F1" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "combine(%,tri
g);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#*&,&*&%\"xG\"\"\"-%$cosG6#*&*&%
\"kGF'%#PiGF'\"\"\"%\"nG!\"\"F'F'!\"\"F'F/,(*$)F&\"\"#F/F'F%!\"#F'F'F1
" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "5 0 0" 0 }
{VIEWOPTS 1 1 0 1 1 1803 }