{VERSION 3 0 "SUN SPARC SOLARIS" "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 11 "" 1 "" {XPPMATH 20 "6#\"$_#" }}{PARA 11 "" 1 
"" {XPPMATH 20 "6#\"&SS\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 
13 "ifactor(252);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#*()-%!G6#\"\"#F(
\"\"\")-F&6#\"\"$F(F)-F&6#\"\"(F)" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 15 "ifactor(14040);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#**
)-%!G6#\"\"#\"\"$\"\"\")-F&6#F)F)F*-F&6#\"\"&F*-F&6#\"#8F*" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 66 "euclid:=proc(a,b) print(a,\"=\",b,
\"*\",iquo(a,b),\"+\",irem(a,b)); end;" }}{PARA 11 "" 1 "" {XPPMATH 
20 "6#>%'euclidGR6$%\"aG%\"bG6\"F)F)-%&printG6)9$Q\"=6\"9%Q\"*F/-%%iqu
oG6$F-F0Q\"+F/-%%iremGF4F)F)F)" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 
1 0 18 "euclid(14040,252);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6)\"&SS\"Q
\"=6\"\"$_#Q\"*F%\"#bQ\"+F%\"$!=" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 16 "euclid(252,180);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6)
\"$_#Q\"=6\"\"$!=Q\"*F%\"\"\"Q\"+F%\"#s" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 15 "euclid(180,72);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6)\"
$!=Q\"=6\"\"#sQ\"*F%\"\"#Q\"+F%\"#O" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 14 "euclid(72,36);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6)\"#
sQ\"=6\"\"#OQ\"*F%\"\"#Q\"+F%\"\"!" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 15 "gcd(14040,252);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#\"
#O" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "9 0 0" 0 
}{VIEWOPTS 1 1 0 2 1 1805 }