{VERSION 2 3 "IBM INTEL NT" "2.3" } {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 "Hyperlink" -1 17 "" 0 1 0 128 128 1 0 0 1 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 " " 0 21 "" 0 1 0 0 0 1 0 0 0 0 2 0 0 0 0 }{CSTYLE "Help Heading" -1 26 "" 1 14 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 "Heading 1" 0 3 1 {CSTYLE "" -1 -1 "" 1 18 0 0 0 0 0 1 0 0 0 0 0 0 0 }1 0 0 0 6 6 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 "" 11 12 1 {CSTYLE "" -1 -1 "" 0 1 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 }{PSTYLE "Bullet Item " 0 15 1 {CSTYLE "" -1 -1 "" 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 }0 0 0 -1 3 3 0 0 0 0 0 0 15 2 }} {SECT 0 {SECT 0 {PARA 0 "" 0 "" {TEXT 26 9 "Function:" }{TEXT -1 29 " \+ clear - selective forgetting" }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT 26 18 "Calling Sequences:" }}{PARA 0 "" 0 "" {MPLTEXT 0 21 15 "clear(f, vals);" }}{PARA 0 "" 0 "" {MPLTEXT 0 21 20 "clear(f, keep=vals);" }}{PARA 0 "" 0 "" {MPLTEXT 0 21 22 "clear(f, delete=vals );" }}{PARA 0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "" 0 "" {TEXT 26 11 "Par ameters:" }}{PARA 0 "" 0 "" {MPLTEXT 0 21 1 "f" }{TEXT -1 26 " \+ - a procedure" }}{PARA 0 "" 0 "" {MPLTEXT 0 21 4 "vals" }{TEXT -1 33 " - a list or set of values. " }}}{SECT 0 {PARA 3 "" 0 "" {TEXT 26 12 "Description:" }}{PARA 15 "" 0 "" {TEXT -1 38 "This return s a procedure identical to " }{MPLTEXT 0 21 1 "f" }{TEXT -1 156 ", exc ept for the remember table. The remember table of the new procedure i s obtained by deleting some or all entries, as determined by the secon d argument." }}{PARA 15 "" 0 "" {TEXT -1 46 "To delete entries from th e remember table for " }{MPLTEXT 0 21 1 "f" }{TEXT -1 23 ", assign the result to " }{MPLTEXT 0 21 1 "f" }{TEXT -1 25 ". Note that if the na me " }{MPLTEXT 0 21 1 "f" }{TEXT -1 42 " is protected you must first u nprotect it." }}{PARA 15 "" 0 "" {TEXT -1 61 "Ordinarily, when one pro cedure is copied to another (e.g. by " }{MPLTEXT 0 21 14 "f2:= eval(f1 ))" }{TEXT -1 112 ", both procedures share the same remember table, an d changes to one table affect the other. With the result of " } {MPLTEXT 0 21 5 "clear" }{TEXT -1 42 " this does not occur. Thus you \+ could use " }{MPLTEXT 0 21 25 "f2:= clear(f1, delete=\{\})" }{TEXT -1 126 " to obtain a copy of a procedure whose remember table is initiall y the same, but any changes in one will not affect the other." }} {PARA 15 "" 0 "" {TEXT -1 12 "In the form " }{MPLTEXT 0 21 21 "clear(f , delete=vals)" }{TEXT -1 42 ", the remember table entries specified b y " }{MPLTEXT 0 21 4 "vals" }{TEXT -1 56 " are deleted, and all others are retained. In the form " }{MPLTEXT 0 21 14 "clear(f, vals)" } {TEXT -1 4 " or " }{MPLTEXT 0 21 19 "clear(f, keep=vals)" }{TEXT -1 27 ", the entries specified by " }{MPLTEXT 0 21 4 "vals" }{TEXT -1 41 " are retained and all others are deleted." }}{PARA 15 "" 0 "" {TEXT -1 18 "If all members of " }{MPLTEXT 0 21 4 "vals" }{TEXT -1 59 " are \+ lists, each member is taken to be a list of arguments " }{MPLTEXT 0 21 13 "[a1, a2, ...]" }{TEXT -1 29 " referring to the entry for " } {MPLTEXT 0 21 12 "f(a1,a2,...)" }{TEXT -1 24 " in the remember table. " }}{PARA 15 "" 0 "" {TEXT -1 25 "If any of the members of " } {MPLTEXT 0 21 4 "vals" }{TEXT -1 66 " is not a list, then each member \+ is taken to be a single argument " }{MPLTEXT 0 21 1 "x" }{TEXT -1 28 " referring to the entry for " }{MPLTEXT 0 21 4 "f(x)" }{TEXT -1 23 " i n the remember table." }}{PARA 15 "" 0 "" {TEXT -1 30 "To see the rema inder table of " }{MPLTEXT 0 21 1 "f" }{TEXT -1 6 ", use " }{MPLTEXT 0 21 13 "op(4,eval(f))" }{TEXT -1 36 ". For the indices of the table, use" }{MPLTEXT 0 21 23 " indices(op(4,eval(f)))" }{TEXT -1 1 "." }} {PARA 15 "" 0 "" {TEXT -1 34 "These are the differences between " } {MPLTEXT 0 21 5 "clear" }{TEXT -1 5 " and " }{MPLTEXT 0 21 6 "forget" }{TEXT -1 6 ":\n 1) " }{MPLTEXT 0 21 13 "forget(f,...)" }{TEXT -1 60 " does not return a value, but affects the remember table of " } {MPLTEXT 0 21 1 "f" }{TEXT -1 2 "; " }{MPLTEXT 0 21 12 "clear(f,...)" }{TEXT -1 78 " returns a new procedure with the changed remember table , but does not affect " }{MPLTEXT 0 21 1 "f" }{TEXT -1 34 " (unless yo u assign the result to " }{MPLTEXT 0 21 1 "f" }{TEXT -1 12 ").\n 2) \+ In " }{MPLTEXT 0 21 6 "forget" }{TEXT -1 78 " you delete the whole rem ember table (except what is given in the procedure's " }{MPLTEXT 0 21 2 ".m" }{TEXT -1 87 " file, if it is a library procedure) or specify a single entry to be deleted, while in " }{MPLTEXT 0 21 5 "clear" } {TEXT -1 91 " you can specify the entries to be retained, or any numbe r of entries to be deleted .\n 3) " }{MPLTEXT 0 21 6 "forget" }{TEXT -1 14 " re-reads the " }{MPLTEXT 0 21 2 ".m" }{TEXT -1 31 " file for a library procedure; " }{MPLTEXT 0 21 5 "clear" }{TEXT -1 18 " does not . \n 4) " }{MPLTEXT 0 21 6 "forget" }{TEXT -1 61 " can also affect s ubprocedures, those whose names begin with " }{MPLTEXT 0 21 2 "f/" } {TEXT -1 2 "; " }{MPLTEXT 0 21 5 "clear" }{TEXT -1 10 " does not." }} {PARA 15 "" 0 "" {TEXT -1 106 "This function is part of the Maple Advi sor Database library, and must be loaded before use by the command " } {MPLTEXT 0 21 15 "readlib(clear);" }{TEXT -1 1 "." }}}{SECT 0 {PARA 3 "" 0 "" {TEXT 26 9 "Examples:" }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "readlib(clear):" }}}{PARA 0 "" 0 "" {TEXT -1 44 "Here is the for m for one-argument functions:" }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 51 "f:= x -> x^2: f(one):= 1: f(two):= 2: f(three):= 3:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 25 "f(one), f(two), f(three);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6%\"\"\"\"\"#\"\"$" }}}{EXCHG {PARA 0 "> " 0 " " {MPLTEXT 1 0 60 "f1:= clear(f, keep=\{two,three\}):\nf1(one),f1(two) ,f1(three);\n" }}{PARA 11 "" 1 "" {XPPMATH 20 "6%*$%$oneG\"\"#F%\"\"$ " }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 55 "f2:= clear(f, \{one,thr ee\}):\nf2(one),f2(two),f2(three);\n" }}{PARA 11 "" 1 "" {XPPMATH 20 " 6%\"\"\"*$%$twoG\"\"#\"\"$" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 57 "f3:= clear(f, delete=\{three\}):\nf3(one),f3(two),f3(three);" }} {PARA 11 "" 1 "" {XPPMATH 20 "6%\"\"\"\"\"#*$%&threeGF$" }}}{PARA 0 " " 0 "" {TEXT -1 33 "Note that the remember table for " }{MPLTEXT 0 21 1 "f" }{TEXT -1 19 " is still the same:" }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 25 "f(one), f(two), f(three);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6%\"\"\"\"\"#\"\"$" }}}{PARA 0 "" 0 "" {TEXT -1 51 "This \+ time we work with a function of two arguments:" }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 70 "g:= (x,y) -> 'procname(args)':\ng(one,two):= thr ee: g(two,three):=five:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 55 " h:=clear(g,keep=\{[one,two]\}):\nh(one,two), h(two,three);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6$%&threeG-%\"hG6$%$twoGF#" }}}{PARA 0 "" 0 " " {TEXT -1 37 "Here we work with a library function." }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 27 "indices(op(4,eval(`sin`)));" }}{PARA 12 " " 1 "" {XPPMATH 20 "617#,$%#PiG#\"\"\"\"\"'7#,$F%#\"\"$\"#57#,$F%#F'F, 7#,$F%#F'\"\")7#,$F%#F,F47#,$F%#F'\"\"%7#F%7#,$F%#\"\"&\"#77#,$F%#F'\" \"#7#,$F%#F'F@7#,$F%#F'FA7#,$F%#F'F-7#\"\"!7#,$F%#FEF@7#%\"IG" }}} {EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 49 "unprotect(sin); sin:=clear(s in,keep=\{0,Pi,2*Pi\}):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 27 " indices(op(4,eval(`sin`)));" }}{PARA 11 "" 1 "" {XPPMATH 20 "6$7#%#PiG 7#\"\"!" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "sin(2*Pi);sin(Pi /3);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#\"\"!" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#-%$sinG6#,$%#PiG#\"\"\"\"\"$" }}}{PARA 0 "" 0 "" {TEXT -1 11 "To restore " }{MPLTEXT 0 21 3 "sin" }{TEXT -1 28 " to its origi nal state, use " }{MPLTEXT 0 21 7 "readlib" }{TEXT -1 1 ":" }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 13 "readlib(sin):" }}}}{SECT 0 {PARA 0 "" 0 "" {TEXT 26 9 "See also:" }{TEXT -1 1 " " }{HYPERLNK 17 "forget" 2 "forget" "" }{TEXT -1 2 ", " }{HYPERLNK 17 "remember" 2 "remember" " " }}}{SECT 0 {PARA 0 "" 0 "" {TEXT 26 22 "Maple Advisor Database" } {TEXT -1 17 " R. Israel, 1998" }}}}{MARK "3 0 0" 4 }{VIEWOPTS 1 1 0 1 1 1803 }