Groups | Search | Server Info | Keyboard shortcuts | Login | Register [http] [https] [nntp] [nntps]

Groups > comp.lang.postscript > #1513 > unrolled thread

How do you call this figure

Back to article view | Back to comp.lang.postscript

Contents

  How do you call this figure Cecil Westerhof <Cecil@decebal.nl> - 2013-07-28 16:36 +0200
    Re: How do you call this figure Mark Carroll <mtbc@bcs.org> - 2013-07-28 15:48 +0100
      Re: How do you call this figure Raoul Fleckman <raoul.fleckman@gmail.com> - 2013-07-28 16:29 +0000
        Re: How do you call this figure Luuk <luuk@invalid.lan> - 2013-07-28 21:13 +0200
          Re: How do you call this figure Cecil Westerhof <Cecil@decebal.nl> - 2013-07-29 09:19 +0200
            Re: How do you call this figure Cecil Westerhof <Cecil@decebal.nl> - 2013-07-29 11:24 +0200
              Re: How do you call this figure Cecil Westerhof <Cecil@decebal.nl> - 2013-07-30 11:54 +0200
    Re: How do you call this figure luser- -droog <mijoryx@yahoo.com> - 2013-07-28 23:24 -0700
      Re: How do you call this figure Cecil Westerhof <Cecil@decebal.nl> - 2013-07-29 10:08 +0200

#1513 — How do you call this figure

I have the following code to draw a figure:
    /radius 5 def
    /x 25 def
    /y 15 def

    x y moveto
    0 radius rlineto
    x radius sub  y radius add  radius  0  270  arc
    x y moveto
    radius neg 0 rlineto
    x radius sub  y radius sub  radius  90  360  arc
    x y moveto
    0 radius neg rlineto
    x radius add  y radius sub  radius  180  90  arc
    x y moveto
    radius 0 rlineto
    x radius add  y radius add  radius  270  180  arc
    stroke

How is this figure called? I want to make a postscript libary
containing this figure, but giving the correct name would be useful.

-- 
Cecil Westerhof
Senior Software Engineer
LinkedIn: http://www.linkedin.com/in/cecilwesterhof

[toc] | [next] | [standalone]

#1516

Cecil Westerhof <Cecil@decebal.nl> writes:

> How is this figure called? I want to make a postscript libary
> containing this figure, but giving the correct name would be useful.

That's a good question. It looks to me like a four-leaf clover. (-:

Mark

[toc] | [prev] | [next] | [standalone]

#1517

On 2013-07-28, Mark Carroll <mtbc@bcs.org> wrote:
> Cecil Westerhof <Cecil@decebal.nl> writes:
>
>> How is this figure called? I want to make a postscript libary
>> containing this figure, but giving the correct name would be useful.
>
> That's a good question. It looks to me like a four-leaf clover. (-:

if in doubt throw in some greek --> tetrafoil

[toc] | [prev] | [next] | [standalone]

#1518

On 28-07-2013 18:29, Raoul Fleckman wrote:
> On 2013-07-28, Mark Carroll <mtbc@bcs.org> wrote:
>> Cecil Westerhof <Cecil@decebal.nl> writes:
>>
>>> How is this figure called? I want to make a postscript libary
>>> containing this figure, but giving the correct name would be useful.
>>
>> That's a good question. It looks to me like a four-leaf clover. (-:
>
> if in doubt throw in some greek --> tetrafoil
>

or Latin --> Trifolium

[toc] | [prev] | [next] | [standalone]

#1523

Op zondag 28 jul 2013 21:13 CEST schreef luuk@invalid.lan:

> On 28-07-2013 18:29, Raoul Fleckman wrote:
>> On 2013-07-28, Mark Carroll <mtbc@bcs.org> wrote:
>>> Cecil Westerhof <Cecil@decebal.nl> writes:
>>>
>>>> How is this figure called? I want to make a postscript libary
>>>> containing this figure, but giving the correct name would be
>>>> useful.
>>>
>>> That's a good question. It looks to me like a four-leaf clover.
>>> (-:
>>
>> if in doubt throw in some greek --> tetrafoil

That is another figure I saw and want to make a function for:
    http://www.flickr.com/photos/quadralectics/1708462258/

Well, I already know the name for that one then.


> or Latin --> Trifolium

That is clover, that is also another symbol.

-- 
Cecil Westerhof
Senior Software Engineer
LinkedIn: http://www.linkedin.com/in/cecilwesterhof

[toc] | [prev] | [next] | [standalone]

#1526

Op maandag 29 jul 2013 09:19 CEST schreef Cecil Westerhof:

> Op zondag 28 jul 2013 21:13 CEST schreef luuk@invalid.lan:
>
>> On 28-07-2013 18:29, Raoul Fleckman wrote:
>>> On 2013-07-28, Mark Carroll <mtbc@bcs.org> wrote:
>>>> Cecil Westerhof <Cecil@decebal.nl> writes:
>>>>
>>>>> How is this figure called? I want to make a postscript libary
>>>>> containing this figure, but giving the correct name would be
>>>>> useful.
>>>>
>>>> That's a good question. It looks to me like a four-leaf clover.
>>>> (-:
>>>
>>> if in doubt throw in some greek --> tetrafoil
>
> That is another figure I saw and want to make a function for:
> http://www.flickr.com/photos/quadralectics/1708462258/
>
> Well, I already know the name for that one then.

I made the function:
    % centerX centerY radius [innerCircle]  tetrafoil  -
    /tetrafoil {
        5 dict begin
            dup type /booleantype eq {
                /innerCircle exch def
            } {
                /innerCircle false def
            } ifelse
            /radius  exch def
            /centerY exch def
            /centerX exch def
    
            /offset radius 2 sqrt mul def
    
            gsave
                newpath
                centerX             centerY offset add  radius  315  225  arc
                centerX offset sub  centerY             radius  45   315  arc
                centerX             centerY offset sub  radius  135  45   arc
                centerX offset add  centerY             radius  225  135  arc
                innerCircle {
                    centerX radius add  centerY  moveto
                    centerX  centerY  radius  0  360  arc
                } if
                stroke
            grestore
        end
    } def
    

And a little demonstration with it:
    [4 6 10 14 20 30 40 60 90] {
        300  300
        3  -1  roll
        tetrafoil
    } forall

-- 
Cecil Westerhof
Senior Software Engineer
LinkedIn: http://www.linkedin.com/in/cecilwesterhof

[toc] | [prev] | [next] | [standalone]

#1528

Op maandag 29 jul 2013 11:24 CEST schreef Cecil Westerhof:

> I made the function:
> % centerX centerY radius [innerCircle]  tetrafoil  -
> /tetrafoil {
> 5 dict begin
> dup type /booleantype eq {
> /innerCircle exch def
> } {
> /innerCircle false def
> } ifelse
> /radius  exch def
> /centerY exch def
> /centerX exch def
>
> /offset radius 2 sqrt mul def
>
> gsave
> newpath
> centerX             centerY offset add  radius  315  225  arc
> centerX offset sub  centerY             radius  45   315  arc
> centerX             centerY offset sub  radius  135  45   arc
> centerX offset add  centerY             radius  225  135  arc
> innerCircle {
> centerX radius add  centerY  moveto
> centerX  centerY  radius  0  360  arc
> } if
> stroke
> grestore
> end
> } def
>
>
> And a little demonstration with it:
> [4 6 10 14 20 30 40 60 90] {
> 300  300
> 3  -1  roll
> tetrafoil
> } forall

I think this is a better function. The previous function had the
radius of the arc. I think it is more logical to use the radius of the
figure. And I use a repeat with rotate, because I think this is more
clear.

    % centerX centerY radius [innerCircle]  tetrafoil  -
    /tetrafoil {
        5 dict begin
            dup type /booleantype eq {
                /innerCircle exch def
            } {
                /innerCircle false def
            } ifelse
            /radius  exch def
            /centerY exch def
            /centerX exch def
    
            /circleRadius radius 2 sqrt 1 add div def
            /offset circleRadius 2 sqrt mul       def
    
            gsave
                newpath
                centerX  centerY  translate
                4 {
                    0  offset  circleRadius  315  225  arc
                    90  rotate
                } repeat
                stroke
                innerCircle {
                    0  0  circleRadius  0  360  arc
                    stroke
                } if
            grestore
        end
    } def
    
    [10 15 25 35 75 100 150 225] {
        300  500
        3  -1  roll
        tetrafoil
    } forall

What is a better way: the centre and radius as I use here, or lower
left point with width/height?

-- 
Cecil Westerhof
Senior Software Engineer
LinkedIn: http://www.linkedin.com/in/cecilwesterhof

[toc] | [prev] | [next] | [standalone]

#1520

On Sunday, July 28, 2013 9:36:56 AM UTC-5, Cecil Westerhof wrote:
> I want to make a postscript libary
> containing this figure, but giving the correct name would be useful.
> 

If you have a lot of little figures, it might be nice to 
package them as a font.

This thread has a version of my calendar program 
with an embeddable Type-3 Font for Planet symbols.

https://groups.google.com/d/msg/comp.lang.postscript/t_L_cgtF2Ss/9gUwpoZcvw8J

[toc] | [prev] | [next] | [standalone]

#1524

Op maandag 29 jul 2013 08:24 CEST schreef luser:

> On Sunday, July 28, 2013 9:36:56 AM UTC-5, Cecil Westerhof wrote:
>> I want to make a postscript libary containing this figure, but
>> giving the correct name would be useful.
>>
>
> If you have a lot of little figures, it might be nice to 
> package them as a font.
>
> This thread has a version of my calendar program 
> with an embeddable Type-3 Font for Planet symbols.
>
> https://groups.google.com/d/msg/comp.lang.postscript/t_L_cgtF2Ss/9gUwpoZcvw8J

Not a bad idea. I do not have many yet, but there is a big possibility
that there will be. So certainly something to look into.

-- 
Cecil Westerhof
Senior Software Engineer
LinkedIn: http://www.linkedin.com/in/cecilwesterhof

[toc] | [prev] | [standalone]

Back to top | Article view | comp.lang.postscript

csiph-web