MathGroup Archive 2014

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

Search the Archive

Better way to test the number of arguments?


Hi,

I have the following code that produces the gradient of a function (with respect to all but the first variable). There is probably a better way that avoids the Switch.

Thank you,

Pavel

ddSaPartial[func_][t_, s__] := Switch[Length[{s}],
  1, {Derivative[0, 1][func][t, s]},
  2, {Derivative[0, 1, 0][func][t, s], 
   Derivative[0, 0, 1][func][t, s]},
  3, {Derivative[0, 1, 0, 0][func][t, s], 
   Derivative[0, 0, 1, 0][func][t, s], 
   Derivative[0, 0, 0, 1][func][t, s]},
  4, {Derivative[0, 1, 0, 0, 0][func][t, s], 
   Derivative[0, 0, 1, 0, 0][func][t, s], 
   Derivative[0, 0, 0, 1, 0][func][t, s], 
   Derivative[0, 0, 0, 0, 1][func][t, s]},
  5, {Derivative[0, 1, 0, 0, 0, 0][func][t, s], 
   Derivative[0, 0, 1, 0, 0, 0][func][t, s], 
   Derivative[0, 0, 0, 1, 0, 0][func][t, s], 
   Derivative[0, 0, 0, 0, 1, 0][func][t, s], 
   Derivative[0, 0, 0, 0, 0, 1][func][t, s]}
  




  • Prev by Date: missing in Manipulate
  • Next by Date: Re: Better way to test the number of arguments?
  • Previous by thread: Re: missing in Manipulate
  • Next by thread: Re: Better way to test the number of arguments?