{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 } {CSTYLE "" -1 256 "" 1 18 0 0 0 0 0 1 0 0 0 0 0 0 0 }{CSTYLE "" -1 257 "" 1 18 0 0 0 0 0 1 0 0 0 0 0 0 0 }{CSTYLE "" -1 258 "" 1 18 0 0 0 0 0 1 0 0 0 0 0 0 0 }{CSTYLE "" -1 259 "" 1 18 0 0 0 0 0 1 0 0 0 0 0 0 0 }{CSTYLE "" -1 260 "" 1 18 0 0 0 0 0 1 0 0 0 0 0 0 0 }{CSTYLE " " -1 261 "" 1 18 0 0 0 0 0 1 0 0 0 0 0 0 0 }{CSTYLE "" -1 262 "courier " 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 263 "courier" 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 264 "courier" 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 265 "courier" 0 1 0 0 0 0 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 }{PSTYLE "" 0 256 1 {CSTYLE "" -1 -1 "" 1 14 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 "" 0 257 1 {CSTYLE "" -1 -1 "" 1 14 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 "" 0 259 1 {CSTYLE "" -1 -1 "" 1 14 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 256 "" 0 "" {TEXT 256 17 "protobox['slice']" } {TEXT -1 159 " - form a new list from the input list, whose elements a re either all lists or all tables, by slicing a specific component fro m each list or table element \n \n " }{TEXT 257 17 "Calling Sequence: " }{TEXT -1 30 "\n protobox['slice']( L, I )\n\n" }{TEXT 258 11 "Para meters:" }{TEXT -1 4 "\n " }{TEXT 262 1 "L" }{TEXT -1 112 " - a list of lists or a list of tables L := [ L_1, L_2,..., L_n ], and all L_i 's are either lists or tables\n " }{TEXT 263 2 "I " }{TEXT -1 132 "- the index to indicate the element in each list element L_i in L, or t he index to indicate the entry in each table element L_i in L" }} {PARA 257 "" 0 "" {TEXT -1 2 "\n " }{TEXT 259 7 "Return:" }{TEXT -1 4 "\n " }{TEXT 264 5 "slist" }{TEXT -1 102 " - a list whose each eleme nt is the 'I'-indexed element in the corresponding list/table element \+ in L, " }{TEXT 265 6 "sliceL" }{TEXT -1 37 " := [ L_1[I], L_2[I],..., \+ L_n[I] ]\n\n " }{TEXT 260 12 "Description:" }{TEXT -1 279 "\n - During the computation process, different types of information are stored in a list or a table. However, some computations does not need all types of information, therefore, it would be convenient to form a list out \+ of the same type of information from each list or table.\n\n " }{TEXT 261 9 "Examples:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 13 "L_1:=[1 ,2,3]:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 13 "L_2:=[4,5,6]:" }} }{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 13 "L_3:=[7,8,9]:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 35 "protobox['slice']([L_1,L_2,L_3],2); " }}{PARA 11 "" 1 "" {XPPMATH 20 "6#7%\"\"#\"\"&\"\")" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 53 "T_1:=table(['October'=5,'November'= 8,'December'=10]):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 52 "T_2:= table(['October'=7,'November'=4,'December'=3]):" }}}{EXCHG {PARA 0 "> \+ " 0 "" {MPLTEXT 1 0 52 "T_3:=table(['October'=3,'November'=2,'December '=9]):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 43 "protobox['slice'] ([T_1,T_2,T_3],'October');" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#7%\"\"& \"\"(\"\"$" }}}{EXCHG {PARA 259 "" 0 "" {TEXT -1 23 "\n Last Update: 2 /2/2000" }}}}{MARK "9 0 0" 23 }{VIEWOPTS 1 1 0 1 1 1803 }