---

Manual Reference Pages  - circle (3m_pixel)

---

NAME

circle(3f) - [M_pixel:ARCS] draw a circle using current line width and color (LICENSE:PD)

CONTENTS

Synopsis
Description
Options
Example
Author
License

SYNOPSIS

definition:

   subroutine circle(x,y,radius)
   real,intent(in) :: x
   real,intent(in) :: y
   real,intent(in) :: radius

DESCRIPTION

Draw a circle using the current line width and color into the pixel array. Units are in world coordinates.

OPTIONS

X,Y	Coordinates for the center of the circle
RADIUS	Radius of the circle

EXAMPLE

Sample program:

   program demo_circle
   use M_pixel
   use M_pixel__writegif, only : writegif
   implicit none
      !! set up drawing surface
      call prefsize(400,400)
      call vinit()
      call ortho2(left=-100.0, right=100.0, bottom=-100.0, top=100.0)
      call color(3)
      call clear()
      call color(4)
      call linewidth(200)
      !! draw some circles
      call circle(0.0, 0.0, 90.0)
      call color(1)
      call circle(0.0, 0.0, 40.0)
      call color(2)
      call circle(-25.0, 25.0, 20.0)
      call circle(-25.0,-25.0, 20.0)
      call circle( 25.0, 25.0, 20.0)
      call circle( 25.0,-25.0, 20.0)
      !! render the pixel map
      call writegif(’circle.3M_pixel.gif’,P_pixel,P_colormap)
      !! display the graphic assuming display(1) is available
      call execute_command_line(’display circle.3M_pixel.gif’)
      !! exit graphics mode
      call vexit()
   end program demo_circle

AUTHOR

John S. Urban

LICENSE

Public Domain

---

Nemo Release 3.1

circle (3m_pixel)

April 21, 2023

Generated by manServer 1.08 from a8c4e10e-55df-405d-bb77-93bce212f4f3 using man macros.