Kronecker product based fractals: Difference between revisions

imported>Maxima enthusiast
imported>Maxima enthusiast
Line 2,792:
 
=={{header|Maxima}}==
Using function defined in Kronecker product task page. [[https://rosettacode.org/wiki/Kronecker_product#Maxima|KroneckerProduct Kronecker Product]]
 
[[File:Vicsek.png|thumb]]
 
[[File:SierpinskiCarpet.png|thumb]]
<syntaxhighlight lang="maxima">
pow_kron(matr,n):=block(MATR:copymatrix(matr),
Line 2,816 ⟶ 2,813:
at(%,[0="",1="x"]);
</syntaxhighlight>
 
[[File:Vicsek.png|thumb|center]]
 
[[File:SierpinskiCarpet.png|thumb|center]]
 
=={{header|Nim}}==