{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 "courier" 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 260 "courier" 0 1 0 0 0 0 0 0 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 "" 1 18 0 0 0 0 0 1 0 0 0 0 0 0 0 }{CSTYLE "" -1 264 "" 1 18 0 0 0 0 0 1 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 Out put" 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 }} {SECT 0 {EXCHG {PARA 256 "" 0 "" {TEXT 256 22 "protobox['rm_element'] " }{TEXT -1 122 " - remove some elements from the a input list, the in dex of those elements needed to be removed is also input as a list\n\n " }{TEXT 257 17 "Calling Sequence:" }{TEXT -1 35 "\n protobox['rm_ele ment']( I, L )\n\n " }{TEXT 258 12 "Parameters: " }{TEXT -1 2 "\n " } {TEXT 259 1 "I" }{TEXT -1 86 " - a list, its elements specify the inde x of the elements in L needed to be removed\n " }{TEXT 260 1 "L" } {TEXT -1 52 " - a list, some of its elements are to be removed\n\n " } {TEXT 261 7 "Return:" }{TEXT -1 3 "\n " }{TEXT 262 8 "new_list" } {TEXT -1 80 " - a list formed from the input list but without the elem ents specified in I \n\n " }{TEXT 263 13 "Description: " }{TEXT -1 155 "\n - this procedure returns a list that its elements are in the o rder from the input list L yet without those elements corresponding to the index list I\n\n\n " }{TEXT 264 9 "Example: " }{TEXT -1 52 "\n re move the first and the third elements in list_i:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 39 "testlist := [ L_1, L_2, L_3, L_4, L_5]:" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 40 "protobox['rm_element']([3,1] , testlist);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#7%%$L_2G%$L_4G%$L_5G" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 257 "" 0 "" {TEXT -1 21 "Last Update: 2/2/2000" }}}}{MARK "4 0 0" 7 } {VIEWOPTS 1 1 0 1 1 1803 }