Mathematica 9 is now available
Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
2006
*January
*February
*March
*April
*May
*June
*July
*August
*September
*October
*November
*December
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 2006

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

Search the Archive

Re: Re: too many special linear matrices


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


  • Prev by Date: Re: Problem with NMaximize
  • Next by Date: Re: benchmark...why don't you send it back?
  • Previous by thread: Re: too many special linear matrices
  • Next by thread: Re: Re: Re: too many special linear matrices