Services & ResourcesWolfram ForumsMathGroup Archive

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

Re: too many special linear matrices

• To: mathgroup at smc.vnet.net
• Subject: [mg68824] Re: too many special linear matrices
• From: Roger Bagula <rlbagula at sbcglobal.net>
• Date: Sun, 20 Aug 2006 04:43:42 -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>
• Sender: owner-wri-mathgroup at wolfram.com

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]
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ã??

• Follow-Ups:
  • Re: Re: too many special linear matrices
    • From: Carl Woll <carlw@wolfram.com>

• References:
  • too many special linear matrices
    • From: Roger Bagula <rlbagula@sbcglobal.net>
  • Re: too many special linear matrices
    • From: Roger Bagula <rlbagula@sbcglobal.net>