{VERSION 5 0 "Linux" "5.0" } {USTYLETAB {PSTYLE "Heading 1" -1 3 1 {CSTYLE "" -1 -1 "Times" 1 18 0 0 0 1 2 1 2 2 2 2 1 0 0 1 }1 1 0 0 8 4 2 0 2 0 2 2 -1 1 }{PSTYLE "War ning" -1 7 1 {CSTYLE "" -1 -1 "Courier" 1 10 0 0 255 1 2 2 2 2 2 1 1 0 0 1 }1 1 0 0 0 0 2 0 2 0 2 2 -1 1 }{PSTYLE "Left Justified Maple Outp ut" -1 12 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 0 0 1 }1 1 0 0 0 0 2 0 2 0 2 2 -1 1 }{PSTYLE "Fixed Width" -1 17 1 {CSTYLE " " -1 -1 "Courier" 1 10 0 0 0 1 2 2 2 2 2 2 1 0 0 1 }3 1 0 0 0 0 2 0 2 0 2 2 -1 1 }{PSTYLE "Help" -1 10 1 {CSTYLE "" -1 -1 "Courier" 1 9 0 0 255 1 2 2 2 2 2 1 1 0 0 1 }1 1 0 0 0 0 2 0 2 0 2 2 -1 1 }{PSTYLE "Head ing 4" -1 20 1 {CSTYLE "" -1 -1 "Times" 1 10 0 0 0 1 1 1 2 2 2 2 1 0 0 1 }1 1 0 0 0 0 2 0 2 0 2 2 -1 1 }{PSTYLE "Line Printed Output" -1 6 1 {CSTYLE "" -1 -1 "Courier" 1 10 0 0 255 1 2 2 2 2 2 1 1 0 0 1 }1 1 0 0 0 0 2 0 2 0 2 2 -1 1 }{PSTYLE "Heading 2" -1 4 1 {CSTYLE "" -1 -1 "T imes" 1 14 0 0 0 1 2 1 2 2 2 2 1 0 0 1 }1 1 0 0 8 2 2 0 2 0 2 2 -1 1 } {PSTYLE "Maple Output" -1 11 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 0 0 1 }3 1 0 0 0 0 2 0 2 0 2 2 -1 1 }{PSTYLE "Heading 3" -1 5 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 1 1 2 2 2 2 1 0 0 1 }1 1 0 0 0 0 2 0 2 0 2 2 -1 1 }{PSTYLE "Diagnostic" -1 9 1 {CSTYLE "" -1 -1 "Courier" 1 10 64 128 64 1 2 2 2 2 2 1 1 0 0 1 }1 1 0 0 0 0 2 0 2 0 2 2 -1 1 }{PSTYLE "Ordered List 1" -1 200 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 0 0 1 }1 1 0 0 3 3 2 0 2 0 2 2 -1 1 }{PSTYLE "Text Output" -1 2 1 {CSTYLE "" -1 -1 "Courier" 1 10 0 0 255 1 2 2 2 2 2 1 1 0 0 1 }1 1 0 0 0 0 2 0 2 0 2 2 -1 1 }{PSTYLE "Ordered List 2" -1 201 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 0 0 1 }1 1 0 0 3 3 2 36 2 0 2 2 -1 1 }{PSTYLE "Ordered List 3" -1 202 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 0 0 1 }1 1 0 0 3 3 2 72 2 0 2 2 -1 1 }{PSTYLE "Ordered List 4" -1 203 1 {CSTYLE "" -1 -1 "Times " 1 12 0 0 0 1 2 2 2 2 2 2 1 0 0 1 }1 1 0 0 3 3 2 108 2 0 2 2 -1 1 } {PSTYLE "Ordered List 5" -1 204 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 0 0 1 }1 1 0 0 3 3 2 144 2 0 2 2 -1 1 }{PSTYLE "Annota tion Title" -1 205 1 {CSTYLE "" -1 -1 "Times" 1 18 0 0 0 1 2 1 2 2 2 2 1 0 0 1 }3 1 0 0 12 12 2 0 2 0 2 2 -1 1 }{PSTYLE "HyperlinkError" -1 206 1 {CSTYLE "" -1 -1 "Courier New" 1 12 255 0 255 1 2 2 1 2 2 1 1 0 0 1 }1 1 0 0 0 0 2 0 2 0 2 2 -1 1 }{PSTYLE "HyperlinkWarning" -1 207 1 {CSTYLE "" -1 -1 "Courier New" 1 12 0 0 255 1 2 2 1 2 2 1 1 0 0 1 }1 1 0 0 0 0 2 0 2 0 2 2 -1 1 }{PSTYLE "Bullet Item" -1 15 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 0 0 1 }1 1 0 0 3 3 2 0 2 0 2 2 -1 1 }{PSTYLE "Maple Plot" -1 13 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 0 0 1 }3 1 0 0 0 0 2 0 2 0 2 2 -1 1 }{PSTYLE "List \+ Item" -1 14 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 0 0 1 }1 1 0 0 3 3 2 0 2 0 2 2 -1 1 }{PSTYLE "Dash Item" -1 16 1 {CSTYLE " " -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 0 0 1 }1 1 0 0 3 3 2 0 2 0 2 2 -1 1 }{PSTYLE "Error" -1 8 1 {CSTYLE "" -1 -1 "Courier" 1 10 255 0 255 1 2 2 2 2 2 1 1 0 0 1 }1 1 0 0 0 0 2 0 2 0 2 2 -1 1 }{PSTYLE "Tit le" -1 18 1 {CSTYLE "" -1 -1 "Times" 1 18 0 0 0 1 2 1 1 2 2 2 1 0 0 1 }3 1 0 0 12 12 2 0 2 0 2 2 -1 1 }{PSTYLE "Normal" -1 0 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 0 0 1 }1 1 0 0 0 0 2 0 2 0 2 2 -1 1 }{PSTYLE "Author" -1 19 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 0 0 1 }3 1 0 0 8 8 2 0 2 0 2 2 -1 1 }{CSTYLE "Help Variab le" -1 25 "Courier" 1 12 0 0 0 1 2 2 2 2 2 2 0 0 0 1 }{CSTYLE "Help Un derlined Bold" -1 41 "Times" 1 12 0 0 0 1 1 1 2 2 2 2 0 0 0 1 }{CSTYLE "Copyright" -1 34 "Times" 1 10 0 0 0 1 2 2 2 2 2 2 0 0 0 1 }{CSTYLE " Maple Comment" -1 21 "Courier" 1 12 0 0 0 1 2 1 2 2 2 2 0 0 0 1 } {CSTYLE "Popup" -1 31 "Times" 1 12 0 128 128 1 1 2 1 2 2 2 0 0 0 1 } {CSTYLE "Atomic Variable" -1 200 "Times" 1 12 175 0 175 1 1 2 2 2 2 2 0 0 0 1 }{CSTYLE "Dictionary Hyperlink" -1 45 "Times" 1 12 147 0 15 1 2 2 1 2 2 2 0 0 0 1 }{CSTYLE "Plot Text" -1 28 "Times" 1 8 0 0 0 1 2 2 2 2 2 2 0 0 0 1 }{CSTYLE "2D Input" -1 19 "Times" 1 12 255 0 0 1 2 2 2 2 1 2 0 0 0 1 }{CSTYLE "Code" -1 201 "Courier" 1 12 255 0 0 1 2 2 2 2 2 2 0 0 0 1 }{CSTYLE "2D Math Italic" -1 3 "Times" 1 12 0 0 0 1 1 2 2 2 2 2 0 0 0 1 }{CSTYLE "2D Math Small" -1 7 "Times" 1 1 0 0 0 1 2 2 2 2 2 2 0 0 0 1 }{CSTYLE "2D Math Bold Small" -1 10 "Times" 1 1 0 0 0 1 2 1 2 2 2 2 0 0 0 1 }{CSTYLE "Help Bold" -1 39 "Times" 1 12 0 0 0 1 2 1 2 2 2 2 0 0 0 1 }{CSTYLE "Help Menus" -1 36 "Times" 1 12 0 0 0 1 2 1 2 2 2 2 0 0 0 1 }{CSTYLE "Help Heading" -1 26 "Times" 1 14 0 0 0 1 2 1 2 2 2 2 0 0 0 1 }{CSTYLE "2D Output" -1 20 "Times" 1 12 0 0 255 1 2 2 2 2 2 2 0 0 0 1 }{CSTYLE "2D Inert Output" -1 202 "Times" 1 12 144 144 144 1 2 2 2 2 1 2 0 0 0 1 }{CSTYLE "Help Normal" -1 30 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 0 0 0 1 }{CSTYLE "Maple Input" -1 0 "Courier" 1 12 255 0 0 1 2 1 2 2 1 2 0 0 0 1 }{CSTYLE "Page Number" -1 33 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 0 0 0 1 }{CSTYLE "Header and Footer" -1 203 "Times" 1 10 0 0 0 1 2 2 2 2 2 2 0 0 0 1 }{CSTYLE "2D Math Italic Smal l204" -1 204 "Times" 1 1 0 0 0 1 1 2 2 2 2 2 0 0 0 1 }{CSTYLE "Help Fi xed" -1 23 "Courier" 1 10 0 0 0 1 2 2 2 2 2 2 0 0 0 1 }{CSTYLE "Output Labels" -1 29 "Times" 1 8 0 0 0 1 2 2 2 2 2 2 0 0 0 1 }{CSTYLE "2D Ma th Italic Small205" -1 205 "Times" 1 1 0 0 0 1 1 2 2 2 2 2 0 0 0 1 } {CSTYLE "Help Notes" -1 37 "Times" 1 12 0 0 0 1 2 1 2 2 2 2 0 0 0 1 } {CSTYLE "Help Underlined" -1 44 "Times" 1 12 0 0 0 1 2 2 1 2 2 2 0 0 0 1 }{CSTYLE "2D Math Italic Small" -1 206 "Times" 1 1 0 0 0 1 1 2 2 2 2 2 0 0 0 1 }{CSTYLE "2D Math Symbol 2" -1 16 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 0 0 0 1 }{CSTYLE "2D Math" -1 2 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 0 0 0 1 }{CSTYLE "Help Nonterminal" -1 24 "Courier" 1 12 0 0 0 1 2 1 2 2 2 2 0 0 0 1 }{CSTYLE "Annotation Text" -1 207 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 0 0 0 1 }{CSTYLE "Help Maple Name" -1 35 "Times" 1 12 104 64 92 1 2 1 2 2 2 2 0 0 0 1 }{CSTYLE "Text" -1 208 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 0 0 0 1 }{CSTYLE "Plot Title" -1 27 "Times" 1 10 0 0 0 1 2 1 2 2 2 2 0 0 0 1 }{CSTYLE "Help Underlined Italic" -1 43 "Time s" 1 12 0 0 0 1 1 2 1 2 2 2 0 0 0 1 }{CSTYLE "Caption Reference" -1 209 "Times" 1 12 0 0 0 1 2 1 2 2 2 2 0 0 0 1 }{CSTYLE "Default" -1 38 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 0 0 0 1 }{CSTYLE "Help Italic Bold" -1 40 "Times" 1 12 0 0 0 1 1 2 2 2 2 2 0 0 0 1 }{CSTYLE "Maple Input P laceholder" -1 210 "Courier" 1 12 200 0 200 1 2 1 2 2 1 2 0 0 0 1 } {CSTYLE "LaTeX" -1 32 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 0 0 0 1 } {CSTYLE "Help Emphasized" -1 22 "Times" 1 12 0 0 0 1 1 2 2 2 2 2 0 0 0 1 }{CSTYLE "Equation Label" -1 211 "Times" 1 12 0 0 0 1 2 1 2 2 2 2 0 0 0 1 }{CSTYLE "2D Comment" -1 18 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 0 0 0 1 }{CSTYLE "Help Italic" -1 42 "Times" 1 12 0 0 0 1 1 2 2 2 2 2 0 0 0 1 }{CSTYLE "Prompt" -1 1 "Courier" 1 12 0 0 0 1 2 1 2 2 2 2 0 0 0 1 }{CSTYLE "2D Math Bold" -1 5 "Times" 1 12 0 0 0 1 2 1 2 2 2 2 0 0 0 1 }{CSTYLE "Hyperlink" -1 17 "Times" 1 12 0 128 128 1 2 2 1 2 2 2 0 0 0 1 }{CSTYLE "Caption Text" -1 212 "Times" 1 12 0 0 0 1 2 1 2 2 2 2 0 0 0 1 }} {SECT 0 {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 64 "with(LinearAlgebra) : with(linalg): with(numtheory): with(plots):" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 219 "numb:=table([\" \"=0,\"a\"=1, \"b\"=2, \"c\"=3, \"d \"=4, \"e\"=5, \"f\"=6, \"g\"=7, \"h\"=8, \"i\"=9, \"j\"=10, \"k\"=11, \"l\"=12, \"m\"=13, \"n\"=14, \"o\"=15, \"p\"=16, \"q\"=17, \"r\"=18, \"s\"=19, \"t\"=20, \"u\"=21, \"v\"=22, \"w\"=23, \"x\"=24, \"y\"=25, \"z\"=26]):" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 194 "alph:=table([0=\" \+ \",1=\"a\",2=\"b\",3=\"c\",4=\"d\",5=\"e\",6=\"f\",7=\"g\",8=\"h\",9= \"i\",10=\"j\",11=\"k\",12=\"l\",13=\"m\",14=\"n\",15=\"o\",16=\"p\",1 7=\"q\",18=\"r\",19=\"s\",20=\"t\",21=\"u\",22=\"v\",23=\"w\",24=\"x\" ,25=\"y\",26=\"z\"]):" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "shift:=pro c(txt,n) " }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 16 " local i, z; " }} {PARA 0 "> " 0 "" {MPLTEXT 1 0 12 " z :=NULL;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 40 " for i from 1 while i<= length(txt) do" }}{PARA 0 " > " 0 "" {MPLTEXT 1 0 61 " z:=cat(z,(alph[(numb[substring(txt,i)]+ n-1 mod 26)+1]));" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 10 " end do;" }} {PARA 0 "> " 0 "" {MPLTEXT 1 0 13 " return(z);" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 5 "end: " }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 21 "allshifts: = proc(txt)" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 12 " local i;" }} {PARA 0 "> " 0 "" {MPLTEXT 1 0 30 " for i from 0 while i<26 do" }} {PARA 0 "> " 0 "" {MPLTEXT 1 0 24 " print(shift(txt,i));" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 14 " end do; " }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 4 "end:" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 27 "affinecrypt := proc(txt,m,n)" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 14 " local i,z;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 12 " z:=NULL;" }}{PARA 0 "> " 0 " " {MPLTEXT 1 0 36 "for i from 1 while i<=length(txt) do" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 65 " z:=cat(z,(alph[((numb[substring(txt,i)]-1 )*m+n mod 26)+1]));" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 11 " end do;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 14 " return(z);" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 4 "end:" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 22 "vigener e:= proc(txt,v)" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 14 " local i,z;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 12 " z:=NULL;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 36 "for i from 1 while i<=length(txt) do" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 79 " z:=cat(z,alph[(numb[substring(txt,i)]+v[(i- 1 mod nops(v))+1]-1 mod 26)+1]);" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 11 " end do;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 14 " return(z);" }} {PARA 0 "> " 0 "" {MPLTEXT 1 0 4 "end:" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 21 "choose:=proc(txt,m,n)" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 14 " \+ local i,z;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 12 " z:=NULL;" }} {PARA 0 "> " 0 "" {MPLTEXT 1 0 43 " for i from n by m while i<= length (txt) do" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 32 " z:=cat(z,substring (txt,i));" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 9 " end do;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 10 "return(z);" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 4 "end:" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "frequency:=proc(txt)" }} {PARA 0 "> " 0 "" {MPLTEXT 1 0 78 " local i,j,k,v,z; z:=[0,0,0,0,0, 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0];" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 39 " for i from 1 while i<= length(txt) do" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 29 " j:=numb[substring(txt,i)];" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 25 " z:=subsop(j=z[j]+1,z);" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 10 " end do;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 10 "retu rn(z);" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 4 "end:" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 22 "vigvec:= proc(txt,m,n)" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 14 " local w,z,i;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 21 " z:=choo se(txt,m,n);" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 31 " w:=frequency(z)/l ength(z)*1.;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 11 " return(w);" }} {PARA 0 "> " 0 "" {MPLTEXT 1 0 4 "end:" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 165 "alfreq:=[.082, .015, .028, .043, .127, .022, .020, .061, .070 , .002, .008, .040, .024, .067, .075, .019, .001, .060, .063, .091, .0 28, .010, .023, .001, .020, .001]:" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 13 "corr:=proc(v)" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 17 " local i,j,w ,z;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 45 " w:=augment(matrix(1,26,v) ,matrix(1,26,v));" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 53 " z:=seq(sum( alfreq[i]*w[1,i+j-1],i=1..26),j=1..26);" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 11 " return(z);" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 4 "end:" }} {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "coinc:=proc(txt,s)" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 14 " local i,w,z;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 7 " z:=0;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 42 " for i from 1 whil e i <= length(txt)-s do" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 2 " " } {TEXT 213 1 " " }{MPLTEXT 1 0 64 "if substring(txt,i)=substring(txt,i+ s) then z:=z+1 else z:=z fi;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 9 " en d do;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 11 " return(z);" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 4 "end:" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "lfsr :=proc(c,k,n) " }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 18 " local f,i,j,r,z ;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 25 " z:=matrix(1,nops(k),k);" }} {PARA 0 "> " 0 "" {MPLTEXT 1 0 38 " for i from 1 while i<= n-nops(c) do" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 68 "z:=augment(z,matrix(1,1,[sum (z[1,j+i-1]*c[j],j=1..nops(c)) mod 2]));" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 10 " end do;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 36 " z:=row(z,1 );z:=[seq(z[i],i=1..n)];" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 6 " end:" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 21 "lfsrlength:=proc(v,n)" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 19 " local w,z,i,j,k; " }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 28 " for k from 1 while k<=n do" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 22 " w:=array(1..k,1..k);" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 29 " for i from 1 while i<= k do" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 29 " for j from 1 while j<= k do" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 20 " w[i,j]:=v[i+j-1];" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 8 " end do; " }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 8 " end do;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 25 " print([k,det(w) mod 2]);" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 8 " end do;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 5 " end:" } }{PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "lfsrsolve:=proc(v,n)" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 21 " local w1,w,z,i,j,k;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 23 " w1:=array(1..n,1..1);" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 22 " w:=array(1..n,1..n);" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 29 " for i from 1 while i<= n do" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 29 " \+ for j from 1 while j<= n do" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 20 " w [i,j]:=v[i+j-1];" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 8 " end do;" }} {PARA 0 "> " 0 "" {MPLTEXT 1 0 8 " end do;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 28 " for i from 1 while i<= n do" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 18 " w1[i,1]:=v[i+n]; " }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 10 " end do;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 51 " z:=evalm(det(w)* transpose(evalm(inverse(w)&*w1)));" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 46 "z:=map(x->x mod 2,z); z:=[seq(z[1,i],i=1..n)];" }}{PARA 0 "> " 0 " " {MPLTEXT 1 0 3 " z;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 4 "end:" }} {PARA 0 "> " 0 "" {MPLTEXT 1 0 21 " text2num:=proc(txt)" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 19 " local i,z; z:=0;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 39 " for i from 1 while i<=length(txt) do" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 35 " z:=100*z+numb[substring(txt,i)];" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 9 " end do;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 12 " return(z);" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 6 " end:" }} {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "num2text:=proc(n)" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 27 " local i,w,z; z:=NULL;w:=n;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 36 " for i from 1 while 100^(i-1) " 0 "" {MPLTEXT 1 0 29 " z:=cat(alph[w mod 100],z);" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 19 " w:=floor(w/100);" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 9 " end do;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 12 " return(z);" } }{PARA 0 "> " 0 "" {MPLTEXT 1 0 6 " end:" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 51 "cards:=[200514,10010311,1721050514,11091407,10305]:" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 24 "with(combinat,randperm):" }} {PARA 0 "> " 0 "" {MPLTEXT 1 0 31 "khide:=proc();2*rand()+101;end:" }} {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "shuffle:=proc(k)" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 10 " local z; " }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 90 "z :=randperm(\{cards[1]&^k,cards[2]&^k,cards[3]&^k,cards[4]&^k,cards[5]& ^k\}mod 24691313099);" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "return(z); end:" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "reveal:=proc(c) " }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 14 " local k1,z;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 31 " k1:= k&^(-1) mod 24691313098;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 68 " z:=[c[1]&^k1,c[2]&^k1,c[3]&^k1,c[4]&^k1,c[5]&^k1] m od 24691313099;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 80 "z:=[num2text(z[1 ]),num2text(z[2]),num2text(z[3]),num2text(z[4]),num2text(z[5])];" }} {PARA 0 "> " 0 "" {MPLTEXT 1 0 13 " return(z); " }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 4 "end:" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "advise:=pro c(v)" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 13 " local i,w,z;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 7 " w:=1; " }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 26 " for i from 1 while w=1 do" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 47 " w:= v[i]&^((24691313099-1)/2) mod 24691313099;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 8 " end do;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 13 " return (i-1);" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 5 "end: " }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 25 "addell:=proc(p1,p2,a,b,n)" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 24 " local z,z1,m,x3,y3,p3;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 7 " z:=0;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 8 " z1:=1;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 62 " if p1=[\"infinity\",\"infinity \"] then p3:=p2; z:=1 else end if;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 23 " if z=1 then NULL else " }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 75 " if p2=[\"infinity\",\"infinity\"] then p3:=p1; z:=1 else end if en d if;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 23 " if z=1 then NULL else " } }{PARA 0 "> " 0 "" {MPLTEXT 1 0 81 " if p1[1]=p2[1] and p1[2]=0 then \+ p3:=[\"infinity\",\"infinity\"]; z:=1 else end if" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 9 " end if;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 22 " if z=1 then NULL else" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 39 " if p1[1]=p 2[1] and p1[2]<>p2[2] then " }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 55 " p3 :=[\"infinity\",\"infinity\"]; z:=1 else end if end if;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 23 " if z=1 then NULL else " }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 50 " if p1=p2 and gcd(p1[2],n)<>1 and gcd(p1[2],n)<>n" } }{PARA 0 "> " 0 "" {MPLTEXT 1 0 50 " then z1:=gcd(p1[2],n); z:=1 els e end if end if;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 23 " if z=1 then NU LL else " }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 102 " if p1=p2 then m:=( (3*p1[1]^2+a)*((2*p1[2])&^(-1) mod n)) mod n; z:=1; x3:=(m^2-p1[1]-p2[ 1]) mod n;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 32 " y3:=(m*(p1[1]-x3)-p1 [2]) mod n;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 12 "p3:=[x3,y3];" }} {PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "else end if end if;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 23 " if z=1 then NULL else " }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 79 " if gcd(p2[1]-p1[1],n)<>1 then z:=1;z1:=gcd(p2[1]-p1 [1],n) else end if end if;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 23 " if z =1 then NULL else " }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 56 " m:= ((p2[2] -p1[2])*((p2[1]-p1[1])&^(-1) mod n)) mod n;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 84 " x3:=(m^2-p1[1]-p2[1]) mod n; y3:= (m*(p1[1]-x3)-p1[ 2]) mod n; p3:= [x3,y3] end if;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 59 " if z1=1 then return(p3) else return([\"factor=\",z1]) end if;" }} {PARA 0 "> " 0 "" {MPLTEXT 1 0 4 "end:" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 26 "multsell:=proc(p1,m,a,b,n)" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 11 " local i,z;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 13 " z:=[[1,p1]];" } }{PARA 0 "> " 0 "" {MPLTEXT 1 0 54 " for i from 2 while i<=m and z[-1] [2][1]<>\"factor=\" do" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 55 " z:=[op(z ),[1+nops(z),addell(p1,z[nops(z)][2],a,b,n)]];" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 9 " end do;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 11 " retur n(z);" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 4 "end:" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 24 "multell:=proc(p,m,a,b,n)" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 18 " local i,j,q,y,z1;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 28 " y:=[\"infinity\",\"infinity\"];" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 6 " q:=p;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 8 " z1:=m; " }}{PARA 0 " > " 0 "" {MPLTEXT 1 0 48 " for i from 1 while z1<>0 and y[1]<>\"factor =\" do" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 57 " for j from 1 while z1 m od 2 = 0 and q[1]<>\"factor=\" do" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 42 " z1:=z1/2; q:=addell(q,q,a,b,n); end do;" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 50 " z1:=z1-1; y:=addell(q,y,a,b,n); end do; " } }{PARA 0 "> " 0 "" {MPLTEXT 1 0 48 " if q[1]=\"factor=\" then y:=q el se NULL end if; " }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 1 " " }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 11 " return(y);" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 4 "end:" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 37 "gaul:= \"gaulisdividedin tothreeparts\":" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 115 "ycve:= \"ycvejq wvhqtdtwvwu\": jidf:=\"jidfbidzzteztxjsichfoihuszzsfsaichbipahsibdhuhz sichjujgfabbczggjsvzubehhgjsv\": \n" }{MPLTEXT 1 0 40 "edsg:= \"edsgic kxhuklzveqzvkxwkzukcvuh\":\n" }{MPLTEXT 1 0 151 "tcab:= \"tcabtiqmfheq qmrmvmtmaq\": lcll:=\"lcllewljazlnnzmvyiylhrmhza\": DNA:= \+ \"GAATTCGCGGCCGCAATTAACCCTCACTAAAGGGATCTCTAGAACT\": " } }{PARA 0 "> " 0 "" {MPLTEXT 1 0 82 "xkju:= \"xkjurowmllpxwznpimbvbqjcn owxpcchhvvfvsllfvxhazityxohulxqojaxelxzxmyjaqfs\\\n" }{MPLTEXT 1 0 80 "tsrulhhucdskbxknjqidallpqslluhiaqfpbpcidsvcihwhwewthbtxrljnrsncihuvff uxvoukjlj\\\n" }{MPLTEXT 1 0 80 "swmaqfvjwjsdyljogjxdboxajultucpzmpliw mlubzxvoodybafdskxgqfadshxnxehsaruojaqfpf\\\n" }{MPLTEXT 1 0 80 "kndhs aafvulluwtaqfrupwjrszxgpfutjqiynrxnyntwmhcukjfbirzsmehhsjshyonddzzntzm pli\\\n" }{MPLTEXT 1 0 27 "lrwnmwmlvuryonthuhabwnvw\":\n" }{MPLTEXT 1 0 82 "ocwy:= \"ocwyikoooniwugpmxwktzdwgtssayjzwyemdlbnqaaavsuwdvbrflau plooubfgqhgcscmgz\\\n" }{MPLTEXT 1 0 80 "latoedcsdeidpbhtmuovpiekifpim fnoamvlpqfxejsmxmpgkccaykwfzpyuavtelwhrhmwkbbvgtg\\\n" }{MPLTEXT 1 0 80 "uvtefjlodfefkvpxsgrsorvgtajbsauhzrzalkwuowhgedefnswmrciwcpaaavogpd nfpktdbalsis\\\n" }{MPLTEXT 1 0 80 "urlnpsjyeatcuceesohhdarkhwotikbroq rdfmzghgucebvgwcdqxgpbgqwlpbdaylooqdmuhbdqgm\\\n" }{MPLTEXT 1 0 8 "ywe uik\":" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 80 "hdsf:= \"hdsfgvmkoowafwee tcmfthskucaqbilgjofmaqlgspvatvxqbiryscpcfrmvswrvnqlszd\\\n" }{MPLTEXT 1 0 80 "mgaoqsakmlupsqforvtwvdfcjzvgsoaoqsacjkbrsevbelvbksarlscdcaarmn vrysywxqgvellcyl\\\n" }{MPLTEXT 1 0 80 "uwwveoafgclazowafojdlhssfiksep soywxafowlbfcsocylngqsyzxgjbmlvgrggokgfgmhlmejab\\\n" }{MPLTEXT 1 0 80 "sjvgmlnrvqzcrggcrghgeupcyfgtydycjkhqluhgxgzovqswpdvbwsffsenbxapasg azmyuhgsfhmf\\\n" }{MPLTEXT 1 0 43 "tayjxmwznrsofrsoaopgauaaarmftqsmah vqecev\":\n" }{MPLTEXT 1 0 80 "vvhq:= \"vvhqwvvrhmusgjgthkihtssejchlsf cbgvwcrlryqtfsvgahwkcuhwauglqhnslrljshbl\\\n" }{MPLTEXT 1 0 80 "tspisp rdxljsveeghlqwkasskuwepwqtwvspgoelkcqyfnsvwljsniqkgnrgybwlwgoviokhkazk qk\\\n" }{MPLTEXT 1 0 80 "xzgyhcecmeiujoqkwfwvefqhkijrclrlkbienqfrjljs dhgrhlsfqtwlauqrhwdmwlgusgikkflryv\\\n" }{MPLTEXT 1 0 80 "cwvspgpmlkas sjvoqxeggveyggzmljcxxljsvpaivwikvrdrygfrjljslveggveyggeiapuuisfpbt\\\n " }{MPLTEXT 1 0 30 "gnwwmuczrvtwglrwugumnczvile\":\n" }{MPLTEXT 1 0 78 "L100:= [1, 0, 0, 1, 1, 0, 0, 1, 0, 0, 1, 1, 1, 0, 0, 0, 1, 1, 0, 0 , 0, 1, 0, \n" }{MPLTEXT 1 0 79 " 1, 0, 0, 0, 1, 1, 1, 1, 0, 1, 1 , 0, 0, 1, 1, 1, 1, 1, 0, 1, 0, 1, 0, 1, \n" }{MPLTEXT 1 0 79 " 0 , 0, 1, 0, 1, 1, 0, 1, 1, 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 1, 0, 1, 1, 1, \n" }{MPLTEXT 1 0 79 " 0, 0, 1, 0, 1, 0, 1, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 1, 0, 0, \n" }{MPLTEXT 1 0 22 " 1, 0, 0, 0, 0]:\n" }{MPLTEXT 1 0 80 "L011:= [0, 1, 1, 0, 0, 0, 1, 0, 1, 0, 1, 1, \+ 1, 0, 0, 1, 1, 1, 0, 1, 0, 1, 0, 0,\n" }{MPLTEXT 1 0 79 " 0, 1, \+ 0, 0, 0, 1, 1, 0, 0, 0, 1, 0, 1, 0, 1, 1, 1, 0, 0, 1, 1, 1, 0, 1,\n" } {MPLTEXT 1 0 14 " 0, 1]:\n" }{MPLTEXT 1 0 59 "L101:= [1, 0, 1, 0 , 0, 1, 1, 0, 1, 1, 0, 0, 0, 1, 0, 0, 1,\n" }{MPLTEXT 1 0 60 " 0, 0, 0, 0, 1, 1, 1, 0, 0, 0, 0, 0, 1, 0, 1, 1, 1, 1,\n" }{MPLTEXT 1 0 79 " 1, 1, 0, 0, 1, 0, 1, 0, 1, 0, 0, 0, 1, 1, 0, 0, 1, 1, 1, 1, \+ 0, 1, 1, 1, \n" }{MPLTEXT 1 0 79 " 0, 1, 0, 1, 1, 0, 1, 0, 0, 1, \+ 1, 0, 1, 1, 0, 0, 0, 1, 0, 0, 1, 0, 0, 0, \n" }{MPLTEXT 1 0 28 " \+ 0, 1, 1, 1, 0, 0, 0]:\n" }{MPLTEXT 1 0 80 "rsan:= 11438162575788886766 923577997614661201021829672124236256256184293570693\\\n" }{MPLTEXT 1 0 60 "5245733897830597123563958705058989075147599290026879543541:\n" } {MPLTEXT 1 0 13 "rsae:= 9007:\n" }{MPLTEXT 1 0 80 "rsaci:= 96869613754 62206147714092225435588290575999112457431987469512093081629\\\n" } {MPLTEXT 1 0 60 "82251457083569314766228839896280133919905518299451578 15154:\n" }{MPLTEXT 1 0 73 "rsap:= 34905295108476509491478496199038981 33417764638493387843990820577:\n" }{MPLTEXT 1 0 74 "rsaq:= 32769132993 266709549961988190834461413177642967992942539798288533:\n" }{MPLTEXT 1 0 67 "naive:= 152415787501905985701881832150835089037858868621211004 433:\n" }{MPLTEXT 1 0 68 "cnaive:= 14107746176556950024119950561785467 3388398574333341423525:\n" }{MPLTEXT 1 0 1441 "n1:=8834884587090814646 372459890377418962766907: sigpairm1:=4187265 53997094258577980055061305150940547956: sigpairs1:=7491426496415481015 20133634736865752883277237: sigpairm2:=1482376523249871234451241871713 0930: sigpairs2:=43176121628465441340112418672065063: signa:=1710 24704183616109700818066925197841516671277: signb:=83907354273436935926 0871355939062622747633109: sigpb:=98763457697834568934613: sigqb:=849 5789457893457345793: golay:=Matrix(12,24,[1,0,0,0,0,0,0,0,0,0 ,0,0,1,1,1,0,1,1,1,0,0,0,1,0,0,1,0,0,0,0,0,0,0,0,0,0,1,0,1,1,0,1,1,1,0 ,0,0,1,0,0,1,0,0,0,0,0,0,0,0,0,1,1,0,1,1,0,1,1,1,0,0,0,0,0,0,1,0,0,0,0 ,0,0,0,0,1,0,1,0,1,1,0,1,1,1,0,0,0,0,0,0,1,0,0,0,0,0,0,0,1,0,0,1,0,1,1 ,0,1,1,1,0,0,0,0,0,0,1,0,0,0,0,0,0,1,0,0,0,1,0,1,1,0,1,1,1,0,0,0,0,0,0 ,1,0,0,0,0,0,1,1,0,0,0,1,0,1,1,0,1,1,0,0,0,0,0,0,0,1,0,0,0,0,1,1,1,0,0 ,0,1,0,1,1,0,1,0,0,0,0,0,0,0,0,1,0,0,0,1,1,1,1,0,0,0,1,0,1,1,0,0,0,0,0 ,0,0,0,0,0,1,0,0,1,0,1,1,1,0,0,0,1,0,1,1,0,0,0,0,0,0,0,0,0,0,1,0,1,1,0 ,1,1,1,0,0,0,1,0,1,0,0,0,0,0,0,0,0,0,0,0,1,0,1,1,1,1,1,1,1,1,1,1,1]): \+ golayb:=Matrix(12,12,[1,1,1,0,1,1,1,0,0,0,1,0,1,0,1,1,0,1,1,1,0,0,0,1, 1,1,0,1,1,0,1,1,1,0,0,0,1,0,1,0,1,1,0,1,1,1,0,0,1,0,0,1,0,1,1,0,1,1,1, 0,1,0,0,0,1,0,1,1,0,1,1,1,1,1,0,0,0,1,0,1,1,0,1,1,1,1,1,0,0,0,1,0,1,1, 0,1,1,1,1,1,0,0,0,1,0,1,1,0,1,0,1,1,1,0,0,0,1,0,1,1,1,1,0,1,1,1,0,0,0, 1,0,1,0,1,1,1,1,1,1,1,1,1,1,1]): hammingpc:=Matrix(4,15,[0,0,0,0,1,1,1 ,1,1,1,1,1,0,0,0,\n" }{MPLTEXT 1 0 61 "1,1,1,0,0,0,0,1,1,1,1,0,1,0,0,0 ,1,1,1,0,1,1,0,0,1,1,0,0,1,0,\n" }{MPLTEXT 1 0 32 "1,0,1,1,1,0,1,0,1,0 ,1,0,0,0,1]):" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 145 "XXXX:= \"DON'T FO RGET TO HIT RETURN TO LOAD THE ABOVE COMMANDS BEFORE STARTING YOUR WOR K. PUT THE CURSOR HERE, OR HIGHER, BEFORE HITTING RETURN.\":" }}} {EXCHG {PARA 0 "> " 0 "" {XPPEDIT 19 1 "Typesetting:-mi(\"?\", italic \+ = \"true\", mathvariant = \"italic\");" "-I#miG6#/I+modulenameG6\"I,Ty pesettingGI(_syslibGF'6%Q\"?F'/%'italicGQ%trueF'/%,mathvariantGQ'itali cF'" }}}} {MARK "0 0 0" 0 }{VIEWOPTS 1 1 0 1 1 1803 1 1 1 1 }{PAGENUMBERS 0 1 2 33 1 1 }