Re: metapost question (bug?)

[luigi scarso <luigi.scarso@gmail.com>]

On Thu, Jul 21, 2011 at 4:39 PM, Alan Braslau <alan.braslau@cea.fr> wrote:
> Hello,
>
> I have a question for metapost specialists:
>
> I am looking for some sort of effect, built upon a zig-zag line.
> The first graphic in the minimal example below is as I would expect.
> The second graphic seems to be drawn without the point at (0,0).
> (Ignore the asymmetry at the end of the path in the 2nd, this
> is to be expected in this minimal example.)
>
> Is the result correct or is this a bug?
>
> Alan
>
>
>
> \starttext
>
> \startTEXpage
> \startMPcode
>        u := 1mm ;
>
>        path p[] ;
>        p0 := ((0,0)--(1,0)) rotated 45 scaled 20u ;
>        pickup pensquare scaled 10u rotated 45 ;
>        draw p0 withcolor blue ;
>        pickup pensquare yscaled 2u xscaled 5u rotated 45 ;
>        draw p0 withcolor yellow ;
>        pickup pencircle scaled .1u ;
>        draw p0 ;
> \stopMPcode
> \stopTEXpage
>
> \startTEXpage
> \startMPcode
>        p1 := ((0,0)--(sqrt(2),0)) rotated -30 scaled 20u
>                shifted point infinity of p0 ;
>        p2 := p0--p1 ;
>
>        pickup pensquare scaled 10u rotated 45 ;
>        draw p2 withcolor blue ;
>        pickup pensquare yscaled 2u xscaled 5u rotated 45 ;
>        draw p2 withcolor yellow ;
>        pickup pencircle scaled .1u ;
>        draw p2 ;
> \stopMPcode
> \stopTEXpage
>
> \stoptext
You are shifting by a certain amount : what is the net effect of
shifted point infinity of p0 ?

-- 
luigi
___________________________________________________________________________________
If your question is of interest to others as well, please add an entry to the Wiki!

maillist : ntg-context@ntg.nl / http://www.ntg.nl/mailman/listinfo/ntg-context
webpage  : http://www.pragma-ade.nl / http://tex.aanhet.net
archive  : http://foundry.supelec.fr/projects/contextrev/
wiki     : http://contextgarden.net
___________________________________________________________________________________