aparler/RosettaCodeData
1
0
Fork 0
Code Issues 12 Pull requests 3 Projects Releases Packages Wiki Activity Actions

Data update

Browse source
This commit is contained in:
Ingy döt Net 2023-12-16 21:33:55 -08:00
parent 35bcdeebf8
commit 74c69a0df6
2427 changed files with 31826 additions and 3468 deletions
Download patch file Download diff file Expand all files Collapse all files

8
Task/Pentagram/Sidef/pentagram.sidef
View file

@ -7,19 +7,15 @@ func pentagram(dim=200, sides=5) {
<rect height="100%" width="100%" style="fill:black;" />
EOT
func cis(x) {
cos(x) + sin(x).i
}
func pline(q) {
<<-EOT
<polyline points="#{[q..., q[0], q[1]].map{|n| '%0.3f' % n }.join(' ')}"
<polyline points="#{{|n| '%0.3f' % n }.map(q, q[0], q[1]).join(' ')}"
style="fill:blue; stroke:white; stroke-width:3;"
transform="translate(#{dim}, #{dim}) rotate(-18)" />
EOT
}
var v = sides.range.map {|k| 0.9 * dim * cis(k * Num.tau / sides) }
var v = {|k| 0.9 * dim * cis(k * Num.tau / sides) }.map(^sides)
pentagram += pline([v[range(0, v.end, 2)], v[range(1, v.end, 2)]].map{.reals})
pentagram += '</svg>'