File:Regular polygon 16 annotated.svg
From formulasearchengine
Jump to navigation
Jump to search
Size of this PNG preview of this SVG file: 515 × 515 pixels. Other resolutions: 240 × 240 pixels | 480 × 480 pixels | 768 × 768 pixels | 1,024 × 1,024 pixels | 2,048 × 2,048 pixels.
Original file (SVG file, nominally 515 × 515 pixels, file size: 24 KB)
This file is from Wikimedia Commons and may be used by other projects. The description on its file description page there is shown below.
Summary
DescriptionRegular polygon 16 annotated.svg |
English: Regular hexadecagon (hexakaidecagon) with annotation. |
Date | |
Source | Own work |
Author | László Németh |
Other versions |
|
SVG development InfoField | This geometry was created with OpenOffice.org. |
; Created in LibreOffice 4 with this LibreLogo program. ; Usage: Copy it in an English language document in LibO Writer, ; and click on the Start icon of the View»Toolbar»Logo toolbar. TO superior num prevnum s = “” FOR i IN STR num [ s = s + “⁰¹²³⁴⁵⁶⁷⁸⁹”[INT i] ] IF NOT prevnum % 10 = 1 [ s = “ ” + s ] ; narrow space OUTPUT s END TO inferior num s = “” FOR i IN STR num [ s = s + “₀₁₂₃₄₅₆₇₈₉”[INT i] ] OUTPUT s END CLEARSCREEN HIDETURTLE FONTSIZE 18 FONTFAMILY “DejaVu Sans” FOR vertices IN [7, 11, 13, 14, 16, 17, 19] [ ; PICTURE “poly/regular_polygon_%d_annotated.svg” % vertices [ ; from LibO 4.1.1 PICTURE [ HOME FILLCOLOR “WHITE” PENCOLOR “SILVER” PENDOWN PENSIZE 2 CIRCLE 400 β = 360/vertices q = vertices // 4 CIRCLE [80 + vertices * 14, 80 + vertices * 14, β * q, β * (q + 1)] FONTCOLOR “SILVER” IF vertices > 18 [ f = 0.004 ] [ f = 0.005 ] HEADING β * q + β * 0.5 PENUP FORWARD (80 + vertices * 14) * (0.3 + (f * vertices)) HEADING 0 s1 = superior (360 % vertices, 360 // vertices) s2 = inferior vertices LABEL “%d%s⁄%s°” % (β, s1, s2) HOME HEADING 0 PENDOWN dots = [] REPEAT vertices [ FORWARD 200 where = POSITION dots = dots + [where] BACK 200 RIGHT β ] HOME PENSIZE 2 CIRCLE 10 PENCOLOR “BLACK” FONTCOLOR “BLACK” α = ((vertices-2)/vertices)*180 PENUP FORWARD 200 PENDOWN CIRCLE [100 + 105/vertices, 100 + 105/vertices, 180 – α/2, 180 + α/2] s1 = superior ((vertices-2) * 180 % vertices, INT α) PENUP BACK 20 + 70/vertices LABEL “%d%s⁄%s°” % (α, s1, s2) HOME PENUP PENSIZE 4 PENUP FOR i IN dots + dots[0:1] [ POSITION i PENDOWN ] PENSIZE 2 FOR i IN dots [ PENUP POSITION i PENDOWN CIRCLE 10 ] ] ]
Licensing
László Németh, the copyright holder of this work, hereby publishes it under the following license:
This file is made available under the Creative Commons CC0 1.0 Universal Public Domain Dedication. | |
The person who associated a work with this deed has dedicated the work to the public domain by waiving all of their rights to the work worldwide under copyright law, including all related and neighboring rights, to the extent allowed by law. You can copy, modify, distribute and perform the work, even for commercial purposes, all without asking permission.
http://creativecommons.org/publicdomain/zero/1.0/deed.enCC0Creative Commons Zero, Public Domain Dedicationfalsefalse |
Items portrayed in this file
depicts
some value
19 July 2013
File history
Click on a date/time to view the file as it appeared at that time.
Date/Time | Thumbnail | Dimensions | User | Comment | |
---|---|---|---|---|---|
current | 12:37, 19 July 2013 | 515 × 515 (24 KB) | wikimediacommons>Nl74 | User created page with UploadWizard |
File usage
There are no pages that use this file.