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