Color quantization: Difference between revisions

Content added Content deleted
m (moved J above Kotlin)
(→‎{{header|Perl 6}}: Add a Perl 6 example)
Line 1,451: Line 1,451:
done;
done;
(res)</lang>
(res)</lang>

=={{header|Perl 6}}==
{{works with|Rakudo|2018.10}}

<lang perl6>use MagickWand;
use MagickWand::Enums;

my $frog = MagickWand.new;
$frog.read("./Quantum_frog.png");
$frog.quantize(16, RGBColorspace, 0, True, False);
$frog.write('./Quantum-frog-16-perl6.png');</lang>
See: [https://github.com/thundergnat/rc/blob/master/img/Quantum-frog-16-perl6.png Quantum-frog-16-perl6.png] (offsite .png image)


=={{header|PureBasic}}==
=={{header|PureBasic}}==