Re: Re: Re: too many special linear matrices
- To: mathgroup at smc.vnet.net
- Subject: [mg68900] Re: [mg68836] Re: [mg68824] Re: too many special linear matrices
- From: gardyloo <gardyloo at mail.wsu.edu>
- Date: Tue, 22 Aug 2006 05:20:51 -0400 (EDT)
- References: <200608160736.DAA06175@smc.vnet.net> <CE14B3F1-9562-4363-9D03-D37E82CF28FB@mimuw.edu.pl> <ec1amo$os1$1@smc.vnet.net> <200608180712.DAA02032@smc.vnet.net> <ec64qm$1bp$1@smc.vnet.net> <200608200843.EAA04379@smc.vnet.net> <200608210727.DAA27437@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
Carl, Thank you! I was getting more and more frustrated with people not using InputForm in their messages when they post, and it turns out that they probably were. I even got frustrated with myself when I'd look at my sent messages and find that copy-and-paste into Mathematica was screwed up. This will save me lots of trouble. Who'd've thought that it was a feature with emoticons?!? C.O. Carl Woll wrote: > Roger Bagula wrote: > > >> Andrzej Kozlowski wrote: >> >> >> >> >>> Andrzej Kozlowski >>> >>> >>> >>> >>> >>> >> Andrzej Kozlowski, >> Here are the error codes I get: >> Mathematica: >> SL[n_, p_] := Module[{vars = >> Table[Unique[ >> a], {n2}], iters, mat}, iters = Map[{#, 0, p - 1} &, vars]; mat = >> Partition[vars, n]; Reap[ >> Do[If[Det[mat, >> Modulus -> p] == 1, Sow[mat], Continue[]], Evaluate[Sequence @@ >> iters]]][[2, 1]]] >> SL[2, 2] >> >> >> > Roger, > > The problem is that n2 should be n^2. I think your email client is set > up to show n^2 with 2 as a superscript, but copy and pasting this form > converts the n^2 to n2. If you are using Thunderbird, then you can > deselect Options | Display | Display emoticons as graphics so that n^2 > is displayed without superscripts to avoid this issue. > > At any rate, simply replace n2->n^2 in your corde to fix the errors you > are seeing. > > Carl Woll > Wolfram Research > > >> Table::"iterb" : "Iterator \!\({n2}\) does >> not have appropriate bounds. \!\(\*ButtonBox[\"Moreâ?¦\", ButtonStyle->\" >> RefGuideLinkText\", ButtonFrame->None, \ >> ButtonData:>\"General::iterb\"]\)" >> Table::"itform" : "Argument \!\(\(\((\(\(\({#1, 0, \(\(2 - 1\)\)}\)\) \ >> &\))\)\)[\(\({n2}\)\)]\) at position \!\(2\) does not have the correct \ >> form for an iterator. \!\(\*ButtonBox[\"Moreâ?¦\", \ >> ButtonStyle->\"RefGuideLinkText\", \ >> ButtonFrame->None, ButtonData:>\"General::itform\"]\)" >> Table::"iterb" : "Iterator \!\({n2}\) does not have appropriate bounds. \ >> \!\(\*ButtonBox[\"Moreâ?¦\", ButtonStyle->\"RefGuideLinkText\", \ >> ButtonFrame->None, ButtonData:>\"General::iterb\"]\)" >> Do::"write" : "Tag \!\(List\) in \!\({n2}\) is Protected. \ >> \!\(\*ButtonBox[\"Moreâ?¦\", ButtonStyle->\"RefGuideLinkText\", \ >> ButtonFrame->None, ButtonData:>\"General::write\"]\)" >> Do::"write" : "Tag \ >> \!\(List\) in \!\({n2}\) is Protected. \!\(\*ButtonBox[\"Moreâ?¦\", \ >> ButtonStyle->\"RefGuideLinkText\", \ >> ButtonFrame->None, ButtonData:>\"General::write\"]\)" >> Part::"partw" : "Part \!\(1\) of \!\({}\) does not exist. \ >> \!\(\*ButtonBox[\"Moreâ?¦\", ButtonStyle->\"RefGuideLinkText\", \ >> ButtonFrame->None, ButtonData:>\"General::partw\"]\)" >> Do::"write" : "Tag \ >> \!\(List\) in \!\({n2}\) is Protected. \!\(\*ButtonBox[\"Moreâ?¦\", \ >> ButtonStyle->\"RefGuideLinkText\", \ >> ButtonFrame->None, ButtonData:>\"General::write\"]\)" >> General::"stop" : "Further output of \!\(Do :: \"write\"\) will be suppressed \ >> during this calculation. \!\(\*ButtonBox[\"Moreâ?¦\", \ >> ButtonStyle->\"RefGuideLinkText\", ButtonFrame->None, ButtonData:>\"General::\ >> stop\"]\)" >> Part::"partw" : >> "Part \!\(1\) of \!\({}\) does not exist. \!\(\*ButtonBox[\"Moreâ?¦\", \ >> ButtonStyle->\"RefGuideLinkText\", ButtonFrame->None, ButtonData:>\"Ge\ >> neral::partw\"]\)" >> Part::"partw" : "Part \!\(1\) of \!\({}\) does not exist. \ >> \!\(\*ButtonBox[\"Moreâ?¦\", ButtonStyle->\"RefGuideLinkText\", \ >> ButtonFrame->None, ButtonData:>\"General::partw\"]\)" >> General::"stop" : "Further output of \!\(Part :: \"partw\"\) will be \ >> suppressed during this calculation. \!\(\*ButtonBox[\"Moreâ?¦\", \ >> ButtonStyle->\"RefGuideLinkText\", ButtonFrame->None, \ >> ButtonData:>\"General::stop\"]\)" >> {Do[If[Det[mat$16, Modulus -> 2] == 1, Sow[mat$16], Continue[]], {a$22, 0, \ >> 1}, {{n2}, 0, 1}], {}}ã??2, 1ã?? >> >> >> > > > -- ========================================================== Curtis Osterhoudt gardyloo at mail.remove_this.wsu.and_this.edu PGP Key ID: 0x088E6D7A Please avoid sending me Word or PowerPoint attachments See http://www.gnu.org/philosophy/no-word-attachments.html ==========================================================
- References:
- too many special linear matrices
- From: Roger Bagula <rlbagula@sbcglobal.net>
- Re: too many special linear matrices
- From: Roger Bagula <rlbagula@sbcglobal.net>
- Re: too many special linear matrices
- From: Roger Bagula <rlbagula@sbcglobal.net>
- Re: Re: too many special linear matrices
- From: Carl Woll <carlw@wolfram.com>
- too many special linear matrices