Sierpinski square curve: Difference between revisions

Added Sidef
(Added Perl example)
(Added Sidef)
Line 372:
 
main()</lang>
 
=={{header|Sidef}}==
Uses the '''LSystem()''' class from [https://rosettacode.org/wiki/Hilbert_curve#Sidef Hilbert curve].
<lang ruby>var rules = Hash(
x => 'xF-F+F-xF+F+xF-F+F-x',
)
 
var lsys = LSystem(
width: 510,
height: 510,
 
xoff: -505,
yoff: -254,
 
len: 4,
angle: 90,
color: 'dark green',
)
 
lsys.execute('F+xF+F+xF', 5, "sierpiński_square_curve.png", rules)</lang>
Output image: [https://github.com/trizen/rc/blob/master/img/sierpi%C5%84ski_square_curve-sidef.png Sierpiński square curve]
 
=={{header|zkl}}==
2,756

edits