Image:Triple-Spiral-Symbol.png
From Wikipedia, the free encyclopedia
Triple-Spiral-Symbol.png (640 × 600 pixel, file size: 20 KB, MIME type: image/png)
This is a file from the Wikimedia Commons. The description on its description page there is shown below. | |
A vector version of this image ("SVG") is available. For more information about vector graphics, read about Commons transition to SVG. |
[edit] Summary
The Triple Spiral symbol, based on motifs found at the prehistoric site at Newgrange, Ireland, and used as a neo-pagan or Triple Goddess symbol. This version is made up of mathematical Archimedean spirals. For a version with thicker lines, see Image:Triple-Spiral-Symbol-heavystroked.png . For spiral triskelions, see also Image:Triple-Spiral-Symbol-filled.png , Image:Triple-Spiral-Symbol-4turns-filled.png , and Image:Triskele-Symbol-spiral.png . For "wheeled" forms of the spiral triskelion/triple spiral symbol, see Image:Wheeled-Triskelion-basic.png , Image:Roissy triskelion iron ring signet.png , Image:Triple-spiral-wheeled-simple.png , or Image:Triskelion-spiral-threespoked-inspiral.png . For a spiral triskelion with a hollow triangle in the center, see Image:Triskele-hollow-triangle.png . For versions of a triple-spiral labyrinth, see Image:Triple-Spiral-labyrinth.png and Image:Triple-Spiral-labyrinth-variant.png .
Generated by means of the following PostScript code:
%%! /archimdouble{ %%%%%%%%%%%%%%%% % PostScript program to display an Archimedean spiral by approximating % it with Bezier curves. Can display a double spiral (two spirals % rotated by 180 degrees with respect to each other). %%% Parameters: % centerx = horizontal coordinate of center of spiral % centery = vertical coordinate of center of spiral % rotf = degrees to rotate /sepwid 110 def % width separating successive turnings of spiral % (half this if double spiral is selected) /incrm 15 def % insert a curve point after this number of degrees /sweeps 3 def % number of 360 degree turnings to show /double 1 def % change to 0 to display single spiral /linew 13.75 def % increase number for thicker line %%% Procedures: /pi 3.1415926535898 def/radians 57.295779513082 def /sepwid sepwid pi div 2 div def gsave centerx centery translate rotf rotate linew setlinewidth /aspiral{/prevbezy 0 def 0 0 moveto 0 incrm sweeps 360 mul{7{dup}repeat phase add cos/costh exch def phase add sin/sinth exch def costh mul radians div/thcosth exch def sinth mul radians div/thsinth exch def thcosth sepwid mul/x exch def thsinth sepwid mul/y exch def /slope sinth thcosth add costh thsinth sub div def sinth 0 gt sinth 0 eq costh -1 eq and or{/flag -1 def}{/flag 1 def}ifelse /A exch def A 49.29348 lt A 180 gt A 196.273450852 lt and A 360 gt A 368.8301 lt and A 540 gt A 545.9907 lt and A 720 gt A 724.5217 lt and A 900 gt A 903.6281968 lt and or or or or or{/flag flag neg def}if incrm sub 3{dup}repeat phase add cos sepwid mul mul radians div /prevx exch def phase add sin sepwid mul mul radians div /prevy exch def incrm add 3{dup}repeat phase add cos sepwid mul mul radians div /nextx exch def phase add sin sepwid mul mul radians div /nexty exch def /prevdist x prevx sub dup mul y prevy sub dup mul add sqrt pi div def /nextdist x nextx sub dup mul y nexty sub dup mul add sqrt pi div def /normaliz slope slope mul 1 add sqrt def 0 eq{/prevbezx phase cos nextdist mul def}{prevbezx prevbezy x 1 flag mul normaliz div prevdist mul sub y slope flag mul normaliz div prevdist mul sub x y curveto /prevbezx x 1 flag mul normaliz div nextdist mul add def /prevbezy y slope flag mul normaliz div nextdist mul add def} ifelse} for stroke}def /phase 0 def aspiral %%% If different sweeps parameter for second spiral, define here: /sweeps 2.67 def %%% double 0 ne{/phase 180 def aspiral}if grestore %%%%%%%%%%%%%%%% }def gsave -9 0 translate .4875 dup scale %%% decrease to .47 to fit on A4-size page -2 rotate /centerx 304 def/centery 550 def/rotf 0 def archimdouble /centerx 927.334 def/centery 550 def/rotf 120 def archimdouble /centerx 615.667 def/centery 1089.823 def/rotf 240 def archimdouble grestore showpage %%EOF
[edit] Licensing
I, the author of this work, hereby release it into the public domain. This applies worldwide. In case this is not legally possible: Afrikaans | Alemannisch | Aragonés | العربية | Български | Català | Česky | Cymraeg | Dansk | Deutsch | Ελληνικά | English | Español | Esperanto | Euskara | فارسی | Français | Galego | 한국어 | हिन्दी | Hrvatski | Ido | Bahasa Indonesia | Íslenska | Italiano | עברית | Latina | Lietuvių | Magyar | Bahasa Melayu | Nederlands | Norsk (bokmål) | Norsk (nynorsk) | 日本語 | Polski | Português | Ripoarish | Română | Русский | Shqip | Slovenčina | Slovenščina | Српски | Svenska | ไทย | Türkçe | Українська | Tiếng Việt | Walon | 简体中文 | 繁體中文 | 粵語 | +/- |