Anonymous user
Kronecker product based fractals: Difference between revisions
→{{header|Maxima}}
imported>Maxima enthusiast |
|||
Line 2,792:
=={{header|Maxima}}==
Using function
<syntaxhighlight lang="maxima">
pow_kron(matr,n):=block(MATR:copymatrix(matr),
Line 2,798:
MATR);
/* Examples (images are shown in format png)*/
A:matrix([0,1,0],[1,1,1],[0,1,0])$
B:matrix([1,1,1],[1,0,1],[1,1,1])$
Line 2,808:
at(%,[0="",1="x"]);
</syntaxhighlight>
[[File:Vicsek.png|thumb]]
=={{header|Nim}}==
| |||