C Library Functions - width (3)
NAME
width(3f) - [M_calcomp:basic] select pen width (LICENSE:PD)
CONTENTS
Synopsis
Description
Examples
Comments
License
SYNOPSIS
subroutine width(iwidth)
integer,intent(in) :: iwidth
DESCRIPTION
Select a new pen width. Sets the current line width in units of 1/10,000 of the X size of the display surface
EXAMPLES
Sample program:
program demo_width use M_calcomp implicit none integer :: i,n, ii real :: angle, rad, xx, yy call plots(0.0,10.0,0.0,10.0) call plot(5.0,5.0,-3) angle=0.0 n=30 do i=1,n ii=360/n call width(i*10) rad=0.0174533*angle xx=5.0*cos (rad) yy=5.0*sin (rad) call plot( 0.0, 0.0,3) call plot( xx, yy,2) angle=angle+360.0/n enddo call plot(0.0,0.0,999) end program demo_width
COMMENTS
This routine was not part of the original Calcomp library.
LICENSE
Public Domain
| Nemo Release 3.1 | width (3) | February 23, 2025 |
