print_ppm(3f) - [M_pixel:PRINT] print pixel array as a ppm file (LICENSE:PD)
Synopsis
Description
Options
Example
Author
License
definition:
subroutine print_ppm(filename) character(len=*),intent(in) :: filename
This driver makes an P6 PPM(portable pixmap) file. Any existing file will be appended to.
FILENAME name of output file to create or append to.
Sample program:
program demo_print_ppm use M_pixel, only : prefsize,vinit,ortho2,vexit use M_pixel, only : linewidth,circle,color use M_pixel, only : print_ppm implicit none call prefsize(40,40) call vinit() call ortho2(-100.0,100.0,-100.0,100.0) call linewidth(400) call circle(0.0,0.0,45.0) call color(3) call circle(0.0,0.0,25.0) call print_ppm(demo_print.ppm) call vexit() end program demo_print_ppm
John S. Urban
Public Domain
Nemo Release 3.1 | print_ppm (3m_pixel) | April 21, 2023 |