{VERSION 2 3 "SUN SPARC SOLARIS" "2.3" } {USTYLETAB {CSTYLE "Maple Input" -1 0 "Courier" 0 1 255 0 0 1 0 1 0 0 1 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 }} {SECT 0 {EXCHG {PARA 0 "" 0 "" {TEXT -1 27 "Modular arithmetic in Mapl e" }{TEXT -1 0 "" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 14 "3 + 27 mod 26; " }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 11 "3^9 mod 10;" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 12 "3&^9 mod 10;" }}}{EXCHG {PARA 0 "> \+ " 0 "" {MPLTEXT 1 0 13 "3^100 mod 10;" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 29 "256782625^12436353 mod 24315;" }}}{EXCHG {PARA 0 "> \+ " 0 "" {MPLTEXT 1 0 30 "256782625&^12436353 mod 24315;" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 22 "seq( 3^x , x =1..10);" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 28 "seq( 3^x mod 10 , x =1..10);" }}}} {MARK "7 0 0" 0 }{VIEWOPTS 1 1 0 1 1 1803 }