---

Manual Reference Pages  - polyline2 (3m_pixel)

---

NAME

polyline2(3f) - [M_pixel:DRAW] - draw an unclosed polyline in the XY plane (LICENSE:PD)

CONTENTS

Synopsis
Description
Options
Example
Author
License

SYNOPSIS

subroutine polyline2(arrx,arry)

          integer,intent(in)          :: arrx(:)
          integer,intent(in),optional :: arry(:)

DESCRIPTION

Given either a single array composed of pairs <x(i),y(i)> of values defining points or an X and Y array move to first point and draw to remaining points using current line style.

OPTIONS

ARRX	If ARRY is present, an array of X values
ARRY	An optional array of Y values

EXAMPLE

Sample program:

   program demo_polyline2
   use M_pixel
   use M_pixel__writegif, only : writegif
   implicit none
   integer :: transparent=0
   integer :: ipaws
      call prefsize(300,300)
      call vinit(’ ’)
      call ortho2(-2.0,2.0,-2.0,2.0)
      call color(2)
      call linewidth(100)
      call polyline2([-0.5,-0.5, -0.5,+0.5, +0.5,+0.5, +0.5,-0.5])
      call color(4)
      call polyline2( [-1,-1,+1,+1,-1] , &  ! X values
      & [-1,+1,+1,-1,-1] )    ! Y values
       ! write gif with a transparent background
      call writegif(’polyline2.3M_pixel.gif’,P_pixel,P_ColorMap,transparent)
      call vexit()
   end program demo_polyline2

AUTHOR

John S. Urban

LICENSE

Public Domain

---

Nemo Release 3.1

polyline2 (3m_pixel)

April 21, 2023

Generated by manServer 1.08 from f7c68d42-56c0-4dd2-87fd-308f6b30a062 using man macros.