Datei:Triple-Spiral-Symbol.svg

Aus AnthroWiki

Originaldatei(SVG-Datei, Basisgröße: 643 × 600 Pixel, Dateigröße: 22 KB)

Diese Datei stammt aus Wikimedia Commons und kann von anderen Projekten verwendet werden. Die Beschreibung von deren Dateibeschreibungsseite wird unten angezeigt.

Beschreibung

Beschreibung 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.svg . For spiral triskelions, see also Image:Triple-Spiral-Symbol-filled.svg , Image:Triple-Spiral-Symbol-4turns-filled.svg , and Image:Triskele-Symbol-spiral.svg . For "wheeled" forms of the spiral triskelion/triple spiral symbol, see Image:Wheeled-Triskelion-basic.svg , Image:Roissy triskelion iron ring signet.svg , Image:Triple-spiral-wheeled-simple.svg , or Image:Triskelion-spiral-threespoked-inspiral.svg . For a spiral triskelion with a hollow triangle in the center, see Image:Triskele-hollow-triangle.svg . For versions of a triple-spiral labyrinth, see Image:Triple-Spiral-labyrinth.svg and Image:Triple-Spiral-labyrinth-variant.svg .
Datum PNG and vector PostScript source code, 2005;
SVG file, 2006
Quelle

SVG version of Image:Triple-Spiral-Symbol.png .

Converted from 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
Urheber AnonMoos

Lizenz

Public domain Ich, der Urheberrechtsinhaber dieses Werkes, veröffentliche es als gemeinfrei. Dies gilt weltweit.
In manchen Staaten könnte dies rechtlich nicht möglich sein. Sofern dies der Fall ist:
Ich gewähre jedem das bedingungslose Recht, dieses Werk für jedweden Zweck zu nutzen, es sei denn, Bedingungen sind gesetzlich erforderlich.

Kurzbeschreibungen

Ergänze eine einzeilige Erklärung, was diese Datei darstellt.

In dieser Datei abgebildete Objekte

Motiv

Dateiversionen

Klicke auf einen Zeitpunkt, um diese Version zu laden.

Version vomVorschaubildMaßeBenutzerKommentar
aktuell18:28, 10. Okt. 2011Vorschaubild der Version vom 18:28, 10. Okt. 2011643 × 600 (22 KB)wikimediacommons>AnonMoosnow stricter parser

Die folgende Seite verwendet diese Datei:

Metadaten