Color quantization: Difference between revisions

Content added Content deleted
(Added Perl example)
(Rename Perl 6 -> Raku, alphabetize, minor clean-up)
Line 8: Line 8:
Note: the funny color bar on top of the frog image is intentional.
Note: the funny color bar on top of the frog image is intentional.
<br clear=left>
<br clear=left>

=={{header|C}}==
=={{header|C}}==
[[file:quantum_frog_C.png|C output|thumb|200px]]
[[file:quantum_frog_C.png|C output|thumb|200px]]
Line 126: Line 127:
free(heap.buf);
free(heap.buf);
}</lang>
}</lang>



=={{header|Common Lisp}}==
=={{header|Common Lisp}}==
Line 1,283: Line 1,283:
run(execstring)
run(execstring)
</lang>
</lang>



=={{header|Kotlin}}==
=={{header|Kotlin}}==
Line 1,472: Line 1,471:
Compare offsite images: [https://github.com/SqrtNegInf/Rosettacode-Perl5-Smoke/blob/master/ref/frog.png frog.png] vs.
Compare offsite images: [https://github.com/SqrtNegInf/Rosettacode-Perl5-Smoke/blob/master/ref/frog.png frog.png] vs.
[https://github.com/SqrtNegInf/Rosettacode-Perl5-Smoke/blob/master/ref/frog-16.png frog-16.png]
[https://github.com/SqrtNegInf/Rosettacode-Perl5-Smoke/blob/master/ref/frog-16.png frog-16.png]

=={{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|Phix}}==
=={{header|Phix}}==
Line 2,153: Line 2,140:
</lang>
</lang>


=={{header|Raku}}==
(formerly 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|Sidef}}==
=={{header|Sidef}}==