How to add margin around standalone MetaPost?

How to add margin around standalone MetaPost?

[Vincent Hennebert via ntg-context]

Take the following MetaPost file:

beginfig(0)
  ahlength := 20;
  linejoin := mitered;
  drawarrow origin--(40,0) withpen pencircle scaled 5;
endfig;

Render it into PDF with ConTeXt. Witness the cut out ends of the arrow.
How to fix that?

Being able to add some margin would be a solution, which may be
desirable anyway in some cases. Is that possible?

Thanks,
Vincent
___________________________________________________________________________________
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://context.aanhet.net
archive  : https://bitbucket.org/phg/context-mirror/commits/
wiki     : http://contextgarden.net
___________________________________________________________________________________

Re: How to add margin around standalone MetaPost?

[Bruce Horrocks via ntg-context]

[-- Attachment #1: Type: text/plain, Size: 639 bytes --]

The arrow looks fine to me in ConTeXt ver: 2022.01.10 08:36 LMTX. (See attached PDF)

> On 20 May 2022, at 17:56, Vincent Hennebert via ntg-context <ntg-context@ntg.nl> wrote:
> 
> Take the following MetaPost file:
> 
> beginfig(0)
>  ahlength := 20;
>  linejoin := mitered;
>  drawarrow origin--(40,0) withpen pencircle scaled 5;
> endfig;
> 
> Render it into PDF with ConTeXt. Witness the cut out ends of the arrow.
> How to fix that?
> 
> Being able to add some margin would be a solution, which may be
> desirable anyway in some cases. Is that possible?
> 
> Thanks,
> Vincent

—
Bruce Horrocks
Hampshire, UK

[-- Attachment #2: tt.pdf --]
[-- Type: application/pdf, Size: 5015 bytes --]

[-- Attachment #3: Type: text/plain, Size: 493 bytes --]

___________________________________________________________________________________
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://context.aanhet.net
archive  : https://bitbucket.org/phg/context-mirror/commits/
wiki     : http://contextgarden.net
___________________________________________________________________________________

Re: How to add margin around standalone MetaPost?

[Mikael Sundqvist via ntg-context]

Hi,

Not sure if I understand the problem correctly. You could try

\starttext
\startMPpage[offset=3pt]
  ahlength := 20;
  linejoin := mitered;
  drawarrow origin--(40,0) withpen pencircle scaled 5;
\stopMPpage

\startMPpage[offset=1cm]
  ahlength := 20;
  linejoin := mitered;
  drawarrow origin--(40,0) withpen pencircle scaled 5;
\stopMPpage
\stoptext

Compile with context.

/Mikael

On Fri, May 20, 2022 at 7:07 PM Bruce Horrocks via ntg-context
<ntg-context@ntg.nl> wrote:
>
> The arrow looks fine to me in ConTeXt ver: 2022.01.10 08:36 LMTX. (See attached PDF)
>
> > On 20 May 2022, at 17:56, Vincent Hennebert via ntg-context <ntg-context@ntg.nl> wrote:
> >
> > Take the following MetaPost file:
> >
> > beginfig(0)
> >  ahlength := 20;
> >  linejoin := mitered;
> >  drawarrow origin--(40,0) withpen pencircle scaled 5;
> > endfig;
> >
> > Render it into PDF with ConTeXt. Witness the cut out ends of the arrow.
> > How to fix that?
> >
> > Being able to add some margin would be a solution, which may be
> > desirable anyway in some cases. Is that possible?
> >
> > Thanks,
> > Vincent
>
> —
> Bruce Horrocks
> Hampshire, UK
> ___________________________________________________________________________________
> 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://context.aanhet.net
> archive  : https://bitbucket.org/phg/context-mirror/commits/
> wiki     : http://contextgarden.net
> ___________________________________________________________________________________
___________________________________________________________________________________
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://context.aanhet.net
archive  : https://bitbucket.org/phg/context-mirror/commits/
wiki     : http://contextgarden.net
___________________________________________________________________________________

Re: How to add margin around standalone MetaPost?

[śrīrāma via ntg-context]

On 5/20/22 10:26 PM Vincent Hennebert via ntg-context wrote:
> Take the following MetaPost file:
> 
> beginfig(0)
>   ahlength := 20;
>   linejoin := mitered;
>   drawarrow origin--(40,0) withpen pencircle scaled 5;
> endfig;
> 
> Render it into PDF with ConTeXt. Witness the cut out ends of the arrow.
> How to fix that?
> 
> Being able to add some margin would be a solution, which may be
> desirable anyway in some cases. Is that possible?

Enlarge the bounds of your picture – 

  beginfig(0);
    ahlength := 20;
    linejoin := mitered;
    drawarrow origin--(40,0) withpen pencircle scaled 5;

    setbounds currentpicture to boundingbox currentpicture enlarged 5mm;
  endfig;

  Sreeram


___________________________________________________________________________________
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://context.aanhet.net
archive  : https://bitbucket.org/phg/context-mirror/commits/
wiki     : http://contextgarden.net
___________________________________________________________________________________

Re: How to add margin around standalone MetaPost?

[Vincent Hennebert via ntg-context]

On Sat, 2022-05-21 at 07:39 +0530, śrīrāma wrote:
> On 5/20/22 10:26 PM Vincent Hennebert via ntg-context wrote:
> > Take the following MetaPost file:
> > 
> > beginfig(0)
> >   ahlength := 20;
> >   linejoin := mitered;
> >   drawarrow origin--(40,0) withpen pencircle scaled 5;
> > endfig;
> > 
> > Render it into PDF with ConTeXt. Witness the cut out ends of the
> > arrow.
> > How to fix that?
> > 
> > Being able to add some margin would be a solution, which may be
> > desirable anyway in some cases. Is that possible?
> 
> Enlarge the bounds of your picture – 
> 
>   beginfig(0);
>     ahlength := 20;
>     linejoin := mitered;
>     drawarrow origin--(40,0) withpen pencircle scaled 5;
> 
>     setbounds currentpicture to boundingbox currentpicture enlarged
> 5mm;
>   endfig;

Exactly what I was looking for. Thanks!

(I did find out about \startMPpage[offset=3pt], but that requires me to
include my MetaPost file into an additional, somewhat superfluous TeX
file. And for better editor support I prefer to edit the MetaPost in a
.mp file, rather than embedded in a .tex.)


Vincent
___________________________________________________________________________________
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://context.aanhet.net
archive  : https://bitbucket.org/phg/context-mirror/commits/
wiki     : http://contextgarden.net
___________________________________________________________________________________