RosettaCodeData/Task/Bitmap-Read-a-PPM-file/Euphoria/bitmap-read-a-ppm-file-2.euphoria
Ingy döt Net 764da6cbbb CDE
2013-04-10 16:57:12 -07:00

5 lines
126 B
Text

sequence image
image = read_ppm("image.ppm")
image = to_gray(image)
image = to_color(image)
write_ppm("image_gray.ppm",image)