From mboxrd@z Thu Jan  1 00:00:00 1970
X-Msuck: nntp://news.gmane.io/gmane.comp.tex.context/106523
Path: news.gmane.io!.POSTED.ciao.gmane.io!not-for-mail
From: Gerben Wierda <gerben.wierda@rna.nl>
Newsgroups: gmane.comp.tex.context
Subject: METAPOST vardef returning multiple and non-numeric
 types as a single answer?
Date: Sun, 15 Mar 2020 11:22:25 +0100
Message-ID: <1AFD4799-65FF-4574-A9B5-40BA3C532955@rna.nl>
Reply-To: mailing list for ConTeXt users <ntg-context@ntg.nl>
Mime-Version: 1.0 (Mac OS X Mail 12.4 \(3445.104.11\))
Content-Type: multipart/mixed; boundary="===============6732728356610351921=="
Injection-Info: ciao.gmane.io; posting-host="ciao.gmane.io:159.69.161.202";
	logging-data="28976"; mail-complaints-to="usenet@ciao.gmane.io"
To: mailing list for ConTeXt users <ntg-context@ntg.nl>
Original-X-From: ntg-context-bounces@ntg.nl Sun Mar 15 11:23:15 2020
Return-path: <ntg-context-bounces@ntg.nl>
Envelope-to: gctc-ntg-context-518@m.gmane-mx.org
Original-Received: from zapf.boekplan.nl ([5.39.185.232] helo=zapf.ntg.nl)
	by ciao.gmane.io with esmtps (TLS1.3:ECDHE_RSA_AES_256_GCM_SHA384:256)
	(Exim 4.92)
	(envelope-from <ntg-context-bounces@ntg.nl>)
	id 1jDQQM-0007Q4-EF
	for gctc-ntg-context-518@m.gmane-mx.org; Sun, 15 Mar 2020 11:23:14 +0100
Original-Received: from localhost (localhost [127.0.0.1])
	by zapf.ntg.nl (Postfix) with ESMTP id 7E2461824F6;
	Sun, 15 Mar 2020 11:22:31 +0100 (CET)
X-Virus-Scanned: Debian amavisd-new at zapf.boekplan.nl
Original-Received: from zapf.ntg.nl ([127.0.0.1])
	by localhost (zapf.ntg.nl [127.0.0.1]) (amavisd-new, port 10024)
	with ESMTP id aQUapiGvRIM4; Sun, 15 Mar 2020 11:22:29 +0100 (CET)
Original-Received: from zapf.ntg.nl (localhost [127.0.0.1])
	by zapf.ntg.nl (Postfix) with ESMTP id 916CA182937;
	Sun, 15 Mar 2020 11:22:29 +0100 (CET)
Original-Received: from localhost (localhost [127.0.0.1])
 by zapf.ntg.nl (Postfix) with ESMTP id 318151824F6
 for <ntg-context@ntg.nl>; Sun, 15 Mar 2020 11:22:28 +0100 (CET)
X-Virus-Scanned: Debian amavisd-new at zapf.boekplan.nl
Original-Received: from zapf.ntg.nl ([127.0.0.1])
 by localhost (zapf.ntg.nl [127.0.0.1]) (amavisd-new, port 10024)
 with ESMTP id dWuSnA39jc6z for <ntg-context@ntg.nl>;
 Sun, 15 Mar 2020 11:22:27 +0100 (CET)
Received-SPF: Pass (mailfrom) identity=mailfrom; client-ip=213.125.118.53;
 helo=mail.rna.nl; envelope-from=gerben.wierda@rna.nl; receiver=<UNKNOWN> 
Original-Received: from mail.rna.nl (mail.rna.nl [213.125.118.53])
 (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits))
 (No client certificate requested)
 by zapf.ntg.nl (Postfix) with ESMTPS id 399FD182359
 for <ntg-context@ntg.nl>; Sun, 15 Mar 2020 11:22:27 +0100 (CET)
Original-Received: from hermione.rna.nl (hermione.rna.nl [192.168.2.86])
 (using TLSv1.2 with cipher ECDHE-RSA-AES256-GCM-SHA384 (256/256 bits))
 (No client certificate requested)
 by mail.rna.nl (Postfix) with ESMTPSA id EFA2735C5842
 for <ntg-context@ntg.nl>; Sun, 15 Mar 2020 11:22:25 +0100 (CET)
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=rna.nl; s=dkim_rsa2048;
 t=1584267745;
 h=from:from:reply-to:subject:subject:date:date:message-id:message-id:
 to:to:cc:mime-version:mime-version:content-type:content-type;
 bh=TdhGEcjWtuWc1pCMYbhdLYzYddcdXIifvenb0DXVkFY=;
 b=P/jpdqWXTzixhWgBkXu/bB7U4C/UD7JYCxnUV0+f8J2LjEzlFEejsL7YiJAX01rJHpWIw8
 GhrtQqLD42Lqz4Zrt7t0xxLbBDkoPxLGszV66jgisKVfAUN5AKLLAoKVYAM39NFD4si1du
 qcEmZIcj+LWw+26qb7JDrvWt9M2maQIm1VtnTEvvXOXUmjD9NzCxfckuE64OKCs5Kg9hU5
 yVPW8iegoAexs14qwmxiRSiCr0PDpzEVQ5xbvmEFUjFwAlG6e+Hsu2j5Of56fAZ4B7d+qQ
 RuLL0oHQksRTC2VAzcKeWQfw6PPdNypEuE8kbIKQ8dUijVHHkrxdmj/C+7ztxw==
X-Mailer: Apple Mail (2.3445.104.11)
X-BeenThere: ntg-context@ntg.nl
X-Mailman-Version: 2.1.26
Precedence: list
List-Id: mailing list for ConTeXt users <ntg-context.ntg.nl>
List-Unsubscribe: <https://mailman.ntg.nl/mailman/options/ntg-context>,
 <mailto:ntg-context-request@ntg.nl?subject=unsubscribe>
List-Archive: <http://mailman.ntg.nl/pipermail/ntg-context/>
List-Post: <mailto:ntg-context@ntg.nl>
List-Help: <mailto:ntg-context-request@ntg.nl?subject=help>
List-Subscribe: <https://mailman.ntg.nl/mailman/listinfo/ntg-context>,
 <mailto:ntg-context-request@ntg.nl?subject=subscribe>
Errors-To: ntg-context-bounces@ntg.nl
Original-Sender: "ntg-context" <ntg-context-bounces@ntg.nl>
Xref: news.gmane.io gmane.comp.tex.context:106523
Archived-At: <http://permalink.gmane.org/gmane.comp.tex.context/106523>


--===============6732728356610351921==
Content-Type: multipart/alternative;
	boundary="Apple-Mail=_A9A811C7-C606-4D64-8925-1AB3403FD7B8"


--Apple-Mail=_A9A811C7-C606-4D64-8925-1AB3403FD7B8
Content-Transfer-Encoding: quoted-printable
Content-Type: text/plain;
	charset=us-ascii

I would like a vardef macro to return the pair of a picture and a =
bounding box. I don't want to use the setbound operator, because as soon =
as I do that, I cannot access the components of the picture anymore with =
pathpart.

I found metapost vardef returning multiple values =
<https://tex.stackexchange.com/questions/448740/metapost-vardef-returning-=
multiple-values> on StackExchange but that is about returning multiple =
values of the same numeric type. Is it possible to have vardef return a =
set of (picture, path) or (picture, picture) in some way? If not, I need =
to make two vardef macros for each result type.

I tried many things, amongst which:

vardef Foo( expr w, h)
% define pic
pic
end group,begingroup
% define pic
pic
endif

picture foo[]; foo =3D Foo( 2, 4);


--Apple-Mail=_A9A811C7-C606-4D64-8925-1AB3403FD7B8
Content-Transfer-Encoding: quoted-printable
Content-Type: text/html;
	charset=us-ascii

<html><head><meta http-equiv=3D"Content-Type" content=3D"text/html; =
charset=3Dus-ascii"></head><body style=3D"word-wrap: break-word; =
-webkit-nbsp-mode: space; line-break: after-white-space;" class=3D""><div =
class=3D"post-text" itemprop=3D"text" style=3D"margin: 0px 0px 5px; =
padding: 0px; border: 0px; font-family: Arial, &quot;Helvetica =
Neue&quot;, Helvetica, sans-serif; font-style: inherit; =
font-variant-caps: inherit; font-stretch: inherit; line-height: 1.3; =
font-size: 15px; vertical-align: baseline; box-sizing: inherit; width: =
658px; word-wrap: break-word;"><p style=3D"margin: 0px 0px 1em; padding: =
0px; border: 0px; font-family: inherit; font-style: inherit; =
font-variant-caps: inherit; font-stretch: inherit; line-height: inherit; =
vertical-align: baseline; box-sizing: inherit; clear: both;" class=3D"">I =
would like a&nbsp;<code style=3D"margin: 0px; padding: 1px 5px; border: =
0px; font-family: Consolas, Menlo, Monaco, &quot;Lucida Console&quot;, =
&quot;Liberation Mono&quot;, &quot;DejaVu Sans Mono&quot;, =
&quot;Bitstream Vera Sans Mono&quot;, &quot;Courier New&quot;, =
monospace, sans-serif; font-style: inherit; font-variant-caps: inherit; =
font-stretch: inherit; line-height: 19.5px; font-size: 13px; =
vertical-align: baseline; box-sizing: inherit; white-space: pre-wrap;" =
class=3D"">vardef</code>&nbsp;macro to return the pair of a picture and =
a bounding box. I don't want to use the&nbsp;<code style=3D"margin: 0px; =
padding: 1px 5px; border: 0px; font-family: Consolas, Menlo, Monaco, =
&quot;Lucida Console&quot;, &quot;Liberation Mono&quot;, &quot;DejaVu =
Sans Mono&quot;, &quot;Bitstream Vera Sans Mono&quot;, &quot;Courier =
New&quot;, monospace, sans-serif; font-style: inherit; =
font-variant-caps: inherit; font-stretch: inherit; line-height: 19.5px; =
font-size: 13px; vertical-align: baseline; box-sizing: inherit; =
white-space: pre-wrap;" class=3D"">setbound</code>&nbsp;operator, =
because as soon as I do that, I cannot access the components of the =
picture anymore with&nbsp;<code style=3D"margin: 0px; padding: 1px 5px; =
border: 0px; font-family: Consolas, Menlo, Monaco, &quot;Lucida =
Console&quot;, &quot;Liberation Mono&quot;, &quot;DejaVu Sans =
Mono&quot;, &quot;Bitstream Vera Sans Mono&quot;, &quot;Courier =
New&quot;, monospace, sans-serif; font-style: inherit; =
font-variant-caps: inherit; font-stretch: inherit; line-height: 19.5px; =
font-size: 13px; vertical-align: baseline; box-sizing: inherit; =
white-space: pre-wrap;" class=3D"">pathpart</code>.</p><p style=3D"margin:=
 0px 0px 1em; padding: 0px; border: 0px; font-family: inherit; =
font-style: inherit; font-variant-caps: inherit; font-stretch: inherit; =
line-height: inherit; vertical-align: baseline; box-sizing: inherit; =
clear: both;" class=3D"">I found&nbsp;<a =
href=3D"https://tex.stackexchange.com/questions/448740/metapost-vardef-ret=
urning-multiple-values" style=3D"margin: 0px; padding: 0px; border: 0px; =
font-family: inherit; font-style: inherit; font-variant-caps: inherit; =
font-stretch: inherit; line-height: inherit; vertical-align: baseline; =
box-sizing: inherit; color: rgba(159, 57, 61, 0.8); cursor: pointer;" =
class=3D"">metapost vardef returning multiple values</a>&nbsp;on =
StackExchange&nbsp;but that is about returning multiple values of the =
same numeric type. Is it possible to have&nbsp;<code style=3D"margin: =
0px; padding: 1px 5px; border: 0px; font-family: Consolas, Menlo, =
Monaco, &quot;Lucida Console&quot;, &quot;Liberation Mono&quot;, =
&quot;DejaVu Sans Mono&quot;, &quot;Bitstream Vera Sans Mono&quot;, =
&quot;Courier New&quot;, monospace, sans-serif; font-style: inherit; =
font-variant-caps: inherit; font-stretch: inherit; line-height: 19.5px; =
font-size: 13px; vertical-align: baseline; box-sizing: inherit; =
white-space: pre-wrap;" class=3D"">vardef</code>&nbsp;return a set of =
(picture, path) or (picture, picture) in some way? If not, I need to =
make two&nbsp;<code style=3D"margin: 0px; padding: 1px 5px; border: 0px; =
font-family: Consolas, Menlo, Monaco, &quot;Lucida Console&quot;, =
&quot;Liberation Mono&quot;, &quot;DejaVu Sans Mono&quot;, =
&quot;Bitstream Vera Sans Mono&quot;, &quot;Courier New&quot;, =
monospace, sans-serif; font-style: inherit; font-variant-caps: inherit; =
font-stretch: inherit; line-height: 19.5px; font-size: 13px; =
vertical-align: baseline; box-sizing: inherit; white-space: pre-wrap;" =
class=3D"">vardef</code>&nbsp;macros for each result type.</p><p =
style=3D"margin: 0px 0px 1em; padding: 0px; border: 0px; font-family: =
inherit; font-style: inherit; font-variant-caps: inherit; font-stretch: =
inherit; line-height: inherit; vertical-align: baseline; box-sizing: =
inherit; clear: both;" class=3D"">I tried many things, amongst =
which:</p><pre class=3D"prettyprinted lang-tex prettyprint" =
style=3D"margin-top: 0px; margin-bottom: 1em; padding: 12px 8px; border: =
0px; font-family: Consolas, Menlo, Monaco, &quot;Lucida Console&quot;, =
&quot;Liberation Mono&quot;, &quot;DejaVu Sans Mono&quot;, =
&quot;Bitstream Vera Sans Mono&quot;, &quot;Courier New&quot;, =
monospace, sans-serif; font-style: inherit; font-variant-caps: inherit; =
font-stretch: inherit; line-height: inherit; font-size: 13px; =
vertical-align: baseline; box-sizing: inherit; width: auto; max-height: =
600px; overflow: auto; border-top-left-radius: 3px; =
border-top-right-radius: 3px; border-bottom-right-radius: 3px; =
border-bottom-left-radius: 3px; color: rgb(57, 51, 24); word-wrap: =
normal;"><code style=3D"margin: 0px; padding: 0px; border: 0px; =
font-family: Consolas, Menlo, Monaco, &quot;Lucida Console&quot;, =
&quot;Liberation Mono&quot;, &quot;DejaVu Sans Mono&quot;, =
&quot;Bitstream Vera Sans Mono&quot;, &quot;Courier New&quot;, =
monospace, sans-serif; font-style: inherit; font-variant-caps: inherit; =
font-stretch: inherit; line-height: 19.5px; vertical-align: baseline; =
box-sizing: inherit; white-space: inherit;" class=3D""><span class=3D"pln"=
 style=3D"margin: 0px; padding: 0px; border: 0px; font-family: inherit; =
font-style: inherit; font-variant-caps: inherit; font-stretch: inherit; =
line-height: inherit; vertical-align: baseline; box-sizing: inherit; =
color: var(--black-750);">vardef Foo</span><span class=3D"pun" =
style=3D"margin: 0px; padding: 0px; border: 0px; font-family: inherit; =
font-style: inherit; font-variant-caps: inherit; font-stretch: inherit; =
line-height: inherit; vertical-align: baseline; box-sizing: inherit; =
color: rgb(159, 57, 61);">(</span><span class=3D"pln" style=3D"margin: =
0px; padding: 0px; border: 0px; font-family: inherit; font-style: =
inherit; font-variant-caps: inherit; font-stretch: inherit; line-height: =
inherit; vertical-align: baseline; box-sizing: inherit; color: =
var(--black-750);"> expr w, h</span><span class=3D"pun" style=3D"margin: =
0px; padding: 0px; border: 0px; font-family: inherit; font-style: =
inherit; font-variant-caps: inherit; font-stretch: inherit; line-height: =
inherit; vertical-align: baseline; box-sizing: inherit; color: rgb(159, =
57, 61);">)</span><span class=3D"pln" style=3D"margin: 0px; padding: =
0px; border: 0px; font-family: inherit; font-style: inherit; =
font-variant-caps: inherit; font-stretch: inherit; line-height: inherit; =
vertical-align: baseline; box-sizing: inherit; color: =
var(--black-750);">
</span><span class=3D"com" style=3D"margin: 0px; padding: 0px; border: =
0px; font-family: inherit; font-style: inherit; font-variant-caps: =
inherit; font-stretch: inherit; line-height: inherit; vertical-align: =
baseline; box-sizing: inherit; color: rgb(134, 134, 134);">% define =
pic</span><span class=3D"pln" style=3D"margin: 0px; padding: 0px; =
border: 0px; font-family: inherit; font-style: inherit; =
font-variant-caps: inherit; font-stretch: inherit; line-height: inherit; =
vertical-align: baseline; box-sizing: inherit; color: =
var(--black-750);">
pic
end group,begingroup
</span><span class=3D"com" style=3D"margin: 0px; padding: 0px; border: =
0px; font-family: inherit; font-style: inherit; font-variant-caps: =
inherit; font-stretch: inherit; line-height: inherit; vertical-align: =
baseline; box-sizing: inherit; color: rgb(134, 134, 134);">% define =
pic</span><span class=3D"pln" style=3D"margin: 0px; padding: 0px; =
border: 0px; font-family: inherit; font-style: inherit; =
font-variant-caps: inherit; font-stretch: inherit; line-height: inherit; =
vertical-align: baseline; box-sizing: inherit; color: =
var(--black-750);">
pic
endif

picture foo</span><span class=3D"pun" style=3D"margin: 0px; padding: =
0px; border: 0px; font-family: inherit; font-style: inherit; =
font-variant-caps: inherit; font-stretch: inherit; line-height: inherit; =
vertical-align: baseline; box-sizing: inherit; color: rgb(159, 57, =
61);">[]</span><span class=3D"pln" style=3D"margin: 0px; padding: 0px; =
border: 0px; font-family: inherit; font-style: inherit; =
font-variant-caps: inherit; font-stretch: inherit; line-height: inherit; =
vertical-align: baseline; box-sizing: inherit; color: =
var(--black-750);">; foo </span><span class=3D"pun" style=3D"margin: =
0px; padding: 0px; border: 0px; font-family: inherit; font-style: =
inherit; font-variant-caps: inherit; font-stretch: inherit; line-height: =
inherit; vertical-align: baseline; box-sizing: inherit; color: rgb(159, =
57, 61);">=3D</span><span class=3D"pln" style=3D"margin: 0px; padding: =
0px; border: 0px; font-family: inherit; font-style: inherit; =
font-variant-caps: inherit; font-stretch: inherit; line-height: inherit; =
vertical-align: baseline; box-sizing: inherit; color: =
var(--black-750);"> Foo</span><span class=3D"pun" style=3D"margin: 0px; =
padding: 0px; border: 0px; font-family: inherit; font-style: inherit; =
font-variant-caps: inherit; font-stretch: inherit; line-height: inherit; =
vertical-align: baseline; box-sizing: inherit; color: rgb(159, 57, =
61);">(</span><span class=3D"pln" style=3D"margin: 0px; padding: 0px; =
border: 0px; font-family: inherit; font-style: inherit; =
font-variant-caps: inherit; font-stretch: inherit; line-height: inherit; =
vertical-align: baseline; box-sizing: inherit; color: =
var(--black-750);"> 2, 4</span><span class=3D"pun" style=3D"margin: 0px; =
padding: 0px; border: 0px; font-family: inherit; font-style: inherit; =
font-variant-caps: inherit; font-stretch: inherit; line-height: inherit; =
vertical-align: baseline; box-sizing: inherit; color: rgb(159, 57, =
61);">)</span><span class=3D"pln" style=3D"margin: 0px; padding: 0px; =
border: 0px; font-family: inherit; font-style: inherit; =
font-variant-caps: inherit; font-stretch: inherit; line-height: inherit; =
vertical-align: baseline; box-sizing: inherit; color: =
var(--black-750);">;</span></code></pre><div class=3D""><code =
style=3D"margin: 0px; padding: 0px; border: 0px; font-family: Consolas, =
Menlo, Monaco, &quot;Lucida Console&quot;, &quot;Liberation Mono&quot;, =
&quot;DejaVu Sans Mono&quot;, &quot;Bitstream Vera Sans Mono&quot;, =
&quot;Courier New&quot;, monospace, sans-serif; font-style: inherit; =
font-variant-caps: inherit; font-stretch: inherit; line-height: 19.5px; =
vertical-align: baseline; box-sizing: inherit; white-space: inherit;" =
class=3D""><span class=3D"pln" style=3D"margin: 0px; padding: 0px; =
border: 0px; font-family: inherit; font-style: inherit; =
font-variant-caps: inherit; font-stretch: inherit; line-height: inherit; =
vertical-align: baseline; box-sizing: inherit; color: =
var(--black-750);"><br class=3D""></span></code></div></div><div =
class=3D"post-taglist gs4 fd-column grid gsy" style=3D"margin: -2px 0px =
10px; padding: 0px; border: 0px; font-family: inherit; font-style: =
inherit; font-variant-caps: inherit; font-stretch: inherit; line-height: =
inherit; font-size: 13px; vertical-align: baseline; box-sizing: inherit; =
display: flex; clear: both; flex-direction: column =
!important;"></div></body></html>=

--Apple-Mail=_A9A811C7-C606-4D64-8925-1AB3403FD7B8--

--===============6732728356610351921==
Content-Type: text/plain; charset="utf-8"
MIME-Version: 1.0
Content-Transfer-Encoding: base64
Content-Disposition: inline

X19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19f
X19fX19fX19fX19fX19fX19fX19fX19fX18KSWYgeW91ciBxdWVzdGlvbiBpcyBvZiBpbnRlcmVz
dCB0byBvdGhlcnMgYXMgd2VsbCwgcGxlYXNlIGFkZCBhbiBlbnRyeSB0byB0aGUgV2lraSEKCm1h
aWxsaXN0IDogbnRnLWNvbnRleHRAbnRnLm5sIC8gaHR0cDovL3d3dy5udGcubmwvbWFpbG1hbi9s
aXN0aW5mby9udGctY29udGV4dAp3ZWJwYWdlICA6IGh0dHA6Ly93d3cucHJhZ21hLWFkZS5ubCAv
IGh0dHA6Ly9jb250ZXh0LmFhbmhldC5uZXQKYXJjaGl2ZSAgOiBodHRwczovL2JpdGJ1Y2tldC5v
cmcvcGhnL2NvbnRleHQtbWlycm9yL2NvbW1pdHMvCndpa2kgICAgIDogaHR0cDovL2NvbnRleHRn
YXJkZW4ubmV0Cl9fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19f
X19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fX19fCg==

--===============6732728356610351921==--