Plan 9 from Bell Labs’s /usr/web/sources/plan9/sys/lib/troff/font/devutf/charlib/DG

Copyright © 2021 Plan 9 Foundation.
Distributed under the MIT License.
Download the Plan 9 distribution.


%
% UMDS danger sign - needs to be cleaned up!
%

/build_DG {
    /x0 1.5 6 div 72 mul def	% triangle length
    pop
    gsave
	currentpoint translate
	1 scaling div ptsize 10 div mul dup scale
	2 setlinewidth
	0 setlinecap
	newpath
	0 0 moveto
	x0 0 lineto
	x0 2 div x0 3 sqrt 2 div mul lineto
	closepath fill
	1 setgray
	/Helvetica-Bold findfont 12 scalefont setfont
	0 0 moveto
	(!) false charpath pathbbox
	exch 4 -1 roll add 2 div x0 2 div exch sub 0 moveto
	exch sub x0 3 sqrt 2 div mul exch sub 3 div 0 exch rmoveto
	(!) show
    grestore
} def


Bell Labs OSI certified Powered by Plan 9

(Return to Plan 9 Home Page)

Copyright © 2021 Plan 9 Foundation. All Rights Reserved.
Comments to webmaster@9p.io.