Re: how to build pattern for a square matrix of reals?

*To*: mathgroup at smc.vnet.net*Subject*: [mg98403] Re: [mg98379] how to build pattern for a square matrix of reals?*From*: "David Park" <djmpark at comcast.net>*Date*: Thu, 9 Apr 2009 05:52:46 -0400 (EDT)*References*: <21689449.1239182166287.JavaMail.root@n11>

f[m : {{_Real ..} ..} /; Length[Dimensions[m]] == 2 \[And] Equal @@ Dimensions[m]] := "You have entered a real square matrix." f[{{1, 2}, {3, 4}} // N] f[{{1, 2}, {3, 4, 5}} // N] f[{{1, 2}, {3, 4}}] David Park djmpark at comcast.net http://home.comcast.net/~djmpark/ From: sagrailo at gmail.com [mailto:sagrailo at gmail.com] As in subject: how to build a pattern that will specify that given argument of a function has to be square matrix of reals? Tried with following for "square matrix" part: f[x_?MatrixQ[#] && Dimensions[#][[1]] == Dimensions[#][[2]] &] := ... but it doesn't seem to be working... Thanks.