[NTG-context] Radius attribute and scaling in lmt_shade[ ]

Keith McKay mckaymeister at gmail.com
Sun Jan 9 16:53:16 CET 2022


Since "a picture paints a thousand words", I attach a pdf showing the 
results of the execution of the code.

Are these bugs or... ?

Best Wishes

Keith

On 06/01/2022 15:57, Keith McKay wrote:
>
> Hi
>
> In the code below you will see that I have created a closed path and 
> performed scaling, and shading on the path with lmt_shade [ ]. I have 
> noticed a few features which may or may not be bugs depending on 
> whether scaled is applied to the path within the square brackets or 
> outside.
>
> 1) Applying scaled to the path within the square brackets and 
> incrementing the radius key I can see the shaded areas changing, 
> however the first two shapes show incorrect scaling and have ragged edges.
>
> 2) When scaled is applied outside the square brackets all shapes are 
> the same size and no ragged edges, however the shading is not showing 
> correctly with increasing radius.
>
> Am I missing something?
>
> Best Wishes
>
> Keith McKay
>
> *******************MWE*****************
>
> \setuppapersize[A4, landscape]
>
> \starttext
>
> \dorecurse{10}{
>
> \startMPpage
>
> StartPage;
>
> width := 27; height := 18;
>
> path r;
>
> r := (0.25cm,0cm)--(0cm,1.5cm)..(0.25cm,1.75cm)..(0.5cm,1.5cm) -- cycle;
>
> definecolor [ name = "MyColor1", r = uniformdeviate(1), g = 
> uniformdeviate(1), b = uniformdeviate(1) ] ;
>
> definecolor [ name = "MyColor2", r = uniformdeviate(1), g = 
> uniformdeviate(1), b = uniformdeviate(1) ] ;
>
>     for k = 0.5 step 0.25 until 2:
>
>         draw lmt_shade [
>
>             path = r ,
>
>             direction = "up",
>
>             alternative = "circular",
>
>             radius = k*cm,
>
>             colors = { "MyColor1", "MyColor2" },
>
>             ] scaled 4.5 shifted((k *12)*cm,12*cm);
>
>         draw lmt_shade [
>
>             path = r scaled 4.5,
>
>             direction = "up",
>
>             alternative = "circular",
>
>             radius = k*cm,
>
>             colors = { "MyColor1", "MyColor2" },
>
>             ] shifted((k *12)*cm,1cm);
>
> endfor;
>
> StopPage;
>
> \stopMPpage
>
> }
>
> \stoptext
>
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://mailman.ntg.nl/pipermail/ntg-context/attachments/20220109/828b0f8c/attachment.htm>
-------------- next part --------------
A non-text attachment was scrubbed...
Name: RS4 copy.pdf
Type: application/pdf
Size: 4654 bytes
Desc: not available
URL: <http://mailman.ntg.nl/pipermail/ntg-context/attachments/20220109/828b0f8c/attachment.pdf>


More information about the ntg-context mailing list