MathGroup Archive 1999

[Date Index] [Thread Index] [Author Index]

Search the Archive

Re: List of function-heads

  • To: mathgroup at smc.vnet.net
  • Subject: [mg17103] Re: [mg17068] List of function-heads
  • From: "David Park" <djmp at earthlink.net>
  • Date: Sat, 17 Apr 1999 03:35:03 -0400
  • Sender: owner-wri-mathgroup at wolfram.com

Peter,

In regard to setting a list of indexed functions:

My previous message gave a method which worked, but only once. The
attached notebook gives and illustrates a routine which I believe will
be more useful. This is the code.

SetIndexedFunctions::usage=
  "SetIndexedFunctions[functions_List, var, sym:a] will create a set
of \
indexed functions sym[i][var_]= functions[[i]]. Previous uses of sym
are \
cleared.";
SetIndexedFunctions[functionlist_List,var_,sym_:Global`a]:=
(Clear[sym];
  Do[sym[i][var_]=functionlist[[i]],{i,Length[functionlist]}])


The above gives an error message when evaluated, but it apparantly can
be ignored. There are no error message when using it.

David Park
djmp at earthlink.net
http://home.earthlink.net/~djmp/




  • Prev by Date: psfix in 3.02?
  • Next by Date: Re: List of function-heads
  • Previous by thread: Re: List of function-heads
  • Next by thread: Re: List of function-heads