MathGroup Archive 2004

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

Search the Archive

Re: How to define a routine to return multiple values

  • To: mathgroup at smc.vnet.net
  • Subject: [mg49971] Re: [mg49939] How to define a routine to return multiple values
  • From: "David Park" <djmp at earthlink.net>
  • Date: Sun, 8 Aug 2004 05:37:59 -0400 (EDT)
  • Sender: owner-wri-mathgroup at wolfram.com

Xun,

Easy, just return a list or array. Here is a simple example that
premultiplies an input matrix by a constant built-in matrix and returns a
matrix.

matmultiply[mat_?MatrixQ] /; Dimensions[mat] == {3, 3} :=
  With[{constantmatrix = {{1, 0, 0}, {0, 0, 1}, {0, 1, 0}}},
    constantmatrix.mat]

testmat = {{a, b, c}, {d, e, f}, {g, h, i}};
matmultiply[testmat]
{{a, b, c}, {g, h, i}, {d, e, f}}

You really don't have to do anything special. You can calculate and return
any kind of Mathematica expression.

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



From: Xiaoxun [mailto:dbjunxiao at hotmail.com]
To: mathgroup at smc.vnet.net

Dear Group,

In Mathematica, how to generate a function to return
multiple values simutaneously, for example, to return
a 3 by 3 tensor. Just as subroutine in Fortran..

Thanks for advice.

Xun





  • Prev by Date: First day with Mathematica 5, and now all I get is MakeExpression[ ... ]
  • Next by Date: Re: How to define a routine to return multiple values
  • Previous by thread: How to define a routine to return multiple values
  • Next by thread: Re: How to define a routine to return multiple values