{VERSION 4 0 "IBM INTEL LINUX22" "4.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 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 "" 0 1 0 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 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 0 }1 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }} {SECT 0 {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 424 "Chunksize:=47:\nRea dBignums:=proc(filename,chunksize)\n local file,chunk,i,p,numlist; \n\n p := 128;\n numlist := [];\n file := fopen(filename, REA D, BINARY);\n chunk := readbytes(file,chunksize);\n while (chunk <> 0) do\n numlist := [op(numlist),\n sum( ch unk[i]*p^(chunksize-1),i=1..nops(chunk))];\n chunk := readbytes( file,chunksize);\n od;\n close(file);\n RETURN(numlist);\nend :" }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 123 "BignumToText:=proc(num,k) \+ \n local i,p;\n p:=128;\n convert([seq( iquo(modp(num,p^(k-i+1)),p^ (k-i)),i=1..k)],'bytes');\nend:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 65 "data:=ReadBignum s(`/mt/FortSalonga/home/john/tmp.txt`,Chunksize);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#QPHere~we~go~round~the~mulberry~bush,|+the~mullber6\"" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#QPry~bush,|+the~mullberry~bush.|+Her e~we~go~round~t6\"" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#QPhe~mullberry~b ush|+at~three~o'clock~in~the~morni6\"" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#Q$ng.6\"" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%%dataG7&\"`qgph7z.=4S .S)*H@TcfdskMvKOdrMg4Aj4#*z.s*)*yqhQ+4zrkLVHP\"`q_j$)[xH`#*)Rg=MV\"zoA !eL\\A9cx(**)H1Z]uYuC')H'zSgnrn7$HB_#4i$\"`q%y%4**z7p9gw$>([bo*oj6ZvSv Hqr$))oeo8<<\\%o1^fXf!)=>TgL(fXt$\"_qOFHm?s)yB)4Ou3fj>Qq0^8l'pA\\h^)=S G2*fl\"f([U7OXG19#pD)G@#" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 11 "nops(data);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#\"\"%" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 32 "BignumToText(data[2],Chunksize);" } }{PARA 11 "" 1 "" {XPPMATH 20 "6#Q\"|/6\"" }}}{EXCHG {PARA 0 "> " 0 " " {MPLTEXT 1 0 0 "" }}}}{MARK "0 0 0" 338 }{VIEWOPTS 1 1 0 1 1 1803 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }