From owner-sc22wg5+sc22wg5-dom9=www.open-std.org@open-std.org  Sat May 17 03:24:14 2025
Return-Path: <owner-sc22wg5+sc22wg5-dom9=www.open-std.org@open-std.org>
X-Original-To: sc22wg5-dom9
Delivered-To: sc22wg5-dom9@www.open-std.org
Received: by www.open-std.org (Postfix, from userid 521)
	id 9C6E1356A3A; Sat, 17 May 2025 03:24:14 +0200 (CEST)
Delivered-To: sc22wg5@open-std.org
Received: from www975.sakura.ne.jp (www975.sakura.ne.jp [219.94.128.215])
	by www.open-std.org (Postfix) with ESMTP id 8C3D035698D
	for <sc22wg5@open-std.org>; Sat, 17 May 2025 03:24:10 +0200 (CEST)
Received: from www975.sakura.ne.jp (localhost [127.0.0.1])
	by www975.sakura.ne.jp (8.16.1/8.16.1) with ESMTP id 54H1O5gJ010392
	for <sc22wg5@open-std.org>; Sat, 17 May 2025 10:24:05 +0900 (JST)
	(envelope-from malcolm@nag-j.co.jp)
Received: from Maru10 (218-42-159-105.cust.bit-drive.ne.jp [218.42.159.105])
	(authenticated bits=0)
	by www975.sakura.ne.jp (8.16.1/8.16.1) with ESMTPSA id 54H1O4ar010388
	(version=TLSv1.2 cipher=ECDHE-RSA-AES256-GCM-SHA384 bits=256 verify=NO)
	for <sc22wg5@open-std.org>; Sat, 17 May 2025 10:24:05 +0900 (JST)
	(envelope-from malcolm@nag-j.co.jp)
DKIM-Signature: a=rsa-sha256; bh=sniiyxsooZCuXiBvzyrXM5LbBYEWEN8yh0zAk2ZNGMw=;
        c=relaxed/relaxed; d=nag-j.co.jp;
        h=From:To:Subject:Date:Message-ID;
        s=rs20250417; t=1747445045; v=1;
        b=I3+KLdoHOoriZ4oD4mvUpLL3lAyfjfOU8HRz/WO4ervnnb2pbmWLDczASdXVmJz5
         idWyHzG6o8I91SuGhou0Qz3xLH1JXTtx0CZ7nXuLtiIqdWYhyEnbDV23RVigYjny
         gcT3WXDpyGrM2cuVL3UPNwpswocEDDDPACSlet5AMGdYF7Q5+JWlu/4IfN5K4ybC
         AZErqJc721R/ze9qaZmK/PMBXpmjausSDoqyABbc8YO8dNCIVC0yqmD4rREB21+v
         oTv4f9GxCE4mKBc792w2cqgOdotDPRzmBgXDp4t5Dg/Am0LBgNv+7DV8eFOqWhce
         niZ1W7DhoVsOXD4irFIi7g==
From: "Malcolm Cohen" <malcolm@nag-j.co.jp>
To: "'sc22wg5'" <sc22wg5@open-std.org>
References: <20250516031346.9D36B3569C3@www.open-std.org> <4f8e57e8606a22547d527de90c4c932236c20927.camel@sbcglobal.net>
In-Reply-To: <4f8e57e8606a22547d527de90c4c932236c20927.camel@sbcglobal.net>
Subject: RE: [J3] [SC22WG5.6687] WG5 letter ballot 1 on Fortran 2023 interpretations
Date: Sat, 17 May 2025 10:24:04 +0900
Message-ID: <007801dbc6ca$617802b0$24680810$@nag-j.co.jp>
MIME-Version: 1.0
Content-Type: multipart/alternative;
	boundary="----=_NextPart_000_0079_01DBC715.D1648CB0"
X-Mailer: Microsoft Outlook 16.0
Thread-Index: AQH+zYuuds+oeQUeFNHKoxzeTToQlQHUw+Fas4FSd9A=
Content-Language: ja
X-Virus-Status: clean
X-Anti-Virus-Server: fsav302.rs.sakura.ne.jp
Sender: owner-sc22wg5@open-std.org
Precedence: bulk

This is a multipart message in MIME format.

------=_NextPart_000_0079_01DBC715.D1648CB0
Content-Type: text/plain;
	charset="utf-8"
Content-Transfer-Encoding: quoted-printable

Forwarding Van=E2=80=99s unofficial vote to the WG5 list for him.

=20

Perhaps I should have written:

=20

1.	J3 list members *please* remember to set the reply to the WG5 list, =
as the J3 list server makes =E2=80=9Creply=E2=80=9D go only to the J3 =
list (I will see it but some WG5 members may not). The J3 list is a =
subset of the WG5 list so please don=E2=80=99t send to both J3 and WG5!
2.	As usual, unofficial votes and comments from people who are not =
technically members of WG5 are always welcome, and will be included in =
the results.

=20

Cheers,

--=20

..............Malcolm Cohen, NAG Oxford/Tokyo.

=20

From: J3 <j3-bounces@mailman.j3-fortran.org> On Behalf Of Van Snyder via =
J3
Sent: Saturday, May 17, 2025 5:22 AM
To: j3@mailman.j3-fortran.org
Cc: Van Snyder <van.snyder@sbcglobal.net>
Subject: Re: [J3] [SC22WG5.6687] WG5 letter ballot 1 on Fortran 2023 =
interpretations

=20

On Fri, 2025-05-16 at 11:26 +0900, Malcolm Cohen via J3 wrote:

The following Fortran 2023 interpretations are being balloted:

=20

I'm emeritus so I don't get an official vote, but here is my opinion, =
for what it's worth.

=20

=20

Yes  No   Number    Title

=20

-C-  ---  F23/003  Conflicting rules for COMMON block names

=20

I can't understand a prohibition against a constant having the same name =
as a common block, but an interp is not the right place to undo that F77 =
decision.

=20

-Y-  ---  F23/004  OUT_OF_RANGE and ROUND argument

-Y-  ---  F23/005  Defined assignment/operators and dynamic type

-Y-  ---  F23/006  Underflow in IEEE_SCALB

-Y-  ---  F23/008  Real argument I in IEEE_SCALB

-Y-  ---  F23/009  Coarray subobject of component

-Y-  ---  F23/010  MOVE_ALLOC with coarray arguments

-Y-  ---  F23/011  NULL and procedure pointers

-Y-  ---  F23/012  Coarray correspondence in DEALLOCATE

-Y-  ---  F23/013  BOZ literals in interoperable enumerators

-Y-  ---  F23/015  Coindexed objects in structure constructors

-Y-  ---  F23/016  Segments associated with allocation

-Y-  ---  F23/017  CFI_establish nonalloc nonpointer null base address

-Y-  ---  F23/018  Correspondence of unallocated coarrays

=20


------=_NextPart_000_0079_01DBC715.D1648CB0
Content-Type: text/html;
	charset="utf-8"
Content-Transfer-Encoding: quoted-printable

<html xmlns:v=3D"urn:schemas-microsoft-com:vml" =
xmlns:o=3D"urn:schemas-microsoft-com:office:office" =
xmlns:w=3D"urn:schemas-microsoft-com:office:word" =
xmlns:m=3D"http://schemas.microsoft.com/office/2004/12/omml" =
xmlns=3D"http://www.w3.org/TR/REC-html40"><head><meta =
http-equiv=3DContent-Type content=3D"text/html; charset=3Dutf-8"><meta =
name=3DGenerator content=3D"Microsoft Word 15 (filtered =
medium)"><style><!--
/* Font Definitions */
@font-face
	{font-family:"Cambria Math";
	panose-1:2 4 5 3 5 4 6 3 2 4;}
@font-face
	{font-family:=E6=B8=B8=E3=82=B4=E3=82=B7=E3=83=83=E3=82=AF;
	panose-1:2 11 4 0 0 0 0 0 0 0;}
@font-face
	{font-family:Calibri;
	panose-1:2 15 5 2 2 2 4 3 2 4;}
@font-face
	{font-family:Aptos;}
@font-face
	{font-family:"\@=E6=B8=B8=E3=82=B4=E3=82=B7=E3=83=83=E3=82=AF";
	panose-1:2 11 4 0 0 0 0 0 0 0;}
/* Style Definitions */
p.MsoNormal, li.MsoNormal, div.MsoNormal
	{margin:0cm;
	font-size:12.0pt;
	font-family:"Aptos",sans-serif;}
p.MsoListParagraph, li.MsoListParagraph, div.MsoListParagraph
	{mso-style-priority:34;
	margin-top:0cm;
	margin-right:0cm;
	margin-bottom:0cm;
	margin-left:36.0pt;
	font-size:12.0pt;
	font-family:"Aptos",sans-serif;}
span.18
	{mso-style-type:personal-reply;
	font-family:"Calibri",sans-serif;
	color:windowtext;}
.MsoChpDefault
	{mso-style-type:export-only;
	font-size:10.0pt;
	mso-ligatures:none;}
@page WordSection1
	{size:612.0pt 792.0pt;
	margin:99.25pt 3.0cm 3.0cm 3.0cm;}
div.WordSection1
	{page:WordSection1;}
/* List Definitions */
@list l0
	{mso-list-id:1784498890;
	mso-list-type:hybrid;
	mso-list-template-ids:76336940 -1060855506 134807577 134807579 =
134807567 134807577 134807579 134807567 134807577 134807579;}
@list l0:level1
	{mso-level-text:"\(%1\)";
	mso-level-tab-stop:none;
	mso-level-number-position:left;
	text-indent:-18.0pt;}
@list l0:level2
	{mso-level-number-format:alpha-lower;
	mso-level-tab-stop:none;
	mso-level-number-position:left;
	text-indent:-18.0pt;}
@list l0:level3
	{mso-level-number-format:roman-lower;
	mso-level-tab-stop:none;
	mso-level-number-position:right;
	text-indent:-9.0pt;}
@list l0:level4
	{mso-level-tab-stop:none;
	mso-level-number-position:left;
	text-indent:-18.0pt;}
@list l0:level5
	{mso-level-number-format:alpha-lower;
	mso-level-tab-stop:none;
	mso-level-number-position:left;
	text-indent:-18.0pt;}
@list l0:level6
	{mso-level-number-format:roman-lower;
	mso-level-tab-stop:none;
	mso-level-number-position:right;
	text-indent:-9.0pt;}
@list l0:level7
	{mso-level-tab-stop:none;
	mso-level-number-position:left;
	text-indent:-18.0pt;}
@list l0:level8
	{mso-level-number-format:alpha-lower;
	mso-level-tab-stop:none;
	mso-level-number-position:left;
	text-indent:-18.0pt;}
@list l0:level9
	{mso-level-number-format:roman-lower;
	mso-level-tab-stop:none;
	mso-level-number-position:right;
	text-indent:-9.0pt;}
ol
	{margin-bottom:0cm;}
ul
	{margin-bottom:0cm;}
--></style><!--[if gte mso 9]><xml>
<o:shapedefaults v:ext=3D"edit" spidmax=3D"1026" />
</xml><![endif]--><!--[if gte mso 9]><xml>
<o:shapelayout v:ext=3D"edit">
<o:idmap v:ext=3D"edit" data=3D"1" />
</o:shapelayout></xml><![endif]--></head><body lang=3DEN-GB =
link=3D"#0563C1" vlink=3D"#954F72" style=3D'word-wrap:break-word'><div =
class=3DWordSection1><p class=3DMsoNormal><span =
style=3D'font-size:11.0pt;font-family:"Calibri",sans-serif'>Forwarding =
Van=E2=80=99s unofficial vote to the WG5 list for =
him.<o:p></o:p></span></p><p class=3DMsoNormal><span =
style=3D'font-size:11.0pt;font-family:"Calibri",sans-serif'><o:p>&nbsp;</=
o:p></span></p><p class=3DMsoNormal><span =
style=3D'font-size:11.0pt;font-family:"Calibri",sans-serif'>Perhaps I =
should have written:<o:p></o:p></span></p><p class=3DMsoNormal><span =
style=3D'font-size:11.0pt;font-family:"Calibri",sans-serif'><o:p>&nbsp;</=
o:p></span></p><ol style=3D'margin-top:0cm' start=3D1 type=3D1><li =
class=3DMsoListParagraph style=3D'margin-left:0cm;mso-list:l0 level1 =
lfo1'><span =
style=3D'font-size:11.0pt;font-family:"Calibri",sans-serif'>J3 list =
members *<b>please</b>* remember to set the reply to the WG5 list, as =
the J3 list server makes =E2=80=9Creply=E2=80=9D go only to the J3 list =
(I will see it but some WG5 members may not). The J3 list is a subset of =
the WG5 list so please don=E2=80=99t send to both J3 and =
WG5!<o:p></o:p></span></li><li class=3DMsoListParagraph =
style=3D'margin-left:0cm;mso-list:l0 level1 lfo1'><span =
style=3D'font-size:11.0pt;font-family:"Calibri",sans-serif'>As usual, =
unofficial votes and comments from people who are not technically =
members of WG5 are always welcome, and will be included in the =
results.<o:p></o:p></span></li></ol><p class=3DMsoNormal><span =
style=3D'font-size:11.0pt;font-family:"Calibri",sans-serif'><o:p>&nbsp;</=
o:p></span></p><p class=3DMsoNormal><span =
style=3D'font-size:11.0pt;font-family:"Calibri",sans-serif'>Cheers,<o:p><=
/o:p></span></p><div><p class=3DMsoNormal =
style=3D'text-align:justify;text-justify:inter-ideograph'><span =
lang=3DEN-US =
style=3D'font-size:10.5pt;font-family:"Calibri",sans-serif'>-- =
</span><span =
style=3D'font-size:10.5pt;font-family:"Calibri",sans-serif'><o:p></o:p></=
span></p><p class=3DMsoNormal =
style=3D'text-align:justify;text-justify:inter-ideograph'><span =
lang=3DEN-US =
style=3D'font-size:10.5pt;font-family:"Calibri",sans-serif'>.............=
.Malcolm Cohen, NAG Oxford/Tokyo.</span><span =
style=3D'font-size:10.5pt;font-family:"Calibri",sans-serif'><o:p></o:p></=
span></p></div><p class=3DMsoNormal><span =
style=3D'font-size:11.0pt;font-family:"Calibri",sans-serif'><o:p>&nbsp;</=
o:p></span></p><div><div style=3D'border:none;border-top:solid #E1E1E1 =
1.0pt;padding:3.0pt 0cm 0cm 0cm'><p class=3DMsoNormal><b><span =
style=3D'font-size:11.0pt;font-family:"Calibri",sans-serif'>From:</span><=
/b><span style=3D'font-size:11.0pt;font-family:"Calibri",sans-serif'> J3 =
&lt;j3-bounces@mailman.j3-fortran.org&gt; <b>On Behalf Of </b>Van Snyder =
via J3<br><b>Sent:</b> Saturday, May 17, 2025 5:22 AM<br><b>To:</b> =
j3@mailman.j3-fortran.org<br><b>Cc:</b> Van Snyder =
&lt;van.snyder@sbcglobal.net&gt;<br><b>Subject:</b> Re: [J3] =
[SC22WG5.6687] WG5 letter ballot 1 on Fortran 2023 =
interpretations<o:p></o:p></span></p></div></div><p =
class=3DMsoNormal><o:p>&nbsp;</o:p></p><div><p class=3DMsoNormal>On Fri, =
2025-05-16 at 11:26 +0900, Malcolm Cohen via J3 =
wrote:<o:p></o:p></p></div><blockquote =
style=3D'border:none;border-left:solid #729FCF 1.5pt;padding:0cm 0cm 0cm =
6.0pt;margin-left:4.8pt;margin-right:0cm'><p class=3DMsoNormal =
style=3D'mso-margin-top-alt:auto;mso-margin-bottom-alt:auto'><span =
style=3D'font-size:11.0pt'>The following Fortran 2023 interpretations =
are being balloted:</span><o:p></o:p></p></blockquote><div><p =
class=3DMsoNormal><o:p>&nbsp;</o:p></p></div><div><p =
class=3DMsoNormal>I'm emeritus so I don't get an official vote, but here =
is my opinion, for what it's worth.<o:p></o:p></p></div><div><p =
class=3DMsoNormal><o:p>&nbsp;</o:p></p></div><blockquote =
style=3D'border:none;border-left:solid #729FCF 1.5pt;padding:0cm 0cm 0cm =
6.0pt;margin-left:4.8pt;margin-right:0cm'><p class=3DMsoNormal =
style=3D'mso-margin-top-alt:auto;mso-margin-bottom-alt:auto'><span =
style=3D'font-size:11.0pt'>&nbsp;</span><o:p></o:p></p><p =
class=3DMsoNormal =
style=3D'mso-margin-top-alt:auto;mso-margin-bottom-alt:auto'><span =
style=3D'font-size:11.0pt'>Yes&nbsp; No&nbsp;&nbsp; =
Number&nbsp;&nbsp;&nbsp; Title</span><o:p></o:p></p><p class=3DMsoNormal =
style=3D'mso-margin-top-alt:auto;mso-margin-bottom-alt:auto'><span =
style=3D'font-size:11.0pt'>&nbsp;</span><o:p></o:p></p><p =
class=3DMsoNormal =
style=3D'mso-margin-top-alt:auto;mso-margin-bottom-alt:auto'><span =
style=3D'font-size:11.0pt'>-C-&nbsp; ---&nbsp; F23/003&nbsp; Conflicting =
rules for COMMON block names</span><o:p></o:p></p></blockquote><div><p =
class=3DMsoNormal><o:p>&nbsp;</o:p></p></div><div><p class=3DMsoNormal>I =
can't understand a prohibition against a constant having the same name =
as a common block, but an interp is not the right place to undo that F77 =
decision.<o:p></o:p></p></div><div><p =
class=3DMsoNormal><o:p>&nbsp;</o:p></p></div><blockquote =
style=3D'border:none;border-left:solid #729FCF 1.5pt;padding:0cm 0cm 0cm =
6.0pt;margin-left:4.8pt;margin-right:0cm'><p class=3DMsoNormal =
style=3D'mso-margin-top-alt:auto;mso-margin-bottom-alt:auto'><span =
style=3D'font-size:11.0pt'>-Y-&nbsp; ---&nbsp; F23/004&nbsp; =
OUT_OF_RANGE and ROUND argument</span><o:p></o:p></p><p =
class=3DMsoNormal =
style=3D'mso-margin-top-alt:auto;mso-margin-bottom-alt:auto'><span =
style=3D'font-size:11.0pt'>-Y-&nbsp; ---&nbsp; F23/005&nbsp; Defined =
assignment/operators and dynamic type</span><o:p></o:p></p><p =
class=3DMsoNormal =
style=3D'mso-margin-top-alt:auto;mso-margin-bottom-alt:auto'><span =
style=3D'font-size:11.0pt'>-Y-&nbsp; ---&nbsp; F23/006&nbsp; Underflow =
in IEEE_SCALB</span><o:p></o:p></p><p class=3DMsoNormal =
style=3D'mso-margin-top-alt:auto;mso-margin-bottom-alt:auto'><span =
style=3D'font-size:11.0pt'>-Y-&nbsp; ---&nbsp; F23/008&nbsp; Real =
argument I in IEEE_SCALB</span><o:p></o:p></p><p class=3DMsoNormal =
style=3D'mso-margin-top-alt:auto;mso-margin-bottom-alt:auto'><span =
style=3D'font-size:11.0pt'>-Y-&nbsp; ---&nbsp; F23/009&nbsp; Coarray =
subobject of component</span><o:p></o:p></p><p class=3DMsoNormal =
style=3D'mso-margin-top-alt:auto;mso-margin-bottom-alt:auto'><span =
style=3D'font-size:11.0pt'>-Y-&nbsp; ---&nbsp; F23/010&nbsp; MOVE_ALLOC =
with coarray arguments</span><o:p></o:p></p><p class=3DMsoNormal =
style=3D'mso-margin-top-alt:auto;mso-margin-bottom-alt:auto'><span =
style=3D'font-size:11.0pt'>-Y-&nbsp; ---&nbsp; F23/011&nbsp; NULL and =
procedure pointers</span><o:p></o:p></p><p class=3DMsoNormal =
style=3D'mso-margin-top-alt:auto;mso-margin-bottom-alt:auto'><span =
style=3D'font-size:11.0pt'>-Y-&nbsp; ---&nbsp; F23/012&nbsp; Coarray =
correspondence in DEALLOCATE</span><o:p></o:p></p><p class=3DMsoNormal =
style=3D'mso-margin-top-alt:auto;mso-margin-bottom-alt:auto'><span =
style=3D'font-size:11.0pt'>-Y-&nbsp; ---&nbsp; F23/013&nbsp; BOZ =
literals in interoperable enumerators</span><o:p></o:p></p><p =
class=3DMsoNormal =
style=3D'mso-margin-top-alt:auto;mso-margin-bottom-alt:auto'><span =
style=3D'font-size:11.0pt'>-Y-&nbsp; ---&nbsp; F23/015&nbsp; Coindexed =
objects in structure constructors</span><o:p></o:p></p><p =
class=3DMsoNormal =
style=3D'mso-margin-top-alt:auto;mso-margin-bottom-alt:auto'><span =
style=3D'font-size:11.0pt'>-Y-&nbsp; ---&nbsp; F23/016&nbsp; Segments =
associated with allocation</span><o:p></o:p></p><p class=3DMsoNormal =
style=3D'mso-margin-top-alt:auto;mso-margin-bottom-alt:auto'><span =
style=3D'font-size:11.0pt'>-Y-&nbsp; ---&nbsp; F23/017&nbsp; =
CFI_establish nonalloc nonpointer null base =
address</span><o:p></o:p></p><p class=3DMsoNormal =
style=3D'mso-margin-top-alt:auto;mso-margin-bottom-alt:auto'><span =
style=3D'font-size:11.0pt'>-Y-&nbsp; ---&nbsp; F23/018&nbsp; =
Correspondence of unallocated =
coarrays</span><o:p></o:p></p></blockquote><div><p =
class=3DMsoNormal><o:p>&nbsp;</o:p></p></div></div></body></html>
------=_NextPart_000_0079_01DBC715.D1648CB0--

