Bitmap/Read a PPM file: Difference between revisions
m
→{{header|Phix}}: minor tidy
(Replaced "initImage" by "newImage" (change in "bitmap.nim" interface).) |
m (→{{header|Phix}}: minor tidy) |
||
Line 1,612:
=={{header|Phix}}==
Based on [[Bitmap/Read_a_PPM_file#Euphoria|Euphoria]], requires write_ppm() from [[Bitmap/Write_a_PPM_file#Phix|Write_a_PPM_file]],
Note that demo\rosetta\Bitmap_read_ppm.exw is just the last 3 lines with the include ppm.e since that contains the read_ppm() (abeit with a few more options and other tweaks) also used by several other examples, and covers the above requirements. Results may be verified with demo\rosetta\viewppm.exw
<lang Phix>function read_ppm(sequence filename)▼
<lang Phix>-- demo\rosetta\Bitmap_read_ppm.exw (runnable version)
sequence image, line
integer dimx, dimy, maxcolor
Line 1,637 ⟶ 1,640:
return image
end function
--include ppm.e -- read_ppm(), write_ppm(), to_grey() (as distributed, instead of the above)
sequence img = read_ppm("Lena.ppm")
=={{header|PicoLisp}}==
|