Celtic-knot-basic-rectangular

One basic form of Celtic or pseudo-Celtic rectangular knotwork.

For alternative forms, see Image:Celtic-knot-basic.svg, Image:Celtic-knot-basic-linear.svg , Image:Celtic-knot-twoloops-bigends.svg , and Image:Bar-knot-basic-decorative.png .

Generated by means of the following PostScript code:

%!
306 396 translate .825 dup scale 24 setlinewidth 1 setgray 1
setlinejoin/z{20000 sqrt}def/y{gsave 40 setlinewidth 0 setgray}def
z 2 mul neg 0 100 45 105 arc 
z 1.5 mul neg z .5 mul 100 165 225 arc
0 z neg 100  225 315 arc
z 1.5 mul z .5 mul 100 -45 15 arc
z 2 mul 0 100 75 135 arc
z neg z neg 100 315 225 arcn
z 1.5 mul neg z .5 mul neg 100 225 135 arcn
z neg 0 100 135 45 arcn 
z 2 mul z neg 100 225 285 arc
z 1.5 mul z 1.5 mul neg 100 -15 45 arc
0 0 100 45 135 arc
z 1.5 mul neg z 1.5 mul neg 100 135 195 arc
z 2 mul neg z neg 100 255 315 arc
z 0 100 135 45 arcn
z 1.5 mul z .5 mul neg 100 45 -45 arcn 
z z neg 100 315 225 arcn closepath y stroke grestore stroke y
-15 15 moveto 30 -30 rlineto stroke
-15 z sub 15 moveto 30 -30 rlineto stroke
-15 z add 15 moveto 30 -30 rlineto stroke
-15 15 z sub moveto 30 -30 rlineto stroke
-15 z sub 15 z sub moveto 30 -30 rlineto stroke
-15 z add 15 z sub moveto 30 -30 rlineto stroke
15 1.5 z mul sub 15 z 2 div sub moveto -30 -30 rlineto stroke
15 .5 z mul sub 15 z 2 div sub moveto -30 -30 rlineto stroke
15 .5 z mul add 15 z 2 div sub moveto -30 -30 rlineto stroke
15 1.5 z mul add 15 z 2 div sub moveto -30 -30 rlineto stroke
0 z neg 100 271 315 arc 30 30 rlineto stroke
z neg 0 100 91 135 arc -30 -30 rlineto stroke
0 0 100 91 135 arc -30 -30 rlineto stroke
z neg z neg 100 271 315 arc 30 30 rlineto stroke
z 0 100 91 135 arc -30 -30 rlineto stroke
z z neg 100 271 315 arc 30 30 rlineto stroke
z 2 mul neg z neg 100 271 315 arc 30 30 rlineto stroke
z 2 mul 0 100 91 135 arc -30 -30 rlineto stroke
z 1.5 mul neg z .5 mul 100 196 225 arc 30 -30 rlineto stroke
z 1.5 mul z .5 mul neg 100 16 45 arc -30 30 rlineto stroke
z 1.5 mul neg z .5 mul neg 100 181 225 arc 30 -30 rlineto stroke
z 1.5 mul z 1.5 mul neg 100 1 45 arc -30 30 rlineto stroke
grestore
-16 16 moveto 32 -32 rlineto stroke
-16 z sub 16 moveto 32 -32 rlineto stroke
-16 z add 16 moveto 32 -32 rlineto stroke
-16 16 z sub moveto 32 -32 rlineto stroke
-16 z sub 16 z sub moveto 32 -32 rlineto stroke
-16 z add 16 z sub moveto 32 -32 rlineto stroke
16 1.5 z mul sub 16 z 2 div sub moveto -32 -32 rlineto stroke
16 .5 z mul sub 16 z 2 div sub moveto -32 -32 rlineto stroke
16 .5 z mul add 16 z 2 div sub moveto -32 -32 rlineto stroke
16 1.5 z mul add 16 z 2 div sub moveto -32 -32 rlineto stroke
0 0 100 90 135 arc -31 -31 rlineto stroke
0 z neg 100 270 315 arc 31 31 rlineto stroke
z neg 0 100 90 135 arc -31 -31 rlineto stroke
z neg z neg 100 270 315 arc 31 31 rlineto stroke
z 0 100 90 135 arc -31 -31 rlineto stroke
z z neg 100 270 315 arc 31 31 rlineto stroke
z 2 mul neg z neg 100 270 315 arc 31 31 rlineto stroke
z 2 mul 0 100 90 135 arc -31 -31 rlineto stroke
z 1.5 mul neg z .5 mul 100 195 225 arc 31 -31 rlineto stroke
z 1.5 mul z .5 mul neg 100 15 45 arc -31 31 rlineto stroke
z 1.5 mul neg z .5 mul neg 100 180 225 arc 31 -31 rlineto stroke
z 1.5 mul z 1.5 mul neg 100 0 45 arc -31 31 rlineto stroke
%EOF