From owner-sc22wg5+sc22wg5-dom9=www.open-std.org@open-std.org Thu Sep 19 05:07:15 2024 Return-Path: X-Original-To: sc22wg5-dom9 Delivered-To: sc22wg5-dom9@www.open-std.org Received: by www.open-std.org (Postfix, from userid 521) id 61817357045; Thu, 19 Sep 2024 05:07:15 +0200 (CEST) Delivered-To: sc22wg5@open-std.org Received: from NAM12-DM6-obe.outbound.protection.outlook.com (mail-dm6nam12on2044.outbound.protection.outlook.com [40.107.243.44]) by www.open-std.org (Postfix) with ESMTP id A2450356FFE for ; Thu, 19 Sep 2024 05:07:13 +0200 (CEST) ARC-Seal: i=1; a=rsa-sha256; s=arcselector10001; d=microsoft.com; cv=none; b=JW+6HQQrK5BNSOI9DtHTJNeUyWJ3uOcuvr4MzAayDavCbfkGakyKBwQ73icui8rheXDye9wulVN5bTQfJBBuO9l0RIVkG1cHA9cCxZQUPb5HvaFgQFy/p+B/6KMgtwWrQFcj5R89KPP0DSOO6l2uvkmxmm9ziXSbPGScosWKs55xqxPLEjzSX7RVaaf5p+YTXrcW4gpYosJYz5ju9AzYMpRX88oyymYbuqq/EnY56sKa8Z8rDTaqpjbuGMf9zhTm7x5wbNu35HrAuyKpKd3zZLfq8t55uSMz17dtcAWIX0k5NqTBIzhpsp87n/D0cDdGKwGQaUiBnSb4LDpIvS/DTw== ARC-Message-Signature: i=1; a=rsa-sha256; c=relaxed/relaxed; d=microsoft.com; s=arcselector10001; h=From:Date:Subject:Message-ID:Content-Type:MIME-Version:X-MS-Exchange-AntiSpam-MessageData-ChunkCount:X-MS-Exchange-AntiSpam-MessageData-0:X-MS-Exchange-AntiSpam-MessageData-1; bh=bmDoD+IlKPeBK+yLK3NzW7AhJAJ3nLFHx6PhfeRRwRs=; b=kdA5hkkkffcdyU4yt8GZ17PdNQ3BR3WkMRsiUyhftJOhEgpOe3NG5JCgrBV2hp6MASTbQLqTQp2/HJmFuR56X4UR29bber/GNW8ZNArR2ggAJH/MQmzVE9oUkYhWfCXtiF3gV1lblsWpoy8IU1Gcm+azDCToTlcCX2x7dPs5Mc3/pfjR581XhCXkol5YlDo4tETNl58P1Z4SJ4yXAGc5Speeramw9mpza9Hq0M6HSevyFRs6md3N06XeMAFd20gSRSXhnGMJhJDrhw+Mq06BksPhrrnFDYF9/1hhiG6kIvZ96NHoFy+marNPseaybQSMYFkVyASim3x3NxHGC3Qmsg== ARC-Authentication-Results: i=1; mx.microsoft.com 1; spf=pass smtp.mailfrom=amd.com; dmarc=pass action=none header.from=amd.com; dkim=pass header.d=amd.com; arc=none DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=amd.com; s=selector1; h=From:Date:Subject:Message-ID:Content-Type:MIME-Version:X-MS-Exchange-SenderADCheck; bh=bmDoD+IlKPeBK+yLK3NzW7AhJAJ3nLFHx6PhfeRRwRs=; b=e94VqAwumeod3/8PmuOGz34BhtPfrS1o+tK+3uTLdsVhOWR/1CNP++cHi1TKwGf5wKpPLH6jjQw1ejfZqG6J2Qsbie8FYxZnb04LK4HkNW24r7Ix79sI6kgkz44Htzg5Af1TTqOrCPvPB4AyhTbJ0WthALfOhHqz2Yf2Q1IDYL8= Received: from SA3PR12MB7998.namprd12.prod.outlook.com (2603:10b6:806:320::13) by SJ0PR12MB6831.namprd12.prod.outlook.com (2603:10b6:a03:47d::9) with Microsoft SMTP Server (version=TLS1_2, cipher=TLS_ECDHE_RSA_WITH_AES_256_GCM_SHA384) id 15.20.7962.24; Thu, 19 Sep 2024 03:07:09 +0000 Received: from SA3PR12MB7998.namprd12.prod.outlook.com ([fe80::5339:edd4:3555:7e20]) by SA3PR12MB7998.namprd12.prod.outlook.com ([fe80::5339:edd4:3555:7e20%5]) with mapi id 15.20.7962.022; Thu, 19 Sep 2024 03:07:08 +0000 From: "Klemm, Michael" To: General J3 interest list , 'WG5' CC: Malcolm Cohen Subject: RE: [J3] [SC22WG5.6609] RE: RE: RE: [ukfortran] intent(in) and value Thread-Topic: [J3] [SC22WG5.6609] RE: RE: RE: [ukfortran] intent(in) and value Thread-Index: AQHbCjhNDZGCa+A0BEyI8Fh0iDcQJLJebYPg Date: Thu, 19 Sep 2024 03:07:08 +0000 Message-ID: References: <20240918092035.40F30357023@www.open-std.org> <20240919020437.94096357015@www.open-std.org> In-Reply-To: <20240919020437.94096357015@www.open-std.org> Accept-Language: en-US Content-Language: en-US X-MS-Has-Attach: X-MS-TNEF-Correlator: msip_labels: MSIP_Label_dce362fe-1558-4fb5-9f64-8a6240d76441_ActionId=64010509-eae5-47a8-b41d-0f67a1282e36;MSIP_Label_dce362fe-1558-4fb5-9f64-8a6240d76441_ContentBits=0;MSIP_Label_dce362fe-1558-4fb5-9f64-8a6240d76441_Enabled=true;MSIP_Label_dce362fe-1558-4fb5-9f64-8a6240d76441_Method=Standard;MSIP_Label_dce362fe-1558-4fb5-9f64-8a6240d76441_Name=AMD Internal Distribution Only;MSIP_Label_dce362fe-1558-4fb5-9f64-8a6240d76441_SetDate=2024-09-19T03:06:52Z;MSIP_Label_dce362fe-1558-4fb5-9f64-8a6240d76441_SiteId=3dd8961f-e488-4e60-8e11-a82d994e183d; authentication-results: dkim=none (message not signed) header.d=none;dmarc=none action=none header.from=amd.com; x-ms-publictraffictype: Email x-ms-traffictypediagnostic: SA3PR12MB7998:EE_|SJ0PR12MB6831:EE_ x-ms-office365-filtering-correlation-id: 22aa65ed-68ba-447e-4faf-08dcd8582618 x-ms-exchange-senderadcheck: 1 x-ms-exchange-antispam-relay: 0 x-microsoft-antispam: BCL:0;ARA:13230040|1800799024|366016|376014|38070700018; x-microsoft-antispam-message-info: =?us-ascii?Q?nHiHEEd70LdsRsYEAvk2czvNQ3haUUrLt9A9fFiCc6eF8GkGlN+uSsRb1tEW?= =?us-ascii?Q?HQiTwlT9PvSWqSCcCRkdVbbB00cIDwbqgDP32lqbiB+oIr5qTIqz81ZBdnOv?= =?us-ascii?Q?5Km5x6RWxC3dh6F1WOL507S31NkvqvZbpU1liJwNfvwR3O/7KmPC/Cbwwp7B?= =?us-ascii?Q?V93VY91/02t03+kNFQU9IfkpClvKm6FawQsgCrUijfz3BwFg2GaTgWOG1DK7?= =?us-ascii?Q?cm5ymiDHM1q/fnjoszYp9nxdXlEt4VhDIOm3XkB+4wSeL48uPNgk53egI8HQ?= =?us-ascii?Q?pMd2OpNYX0NaW/vp1itG+mGxQsQpwxyxKEp9OaW+2mNn9x9A2cA/95xSfkMD?= =?us-ascii?Q?Kyt100MYDMcbZ3r+n+ffhtombwMcDvjv28WSH6UjhxK21kh9QZXjY18UxEnF?= =?us-ascii?Q?LP7khLoUFpMe2u7TCs5geCfL4mhOAoHUkVtiZewDxJyWCBXiPpshJrRE4ZQV?= =?us-ascii?Q?/DofAS2gwZdzDa1tZorO2zBjDBG6q709hH7Ohk+23swKSYZ5SpLTHKYx/P1a?= =?us-ascii?Q?P/BdKi2OnAblS9JGjnyTjk4PHPnq70V/+8Nixb6KvxKFrLdhE28fAVOy/4AG?= =?us-ascii?Q?O81qGgMrwzVLdeiK3gBt+NfMBIF/lzz2SU3jyv0lDktOOzCK7EgNvcv6l6x8?= =?us-ascii?Q?kLUdpsAOAS5edmrsxVDl5opV7L2ULF02QggKTD+NOrYbDXGGIGDED1laGDfc?= =?us-ascii?Q?7V8Q0rldHU8Lcylow0pN3bgSBaW5HMWAwEsIcB+Rw6O6U4wu/eGDFV68jmhd?= =?us-ascii?Q?4twkRQ+QPZrPuorThhK+lVee4IyXmLCQxlja1dou6zpU2tmVqAtKRLEPyi3k?= =?us-ascii?Q?gNDBUn5QGavbCndI2kzsYC8DCZylGoBbN/FM8537WUYy7UNZC9N7RzZgu8VQ?= =?us-ascii?Q?s+iRkchW5N8BqZ+pqCEaBahuTK8B2SQG55edsrMPuqDM/8h3sq9Ifc5OczJs?= =?us-ascii?Q?xgStTYuSNg1UmUZDMVC1xS2F1XVD2V31mFVBrFogGlSmFIt6AGwSTdW+63Ai?= =?us-ascii?Q?1/0Mieq0ekJ84+cv82M7t0r39iPXC1iYXIVBlF7MhVMAC+fJY1oLZBhSd/lJ?= =?us-ascii?Q?twzErgfHORoTdsDVzcey9XOPp/9XAFexI4SrgjIp903eU8olweU3KW8jLMRJ?= =?us-ascii?Q?KM8zZTDU+jfifOamiYbR63n5EBHEgyvRMm+30plHSJVTz5w8bv3+kmw1LFAk?= =?us-ascii?Q?+kp6nqCTVE/3skX4BECV6f0s3RjGmlOQ4deUT9/sHgfTLJI2Uaq10atiqHJ2?= =?us-ascii?Q?GJDtrHwN3dMLB0cpIuML65Jx2CV3JhR5o/bXS607aAN7GMqaCttUBk/jXmTb?= =?us-ascii?Q?clF5c2H5SBaKxL81fr12jF3xud4pu0jnwv66nIGM/QQUQL+IYm2EEk5ACVmc?= =?us-ascii?Q?PrBB+Ldu/vJcjPjN2gO4vfWUeg7W9eWi4y1YKS8+toNUsn4TFw=3D=3D?= x-forefront-antispam-report: CIP:255.255.255.255;CTRY:;LANG:en;SCL:1;SRV:;IPV:NLI;SFV:NSPM;H:SA3PR12MB7998.namprd12.prod.outlook.com;PTR:;CAT:NONE;SFS:(13230040)(1800799024)(366016)(376014)(38070700018);DIR:OUT;SFP:1101; x-ms-exchange-antispam-messagedata-chunkcount: 1 x-ms-exchange-antispam-messagedata-0: =?us-ascii?Q?6SVvhdjiGhwep4/sUka0sLlmLB42rkLDFPo6r45ys3BfkTtbkMJiVt02wGvT?= =?us-ascii?Q?6IPLewVl1TluGYQ4HsW72OEtMXhJkW8VmGpxuxlyhQEr9cKzs07swy6k+qxC?= =?us-ascii?Q?VWuAsjTUliVX45UdAPoEKLjoIzlNNjQnSWo58rLc2BQCHKOLmRaXv4mKnzcW?= =?us-ascii?Q?RRoYN8iQe46yyAArD3u2cJ3e5vhSqdrE2Wk3Yp6zeN6jAcLvvBXNlM7lSKJT?= =?us-ascii?Q?E8LWyINm1wzCIYfvDdCToTpFwCi1DjRqW+HU3Bp5KBje7uGA61bJcxG9+C7+?= =?us-ascii?Q?shutWmkUpinWSXIJS5rRz+ohWhIuA0GOtD9KCvW4dy6kWzVwIh0bg7DBDMNE?= =?us-ascii?Q?2gVT61Kqh1Urdptlfwhk+23RvD1+0Kf9zguKLxXlTmugpbGq/zsW9nOpMWl/?= =?us-ascii?Q?zTA8FC99FtO+zNBdI9UiSPpcV58XtkB+5L6v4m5gsiRW5RjSX6gM1UnYQcGR?= =?us-ascii?Q?9S4k3p979iUC9Iyp3xFnOexzoHsBlMuJ8L1ZY71We604JWnL0Mpsy+iCRgi8?= =?us-ascii?Q?Hq7zWgcMESr4C3V6q6CRWJm/VKdaNCMR+l6OyrTU/3s+FjkFPSpiM2wLmddE?= =?us-ascii?Q?rrkFnwHYGnsWKGW5THUpE7ZhTtGIJ/gOybxYImb2M17+uffV1uPFT317oH9N?= =?us-ascii?Q?JhMeyLiVhat1LD/KDm/5EessQsD/uJUAEg017PiIR0VyME5JVjuu1MksnFla?= =?us-ascii?Q?5ay4Dh37qx10Tls5mfXh8nIkcirdGuCSg+XvQYeiSomb6dndG1YWdf2BhMtD?= =?us-ascii?Q?zraxkmPeWOb9iEjD+j/eZeoLT5x8zyRZVVlo7g/js4ipy11a8TOydajO6qgx?= =?us-ascii?Q?TfxVvd2vds8HRQu6Fk5dtb+eNVdGMvAcyFsV+/TIRnAjcDOzcJfE1kwB6Huv?= =?us-ascii?Q?STmDCRfrULgqV+cO/oXK4e01ak2KZNq5xefpEGDcolfCOc/yvaHePwS4MEWZ?= =?us-ascii?Q?Vm/T8ZbOLZbn9L6x5qh8a3fPKlQlSSd6vSQDtxaxMerVPN1P7uJux3Szk7B8?= =?us-ascii?Q?iAI+dveWhq9WpoEb/xfvYD5BDMhNpwCOm4FSUouTxDbejitvwzdcMtw2qaJM?= =?us-ascii?Q?qY6MBnVQ/i+GULlxreO1O07uKpFay6tBOv4mpEFyzptP75kBqzxu7t2ATUr/?= =?us-ascii?Q?L0o40lW2Jm/DnHcPtJrFTPGotc2JLYnanJYVMS1mRYA4GczVL8OdeQqOWPTw?= =?us-ascii?Q?1H8aVqxfFlPlLIjmE10d/tvobSyELTcs4qc89bktM9oTTPv4BAK37ErKI+h6?= =?us-ascii?Q?VXmGvGsvMr4J1LtGDCmseencEB7Lpldhn6wFl0PLy0FQ8jSdLkdItLzI0vHB?= =?us-ascii?Q?shFbJZEgMFqIcRGXMDOzd7KZHvuE8HkK7s7g486K4XjmKozC+Xhgr5i53NfS?= =?us-ascii?Q?mC5n4e5e0wok3M2jKWrv+0Ybm+t9aIOhbV6dxE4zfYAINRv0AziA6Xc/U2oy?= =?us-ascii?Q?ivf53j8i/3Nr1tAFMSsC/t9EDyBoAwEOHFC3djaPuk89P6jNWdLIMqmnm7Fx?= =?us-ascii?Q?69GksY0xUVbr5gtUG2IATX6Vj0QnL45azH03BXn1km4fhHuk+agaxUoh7M9s?= =?us-ascii?Q?TOPyq4ZcJ6jlg+ybmI8=3D?= Content-Type: multipart/alternative; boundary="_000_SA3PR12MB79986573D23A95E167FD6ECFF6632SA3PR12MB7998namp_" MIME-Version: 1.0 X-OriginatorOrg: amd.com X-MS-Exchange-CrossTenant-AuthAs: Internal X-MS-Exchange-CrossTenant-AuthSource: SA3PR12MB7998.namprd12.prod.outlook.com X-MS-Exchange-CrossTenant-Network-Message-Id: 22aa65ed-68ba-447e-4faf-08dcd8582618 X-MS-Exchange-CrossTenant-originalarrivaltime: 19 Sep 2024 03:07:08.7328 (UTC) X-MS-Exchange-CrossTenant-fromentityheader: Hosted X-MS-Exchange-CrossTenant-id: 3dd8961f-e488-4e60-8e11-a82d994e183d X-MS-Exchange-CrossTenant-mailboxtype: HOSTED X-MS-Exchange-CrossTenant-userprincipalname: 0wwsDlcXoH2sO9PksyU+E7UVewdsqF2RwpglZNpw9M6iQ0r9BYN32ZgJhuaqV5VOInajgA5cYqLrMJpvGSPb3Q== X-MS-Exchange-Transport-CrossTenantHeadersStamped: SJ0PR12MB6831 Sender: owner-sc22wg5@open-std.org Precedence: bulk --_000_SA3PR12MB79986573D23A95E167FD6ECFF6632SA3PR12MB7998namp_ Content-Type: text/plain; charset="us-ascii" Content-Transfer-Encoding: quoted-printable [AMD Official Use Only - AMD Internal Distribution Only] Hi Malcom, OK, thanks! That makes sense. Kind regards, -michael From: J3 On Behalf Of Malcolm Cohen via= J3 Sent: Thursday, September 19, 2024 10:05 AM To: 'WG5' Cc: Malcolm Cohen Subject: [J3] [SC22WG5.6609] RE: RE: RE: [ukfortran] intent(in) and value Caution: This message originated from an External Source. Use proper cautio= n when opening attachments, clicking links, or responding. Yes. INTENT(IN) makes the dummy argument non-definable. This may be useful e.g. = so that later on, in program maintenance, someone doesn't try to change the= dummy argument in the expectation that it would change the actual argument= . Cheers, -- ..............Malcolm Cohen, NAG Oxford/Tokyo. From: J3 > On Behalf Of Klemm, Michael via J3 Sent: Thursday, September 19, 2024 10:34 AM To: Jeff Hammond >; Gener= al J3 interest list >; 'WG5' > Cc: Klemm, Michael >; M= alcolm Cohen > Subject: [J3] [SC22WG5.6608] RE: RE: [ukfortran] intent(in) and value Hi folks, Thanks for the clarification! One more thing: Is it then sensible to have a variable have the attributes = VALUE and INTENT(IN) at the same time? From: Jeff Hammond > Sent: Wednesday, September 18, 2024 7:29 PM To: General J3 interest list >; 'WG5' > Cc: Malcolm Cohen > Subject: Re: [J3] [SC22WG5.6606] RE: [ukfortran] intent(in) and value Caution: This message originated from an External Source. Use proper cautio= n when opening attachments, clicking links, or responding. Thanks. This is useful context and a helpful explanation. Jeff From: J3 > on behalf of Malcolm Cohen via J3 > Date: Wednesday, 18. September 2024 at 12.20 To: 'WG5' > Cc: Malcolm Cohen > Subject: [J3] [SC22WG5.6606] RE: [ukfortran] intent(in) and value External email: Use caution opening links or attachments Hi Jeff, It is called "unspecified INTENT" not "default INTENT". That is because it = is not a default, it is that it is not specified. (ASIDE: I don't think we = use the phrase in the standard itself, but we do when talking about it.) R828 by itself does not define the INTENT attribute, it defines some syntax= - and that is the syntax for specified intent (it's even called "intent-sp= ec". The whole of 8.5.10 defines the INTENT attribute, and indeed, there is= a paragraph about unspecified intent. INTENT(INOUT) is very different indeed from unspecified intent. In particul= ar, INOUT requires that the actual argument be a definable variable. There = is no such requirement for unspecified intent. With unspecified intent you = simply have to get it right, viz not reference the dummy argument unless it= is defined, and not define the dummy argument unless it is definable. This= is the world before the invention of INTENT. To summarise: with no intent-spec, the intent is not "INOUT", or "INOUT exc= ept stuff", it is "unspecified", and has the same capabilities and limitati= ons that it had before Fortran 90. Cheers, -- ..............Malcolm Cohen, NAG Oxford/Tokyo. From: owner-sc22wg5@open-std.org > On Behalf Of Jeff = Hammond Sent: Wednesday, September 18, 2024 4:12 PM To: WG5 > Subject: [ukfortran] [SC22WG5.6604] intent(in) and value 8.5.10 R828 says that INTENT is IN, OUT or INOUT. 8.5.19 C868 says that VALUE cannot be INTENT(OUT) or INTENT(INOUT) Should I understand that dummy arguments without an INTENT do not have an i= mplicit intent corresponding to any of the explicit INTENT types? I have a= lways assumed that the default INTENT was INOUT, but that cannot be true si= nce that would conflict with VALUE in the example below. It seems the defa= ult INTENT is "INOUT, unless VALUE, in which case it's IN-but-also-assignab= le". subroutine foo(a,b) implicit none integer, value, intent(in) :: a integer, value :: b ! integer, value, intent(inout) :: c ! not allowed ! integer, value, intent(out) :: d ! not allowed ! a =3D 21 ! can't assign because intent(in) b =3D 23 ! can assign end subroutine foo Thanks Jeff --_000_SA3PR12MB79986573D23A95E167FD6ECFF6632SA3PR12MB7998namp_ Content-Type: text/html; charset="us-ascii" Content-Transfer-Encoding: quoted-printable

[AMD Official Use Only - AMD Internal Distribution Only]


Hi Malcom,

 

OK, thanks!  That makes sense.=

 

Kind regards,

        -michael

 

 

From: J3 <j3-bounces@mailman.j3-f= ortran.org> On Behalf Of Malcolm Cohen via J3
Sent: Thursday, September 19, 2024 10:05 AM
To: 'WG5' <sc22wg5@open-std.org>
Cc: Malcolm Cohen <malcolm@nag-j.co.jp>
Subject: [J3] [SC22WG5.6609] RE: RE: RE: [ukfortran] intent(in) and = value

 

Caution: This message originated from an E= xternal Source. Use proper caution when opening attachments, clicking links= , or responding.

 

Yes.

 

INTENT(IN) makes the dummy argument = non-definable. This may be useful e.g. so that later on, in program mainten= ance, someone doesn’t try to change the dummy argument in the expectation that it would change the actual argument.

 

Cheers,

--

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

 

From: = J3 <j3-bounces@mail= man.j3-fortran.org> On Behalf Of Klemm, Michael via J3
Sent: Thursday, September 19, 2024 10:34 AM
To: Jeff Hammond <jehammo= nd@nvidia.com>; General J3 interest list <j3@mailman.j3-fortran.org>; 'WG5' <sc22wg5@open-std.org>
Cc: Klemm, Michael <Mich= ael.Klemm@amd.com>; Malcolm Cohen <malcolm@nag-j.co.jp>
Subject: [J3] [SC22WG5.6608] RE: RE: [ukfortran] intent(in) and valu= e

 

Hi folks,

 

Thanks for the clarification!

 

One more thing: Is it then sensible to have a variabl= e have the attributes VALUE and INTENT(IN) at the same time?

 

From: Jeff Hammond <jehammond@nvidia.com>
Sent: Wednesday, September 18, 2024 7:29 PM
To: General J3 interest list <j3@mailman.j3-fortran.org>; 'WG5' <sc22wg5@open-std.org>
Cc: Malcolm Cohen <malcolm= @nag-j.co.jp>
Subject: Re: [J3] [SC22WG5.6606] RE: [ukfortran] intent(in) and valu= e

 

Caution: This message originated from an E= xternal Source. Use proper caution when opening attachments, clicking links= , or responding.

 

Thanks.  This = is useful context and a helpful explanation.

 

Jeff

 

From: J3 &= lt;j3-bounces@mailman.= j3-fortran.org> on behalf of Malcolm Cohen via J3 <j3@mailman.j3-fortran.org>
Date: Wednesday, 18. September 2024 at 12.20
To: 'WG5' <sc22wg5@open-s= td.org>
Cc: Malcolm Cohen <malcolm= @nag-j.co.jp>
Subject: [J3] [SC22WG5.6606] RE: [ukfortran] intent(in) and value

External email: Use caution opening l= inks or attachments

 

Hi Jeff,

 

It is called “unspecified INTE= NT” not “default INTENT”. That is because it is not a def= ault, it is that it is not specified. (ASIDE: I don’t think we use th= e phrase in the standard itself, but we do when talking about it.)

 

R828 by itself does not define the I= NTENT attribute, it defines some syntax – and that is the syntax for = specified intent (it’s even called “intent-spec”. The whole of 8.5.10 defines the INTENT attribute, and indeed, there is a parag= raph about unspecified intent.

 

INTENT(INOUT) is very different inde= ed from unspecified intent. In particular, INOUT requires that the actual a= rgument be a definable variable. There is no such requirement for unspecified intent. With unspecified intent you simply hav= e to get it right, viz not reference the dummy argument unless it is define= d, and not define the dummy argument unless it is definable. This is the wo= rld before the invention of INTENT.

 

To summarise: with no intent-spec, t= he intent is not “INOUT”, or “INOUT except stuff”, = it is “unspecified”, and has the same capabilities and limitati= ons that it had before Fortran 90.

 

Cheers,

--

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

 

From: owner-sc22wg5@open-std.org <owner-sc22wg5@open-std.= org> On Behalf Of Jeff Hammond
Sent: Wednesday, September 18, 2024 4:12 PM
To: WG5 <sc22wg5@open-std= .org>
Subject: [ukfortran] [SC22WG5.6604] intent(in) and value

&nbs= p;

8.5.10 R828 says th= at INTENT is IN, OUT or INOUT.

 

8.5.19 C868 says th= at VALUE cannot be INTENT(OUT) or INTENT(INOUT)

 

Should I understand= that dummy arguments without an INTENT do not have an implicit intent corr= esponding to any of the explicit INTENT types?  I have always assumed = that the default INTENT was INOUT, but that cannot be true since that would conflict with VALUE in the example below.&= nbsp; It seems the default INTENT is “INOUT, unless VALUE, in which c= ase it’s IN-but-also-assignable”.

 

subroutine foo(a,b)=

    = implicit none

    = integer, value, intent(in) :: a

    = integer, value :: b<= o:p>

    = ! integer, value, intent(inout) :: c ! not allowed

    = ! integer, value, intent(out) :: d ! not allowed

    = ! a =3D 21 ! can't assign because intent(in)

    = b =3D 23 ! can assign

end subroutine foo<= /span>

 

Thanks

 

Jeff

--_000_SA3PR12MB79986573D23A95E167FD6ECFF6632SA3PR12MB7998namp_--