pict: triangle: Add docstring.

* pict.scm (triangle): Add docstring.

1 files changed, 3 insertions, 0 deletions

diff --git a/pict.scm b/pict.scm
index de66fb3..2eb7db6 100644
--- a/pict.scm
+++ b/pict.scm
@@ -632,6 +632,9 @@ accepted to override the line color and line thickness."
                    #:key
                    (border-color "black")
                    (border-width 1))
+  "Return an isosceles triangle with width W and height H.  The keys
+BORDER-COLOR (a string) and BORDER-WIDTH (a number) are accepted to
+override the line color and line thickness."
   (polygon `((0 . ,h)
              (,w . ,h)
              (,(/ w 2) . 0))