|
[Date Index]
[Thread Index]
[Author Index]
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
|
