Manual Reference Pages - point2 (3m_draw)
NAME
point2(3f) - [M_draw:POINT] Draw a point at x, y.
(LICENSE:PD)
CONTENTS
Synopsis
Description
Example
SYNOPSIS
subroutine point2(x, y)
real,intent(in) :: x, y
DESCRIPTION
Draw a point at x, y. Points are device-dependent and may not appear
at all. Generally points are drawn with the current color as a circle
with a diameter equal to the current linewidth.
EXAMPLE
Sample program:
program demo_point2
use :: M_draw
implicit none
integer :: i
integer :: ipaws
call prefsize(300,300)
call vinit( ) ! start graphics using device $M_DRAW_DEVICE
call ortho2(0.0, 20.0, 0.0, 20.0)
call color(D_MAGENTA)
do i=1,20
call linewidth(20*i)
call point2(real(i),real(i))
enddo
ipaws=getkey()
call vexit()
end program demo_point2
| Nemo Release 3.1 | point2 (3m_draw) | May 28, 2023 |
Generated by manServer 1.08 from ccee235d-2605-4214-9a36-34ce98463067 using man macros.