{VERSION 4 0 "SUN SPARC SOLARIS" "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 "Text Output" -1 2 1 {CSTYLE "" -1 -1 "Courier" 1 10 0 0 255 1 0 0 0 0 0 1 3 0 3 0 }1 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "Warning" 2 7 1 {CSTYLE "" -1 -1 " " 0 1 0 0 255 1 0 0 0 0 0 0 1 0 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 } {PSTYLE "Error" 7 8 1 {CSTYLE "" -1 -1 "" 0 1 255 0 255 1 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 "" {TEXT -1 206 "Maple has apparently chan ged it's format for strings. It no longer uses single quotes like 'str ing', instead it uses double quotes like \"string\". Given that you do this, spaces should be allowed in strings." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 14 "st:=\"abcdefg\";" }}{PARA 11 "" 1 "" {XPPMATH 20 " 6#>%#stGQ(abcdefg6\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 27 "st2 :=\"hijklmnopqrstuvwxyz\";" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$st2GQ 4hijklmnopqrstuvwxyz6\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 12 " cat(st,st2);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#%;abcdefghijklmnopqrst uvwxyzG" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 22 "cat('a','bg','q' ,'u');" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#%&abgquG" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 11 "length(st);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#\"\"(" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "substring(st ,3);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#%\"cG" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "searchtext('o',st2);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#\"\")" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "sea rchtext('O',st2);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#\"\")" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "seq(i^2,i=1..5);" }}{PARA 11 "" 1 " " {XPPMATH 20 "6'\"\"\"\"\"%\"\"*\"#;\"#D" }}}{EXCHG {PARA 0 "> " 0 " " {MPLTEXT 1 0 24 "[seq(sqrt(i),i=0..100)];" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#7aq\"\"!\"\"\"*$-%%sqrtG6#\"\"#F%*$-F(6#\"\"$F%F**$-F(6 #\"\"&F%*$-F(6#\"\"'F%*$-F(6#\"\"(F%,$F&F*F.*$-F(6#\"#5F%*$-F(6#\"#6F% ,$F+F**$-F(6#\"#8F%*$-F(6#\"#9F%*$-F(6#\"#:F%\"\"%*$-F(6#\"#F%,$F/F**$-F(6#\"#@F%*$-F(6#\"#AF%*$-F(6#\"#BF%,$F3F*F2*$-F( 6#\"#EF%,$F+F.,$F7F**$-F(6#\"#HF%*$-F(6#\"#IF%*$-F(6#\"#JF%,$F&FQ*$-F( 6#\"#LF%*$-F(6#\"#MF%*$-F(6#\"#NF%F6*$-F(6#\"#PF%*$-F(6#\"#QF%*$-F(6# \"#RF%,$F " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 " " {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 " " {MPLTEXT 1 0 39 "alphabet:='abcdefghijklmnopqrstuvwxyz';" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%)alphabetG%;abcdefghijklmnopqrstuvwxyzG" } }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 36 "crypt:='thequickbrownfxjmp svlazydg';" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%&cryptG%;thequickbrown fxjmpsvlazydgG" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 14 "length(cr ypt);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#\"#E" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 53 "sum(searchtext(substring(alphabet,i),crypt),i=1. .26);" }}{PARA 8 "" 1 "" {TEXT -1 40 "Error, invalid arguments for sea rchtext\n" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 61 "sort([seq(sear chtext(substring(alphabet,i),crypt),i=1..26)]);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#7<\"\"\"\"\"#\"\"$\"\"%\"\"&\"\"'\"\"(\"\")\"\"*\"#5\"# 6\"#7\"#8\"#9\"#:\"#;\"#<\"#=\"#>\"#?\"#@\"#A\"#B\"#C\"#D\"#E" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 140 "subcipher:=(msg)->\n ca t(seq(substring(crypt,\n searchtext(substring(ms g,i),alphabet)),\n i=1..length(msg)));" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%*subcipherGR6#%$msgG6\"6$%)operatorG%&arrowGF(-%$catG 6#-%$seqG6$-%*substringG6$%&cryptG-%+searchtextG6$-F36$9$%\"iG%)alphab etG/F<;\"\"\"-%'lengthG6#F;F(F(F(" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 22 "subcipher('ab cdefg');" }}{PARA 8 "" 1 "" {TEXT -1 31 "Error, missing operator or `;`\n" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 35 "subcipher('Thanksforcatchingthat');" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#%6vktfosixpetvekbfcvktvG" }}}{EXCHG {PARA 0 "> " 0 " " {MPLTEXT 1 0 142 "subdecipher:=(msg)->\n cat(seq(substring(alpha bet,\n searchtext(substring(msg,i),crypt)),\n \+ i=1..length(msg)));" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#>%,subdec ipherGR6#%$msgG6\"6$%)operatorG%&arrowGF(-%$catG6#-%$seqG6$-%*substrin gG6$%)alphabetG-%+searchtextG6$-F36$9$%\"iG%&cryptG/F<;\"\"\"-%'length G6#F;F(F(F(" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 24 "subdecipher( 'vktfosix');" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#%)thanksfoG" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 24 "convert(alphabet,bytes);" }} {PARA 12 "" 1 "" {XPPMATH 20 "6#7<\"#(*\"#)*\"#**\"$+\"\"$,\"\"$-\"\"$ .\"\"$/\"\"$0\"\"$1\"\"$2\"\"$3\"\"$4\"\"$5\"\"$6\"\"$7\"\"$8\"\"$9\" \"$:\"\"$;\"\"$<\"\"$=\"\"$>\"\"$?\"\"$@\"\"$A\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 9 "alphabet;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#% ;abcdefghijklmnopqrstuvwxyzG" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 27 "map(sqrt,[1,2,3,6,34,200]);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#7 (\"\"\"*$-%%sqrtG6#\"\"#F$*$-F'6#\"\"$F$*$-F'6#\"\"'F$*$-F'6#\"#MF$,$F %\"#5" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 29 "map(x->x^2,[1,2,3, 6,34,200]);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#7(\"\"\"\"\"%\"\"*\"#O \"%c6\"&++%" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 39 "shiftaround: =(x,y)->(x+y-1 mod 127) +1;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%,shif taroundGR6$%\"xG%\"yG6\"6$%)operatorG%&arrowGF),&-%$modG6$,(9$\"\"\"9% F3F3!\"\"\"$F\"F3F3F3F)F)F)" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 37 "map(shiftaround,[1,2,3,6,34,200],54);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#7(\"#b\"#c\"#d\"#g\"#))\"$F\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 37 "seq([i,convert([i],bytes)],i=1..127);" }}{PARA 12 "" 1 "" {XPPMATH 20 "6[s7$\"\"\"Q\"|\"6\"7$\"\"#Q\"|#F&7$\"\"$Q\"|$ F&7$\"\"%Q\"|%F&7$\"\"&Q\"|&F&7$\"\"'Q\"|'F&7$\"\"(Q\"|(F&7$\"\")Q\"|) F&7$\"\"*Q\"|*F&7$\"#5Q\"|+F&7$\"#6Q\"|,F&7$\"#7Q\"|-F&7$\"#8Q\"|.F&7$ \"#9Q\"|/F&7$\"#:Q\"|0F&7$\"#;Q\"|1F&7$\"#Q \"|4F&7$\"#?Q\"|5F&7$\"#@Q\"|6F&7$\"#AQ\"|7F&7$\"#BQ\"|8F&7$\"#CQ\"|9F &7$\"#DQ\"|:F&7$\"#EQ\"|;F&7$\"#FQ\"|F&7$\" #IQ\"|?F&7$\"#JQ\"|@F&7$\"#KQ\"~6\"7$\"#LQ\"!F&7$\"#MQ\"\"F&7$\"#NQ\"# F&7$\"#OQ\"$F&7$\"#PQ\"%F&7$\"#QQ\"&F&7$\"#RQ\"'F&7$\"#SQ\"(F&7$\"#TQ \")6\"7$\"#UQ\"*F&7$\"#VQ\"+F&7$\"#WQ\",F&7$\"#XQ\"-F&7$\"#YQ\".F&7$\" #ZQ\"/F&7$\"#[Q\"0F&7$\"#\\Q\"1F&7$\"#]Q\"2F&7$\"#^Q\"3F&7$\"#_Q\"4F&7 $\"#`Q\"5F&7$\"#aQ\"6F&7$\"#bQ\"7F&7$\"#cQ\"8F&7$\"#dQ\"9F&7$\"#eQ\":F &7$\"#fQ\";F&7$\"#gQ\"<6\"7$\"#hQ\"=Fdv7$\"#iQ\">Fdv7$\"#jQ\"?F&7$\"#k Q\"@F&7$\"#lQ\"AF&7$\"#mQ\"BF&7$\"#nQ\"CF&7$\"#oQ\"DF&7$\"#pQ\"EF&7$\" #qQ\"FF&7$\"#rQ\"GF&7$\"#sQ\"HF&7$\"#tQ\"IF&7$\"#uQ\"JF&7$\"#vQ\"KF&7$ \"#wQ\"LF&7$\"#xQ\"MF&7$\"#yQ\"NF&7$\"#zQ\"OF&7$\"#!)Q\"PF&7$\"#\")Q\" QF&7$\"##)Q\"RF&7$\"#$)Q\"SF&7$\"#%)Q\"TF&7$\"#&)Q\"UF&7$\"#')Q\"VF&7$ \"#()Q\"WF&7$\"#))Q\"XF&7$\"#*)Q\"YF&7$\"#!*Q\"ZF&7$\"#\"*Q\"[F&7$\"## *Q\"\\F&7$\"#$*Q\"]F&7$\"#%*Q\"^F&7$\"#&*Q\"_F&7$\"#'*Q\"`F&7$\"#(*Q\" aF&7$\"#)*Q\"bF&7$\"#**Q\"cF&7$\"$+\"Q\"dF&7$\"$,\"Q\"eF&7$\"$-\"Q\"fF &7$\"$.\"Q\"gF&7$\"$/\"Q\"hF&7$\"$0\"Q\"iF&7$\"$1\"Q\"jF&7$\"$2\"Q\"kF &7$\"$3\"Q\"lF&7$\"$4\"Q\"mF&7$\"$5\"Q\"nF&7$\"$6\"Q\"oF&7$\"$7\"Q\"pF &7$\"$8\"Q\"qF&7$\"$9\"Q\"rF&7$\"$:\"Q\"sF&7$\"$;\"Q\"tF&7$\"$<\"Q\"uF &7$\"$=\"Q\"vF&7$\"$>\"Q\"wF&7$\"$?\"Q\"xF&7$\"$@\"Q\"yF&7$\"$A\"Q\"zF &7$\"$B\"Q\"|frF&7$\"$C\"Q\"|grF&7$\"$D\"Q\"|hrF&7$\"$E\"Q\"|irF&7$\"$ F\"Q\"|jrF&" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 144 "Ceasar:=(pl ain,shift)->\n convert(map((x,y)->(x+y-1) mod 127 +1,\n \+ convert(plain,bytes),\n shift),\n bytes);" } }{PARA 12 "" 1 "" {XPPMATH 20 "6#>%'CeasarGR6$%&plainG%&shiftG6\"6$%)o peratorG%&arrowGF)-%(convertG6$-%$mapG6%R6$%\"xG%\"yGF)F*F),&-%$modG6$ ,(9$\"\"\"9%F=F=!\"\"\"$F\"F=F=F=F)F)F)-F.6$F<%&bytesGF>FCF)F)F)" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 39 "map(x->x mod 3,[1,2,3,4,5,6, 7,8,9,10]);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#7,\"\"\"\"\"#\"\"!F$F%F &F$F%F&F$" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 28 "eq:=Ceasar(\"H ello there\",3);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#eqGQ,Khoor#wkhu h6\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 14 "Ceasar(eq,-3);" }} {PARA 11 "" 1 "" {XPPMATH 20 "6#Q,Hello~there6\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 8 "?strings" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "0 0 0" 206 }{VIEWOPTS 1 1 0 2 1 1805 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }