Anonymous user
Yin and yang: Difference between revisions
m
→{{header|Perl}}: wrap long lines
m (→{{header|Visual Basic .NET}}: unfloat image to prevent horiz scrollbar; not successful) |
m (→{{header|Perl}}: wrap long lines) |
||
Line 837:
$opt{recurangle} //= 0;
print "<g transform='rotate($opt{angle}, $cx, $cy)'>"
if ($opt{angle});
if ($opt{flip}) { ($c, $w) = ($w, $c) };
Line 872 ⟶ 873:
HEAD
yin_yang(200, 250, 250, recur=>1,
angle=>0, recurangle=>90, fill=>'white', stroke=>'black');
yin_yang(100, 500, 500);
| |||