pic(1): restore example section

It was erroneously elided when removing
the tpic command in commit 891a8c4f2.

diff --git a/sys/man/1/pic b/sys/man/1/pic
index 40213d4ee52a1a52932fa597cfc42ad1c0b7ec8e..37a83c2f8176cb6da24182df231d5f7ab7e02abf 100644 (file)
--- a/sys/man/1/pic
+++ b/sys/man/1/pic
@@ -288,10 +288,34 @@ may contain newlines.
 The
 .B undef
 statement removes the definition of a macro.
+.SH EXAMPLES
+.EX
+arrow "input" above; box "process"; arrow "output" above
+move
+A: ellipse
+   circle rad .1 with .w at A.e
+   circle rad .05 at 0.5 <A.c, A.ne>
+   circle rad .065 at 0.5 <A.c, A.ne>
+   spline from last circle.nw left .25 then left .05 down .05
+   arc from A.c to A.se rad 0.5
+   for i = 1 to 10 do { line from A.s+.025*i,.01*i down i/50 }
+.EE
+.PP
+.PS
+arrow "input" above; box "process"; arrow "output" above
+move
+A: ellipse
+   circle rad .1 with .w at A.e
+   circle rad .05 at 0.5 <A.c, A.ne>
+   circle rad .065 at 0.5 <A.c, A.ne>
+   spline from last circle.nw left .25 then left .05 down .05
+   arc from A.c to A.se rad 0.5
+   for i = 1 to 10 do { line from A.s+.025*i,.01*i down i/50 }
+.PE
 .SH SOURCE
 .B /sys/src/cmd/pic
 .SH "SEE ALSO"
-.IR grap (1), 
+.IR grap (1),
 .IR doctype (1),
 .IR troff (1)
 .br