Initial data commit

2023-07-01 11:58:00 -04:00 · 2023-07-01 11:58:00 -04:00 · f23f22d71c
commit f23f22d71c
parent 72d218235f
199087 changed files with 3378941 additions and 0 deletions
--- a/Task/Sierpinski-triangle-Graphical/PARI-GP/sierpinski-triangle-graphical.parigp
+++ b/Task/Sierpinski-triangle-Graphical/PARI-GP/sierpinski-triangle-graphical.parigp
@ -0,0 +1,12 @@
+\\ Sierpinski triangle fractal
+\\ Note: plotmat() can be found here on
+\\ http://rosettacode.org/wiki/Brownian_tree#PARI.2FGP page.
+\\ 6/3/16 aev
+pSierpinskiT(n)={
+my(sz=2^n,M=matrix(sz,sz),x,y);
+for(y=1,sz, for(x=1,sz, if(!bitand(x,y),M[x,y]=1);));\\fends
+plotmat(M);
+}
+{\\ Test:
+pSierpinskiT(9); \\ SierpT9.png
+}