From owner-sc22wg5+sc22wg5-dom9=www.open-std.org@open-std.org Wed Sep 18 09:11:39 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 11901357015; Wed, 18 Sep 2024 09:11:39 +0200 (CEST) Delivered-To: sc22wg5@open-std.org Received: from NAM10-MW2-obe.outbound.protection.outlook.com (mail-mw2nam10on2067.outbound.protection.outlook.com [40.107.94.67]) by www.open-std.org (Postfix) with ESMTP id 67222356F3A for ; Wed, 18 Sep 2024 09:11:37 +0200 (CEST) ARC-Seal: i=1; a=rsa-sha256; s=arcselector10001; d=microsoft.com; cv=none; b=SFezB/qRnBjqX9IoBUFjBDuKIQYG9JQURetBBqCPUzn3I7eUWbkUV4Ha01lbbP+jRYrfn8C7DzReXMWbjNsxNMYzxdze6G7lhIGMDGZZ9fYHagulDvFz6JDa4DIpjpFjaGSJ2Kxgpw84Ger80Iol7xVbmJLfMhCzmsEcgNmerJJxb34fbmm4Ax/+lY3WoMn+C2pQXosvjxAgeZl5R5pUilrlGmtASJZlZTcz8HYaSU0R73iX4224ANtgbp3OxXWV/jRD2WYwd7pytm8T7vIWPop8FyOBaeJkbCOb/2OU4kzvIaI2ocm344cdUMIUS6YDgzKgdfcGE7VJeWhAhpvp+g== 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=yd9xpXnstsX+/7wvu/WG8RC6XQ2LUvmCa4hbx3aMxDg=; b=rm0dZqLMybNhQwRO5cXeJJgp8oD94UF3+mm3fJH25EJjXxOpm6bmN/vwYo+b0booYNDRGsqwEZUWlM9ugTui7JbCyFHT/OkPudDShZAJokvhzJd20CiuCfmln7F7C0xW3oDG7/xcqHxL5LeKqxNSHDUp8FKg2Aq5cdML2JkOPGpiiL+ZQxyLNgLAJ7eo2cp1kMiZCLNpJm+N86/Ba/cl8pnRE4Ldz+wrfg2A4TCMqbwMe6+GFNTyXI0Jg2YQ/c8HzvW19ILWJFXiMir4m8ekOel/mXsVgLTBEWkwFl9l86XOGQD+OmTCJ93iAgMiKdGbvFBRpARYlWYprrfB07owfg== ARC-Authentication-Results: i=1; mx.microsoft.com 1; spf=pass smtp.mailfrom=nvidia.com; dmarc=pass action=none header.from=nvidia.com; dkim=pass header.d=nvidia.com; arc=none DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=Nvidia.com; s=selector2; h=From:Date:Subject:Message-ID:Content-Type:MIME-Version:X-MS-Exchange-SenderADCheck; bh=yd9xpXnstsX+/7wvu/WG8RC6XQ2LUvmCa4hbx3aMxDg=; b=cz9FHI7nJFYJL6UgLpgKI87538YWBR4IrPwu6O3cyu5e4QKfWa4Ju1X3mjgBR927On8JP1FuRldR+mqlciT9md/GwhXIsLS4bm4QQv3O42vG1dGsAW4y+K7r4Hp9U0WNGa3Gv0l30IkvcIzQtagP/fCy6vKWt+pPjnzsCeaSjp9yiLawfUKvCzXAlPypBOPeQxjRpb7eXlPjB71Ms5OkzTnG0Dlfni1P2RMggAP2sH2C3XrseM1wu0Gc48Bg8C79F0tWc/FVUNwX0x/IaEFk3MWnZ6piiAewX/zhOyWk+wad8WKVOAaV5/K6Vie4QQrPLDmBem8WpI9Dcwve5kkKVg== Received: from LV3PR12MB9095.namprd12.prod.outlook.com (2603:10b6:408:1a6::22) by DM4PR12MB6424.namprd12.prod.outlook.com (2603:10b6:8:be::16) with Microsoft SMTP Server (version=TLS1_2, cipher=TLS_ECDHE_RSA_WITH_AES_256_GCM_SHA384) id 15.20.7982.16; Wed, 18 Sep 2024 07:11:32 +0000 Received: from LV3PR12MB9095.namprd12.prod.outlook.com ([fe80::e8c:f2db:ab98:4538]) by LV3PR12MB9095.namprd12.prod.outlook.com ([fe80::e8c:f2db:ab98:4538%7]) with mapi id 15.20.7962.022; Wed, 18 Sep 2024 07:11:32 +0000 From: Jeff Hammond To: WG5 Subject: intent(in) and value Thread-Topic: intent(in) and value Thread-Index: AQHbCZdfpjrnFeoniUyOOM2btOyzPg== Date: Wed, 18 Sep 2024 07:11:32 +0000 Message-ID: Accept-Language: en-FI, en-US Content-Language: en-US X-MS-Has-Attach: X-MS-TNEF-Correlator: authentication-results: dkim=none (message not signed) header.d=none;dmarc=none action=none header.from=nvidia.com; x-ms-publictraffictype: Email x-ms-traffictypediagnostic: LV3PR12MB9095:EE_|DM4PR12MB6424:EE_ x-ms-office365-filtering-correlation-id: de56dc21-dcdb-4921-925f-08dcd7b12016 x-ms-exchange-senderadcheck: 1 x-ms-exchange-antispam-relay: 0 x-microsoft-antispam: BCL:0;ARA:13230040|376014|366016|1800799024|38070700018; x-microsoft-antispam-message-info: =?Windows-1252?Q?J33boXGS7+zvdU6Iln1IF/mLmgT2yZpcy0gYXThZ/EQZtU123+Q8iEYR?= =?Windows-1252?Q?H88uOMqJgmPTdBlSlZuPikXCOFQ3rHBEDFJa2/a0GB+IPFuF3Qf5OE1D?= =?Windows-1252?Q?pz+HhLitDtYJvicirzlzsOFoE85t2QfyLNDcDYQ5+edaDnzqBThklF3R?= =?Windows-1252?Q?CNO5bDTGVpKrO12zf3rGByAf6rDQA9xcNg18lhsskIC18z3q93h5yk2+?= =?Windows-1252?Q?geA6Eogo3Bo2oGPtj6LiKW+S6L/fneGTTJ85KVmoQLTL9USaCWiUQ7IH?= =?Windows-1252?Q?2QyhIsqTGpC26AdObIoDTr2bqNDsfiWKZxni4hcFbTywUAr5XHv8rWf0?= =?Windows-1252?Q?uxON46VwgDJ5JH5iOyH5spRBAyw2r7ppJDGWk81PsS+C3ZBde9MiKl9L?= =?Windows-1252?Q?f1ANCmzo6RYv9vDisQ8ljbhQu/ZrODcxD/A5EFFAqzhvBXLEsaalEH7n?= =?Windows-1252?Q?2354k3Lu4kYebdDr4Es9xr1tjQoMnAd1MzBhsWaBKiSbaT7co2XJlqtt?= =?Windows-1252?Q?Sqf1mx5hvkUlUixJzXQ1gCdrmR8zNIzoSLbAHtCKd09DzvYZVaq6xmHh?= =?Windows-1252?Q?xtE4LgCxvbbUvM4zrtd/tt8MuMGLzVZDPpQqv8AFjQO53tGNaIZnY41/?= =?Windows-1252?Q?UHO9vRuGilMr0KejMiAgq43VdU9vaxgNfCh6QzuDKnloIVDpK98/MVl6?= =?Windows-1252?Q?4qlkvCl+p8O/ltIBbY9WHqSrGxAYF1oILplWlcHCm0OwIPicoWiB5n4O?= =?Windows-1252?Q?x8PmRUqlRMz3N3/VXFu9g46FLnVGXBaFBTRWGF5AzNMhbIFdEa4V7/yK?= =?Windows-1252?Q?Dvz25PcTcU9VTs+xGoQ2mWvMcMyA/0S9JZUZb+dZrWftkvMlweVJqeSO?= =?Windows-1252?Q?4LUxQQ+JdqK1BvIi4YGTx7m4DgS5jo4Tyve1kVdcURSfSf3yf3GNuRNj?= =?Windows-1252?Q?bJnmvpvIXCLzd07aD4zDxpHpxvaW9j+KN4x8KQTY94KKko0FfgPzI5CP?= =?Windows-1252?Q?yUp6jshXj0boEBdW4CWHxvqd1HE+h/lOSgCdlnRtBL0CN2rbHNO2XBB5?= =?Windows-1252?Q?87gEETE9ZU5+VLvLja+QuJ1IixTYk+XxgCDRkw7q4LgRR88JW92tdoNH?= =?Windows-1252?Q?P5iF6smWq/okW6AOXpEn6a3JD1kykCTB+RDtqYXJ/cBYIVFwZuM2VyQL?= =?Windows-1252?Q?i3g/h1SiV3PPwD+EKDV8rhnK9SjRgmHXy6eL6TqqSu21T/mzNgn3PMO/?= =?Windows-1252?Q?a/c+xEThr8OxSPVMEUY/VKdRr47b2wm10jUtebjZlTZ0z1QmIECzxcxA?= =?Windows-1252?Q?9k3iIf5CP+5Xl8HxKehBBTvcLAw2iRh02bi8js2rWxFF+OTJ+vYuQ1p+?= =?Windows-1252?Q?/SyhDSD8TOlVLZ6fuBBrc3uaz0IadEzhvsOF7yU65b9Xop3aV76AT1Uh?= =?Windows-1252?Q?oWSP20hlsvetxK8Euo8Pfr2uIggPMM7Cut8AkhLsEe3loslZcHsvfNOJ?= =?Windows-1252?Q?75OTrwhG71DJMQ8WxyKZuaHf8L5daA=3D=3D?= x-forefront-antispam-report: CIP:255.255.255.255;CTRY:;LANG:en;SCL:1;SRV:;IPV:NLI;SFV:NSPM;H:LV3PR12MB9095.namprd12.prod.outlook.com;PTR:;CAT:NONE;SFS:(13230040)(376014)(366016)(1800799024)(38070700018);DIR:OUT;SFP:1101; x-ms-exchange-antispam-messagedata-chunkcount: 1 x-ms-exchange-antispam-messagedata-0: =?Windows-1252?Q?p/F95h0Ta/Xrld8XsFEdwZSlq27MVTlYDei77rXOqg4jQwA9AI74oxDs?= =?Windows-1252?Q?dbm7LDzX+AKEDUWDW/yYoFnXnL1VEpTC3FITizUsw+RErBrWWK3Wnckr?= =?Windows-1252?Q?5SzGEbtrMYR/DXYk/TuhKpnSKO1/VFnZs/1i4dU8UOMu+6dyLjC95X2K?= =?Windows-1252?Q?UqFg6u/CmixqjKPYL/cZI1bautF11qIdP8SFntNK5ZJ3e7vkewZXOXZQ?= =?Windows-1252?Q?pPlx1Esoy7BrHgJOMWbgAHWcpERxsRO1f+GXgwGYkArY6kcy3kNh/RP8?= =?Windows-1252?Q?/Q71bNYi1XDC6/NBC2L5wGKJ4yyEXr9AyvLQJ9eLINS79XJeQdb8McwG?= =?Windows-1252?Q?yYPSxW7BcYY9xXLE7vPZ16cbtMecZzsDgCIomd9T3oaBqF97E3n9yMyr?= =?Windows-1252?Q?1PUsppmuthdZjcwdelrFwPRz6GY8TVP9LAxGOIqUYr2j/1o4Zyk72RgE?= =?Windows-1252?Q?peRSazpWdzOkHRaMMDYJEAbkxXmILAR7GMTKMIchb8y9lwbnLhER6JI5?= =?Windows-1252?Q?0/BMi9HtxbdHjumZD2srQe8CA0c1DMawigVlhd76IYAq9vldFb95uASv?= =?Windows-1252?Q?qbeu426XiRwLpzu+hGGl0CcFBcf2j7JXJPt+aKS58Iuvhdl8E2ce/wmn?= =?Windows-1252?Q?c4vjh+9xEK1F61UfI/pxQQIvErfIwl2hRmGJ75Mdh24faum3B7u2bK7T?= =?Windows-1252?Q?Jw3HQFWzkhwnnMdaUxcPz53ASryiI+71dLLdh/BXursFIgWBoDa4wL6p?= =?Windows-1252?Q?mME8Y5PKm8tT4qdqdkvUQRk01mAOKlUC4EDkvPsHNIRvxfP1rjlwXvvv?= =?Windows-1252?Q?ZI6jTn8SfdDAR1MS5LFNY3nJ5c5Aj1y9IDpvSpyCeXmWDuZTyJsNcG9Y?= =?Windows-1252?Q?eL/eMgs5UNpog12O8/XiMUw0GW8oqdLQoTGhT0i4Mo6+XaFYDVjJQVe0?= =?Windows-1252?Q?CsBUMUJ9ksBholBx415W7dVy0MPqfVde8aJ7YWzvLstoYM+roqe6C+Qb?= =?Windows-1252?Q?v4q0vuJ8q7zbyt9f0c3uUEtjmVEH9pAL6ghqwdmQWh4BLaSucRCSbxvv?= =?Windows-1252?Q?o0KV1+Txt21AGBgfo5mn/Xb59GXVIr3ISztoMbyHgMAt2btm3kdDG1PW?= =?Windows-1252?Q?v+WebVNbeoARZ4kx/tjn7QhxEHdAkRW0+RaxmkZ/Z8KfKvFPa2PlWU9B?= =?Windows-1252?Q?sQ+5w8/5Cm+q1D58aBd+MYvG5iD/wLO0AuZeT3Kj1DRqBGbIkpJJsi+h?= =?Windows-1252?Q?ozHTt0lvwczYbSTRh1mbKUr8kl61wyv4c/pDofv1bl4EOzTZdHkg2SXs?= =?Windows-1252?Q?V58gXPD3Gm5E8Gu88nOlJ8RklHp5R3MOqpyQs1SOWQoQxRr23WlGARzS?= =?Windows-1252?Q?nyKIEPK3c9hUKEBIpcHBvLsB6r+gkWJU38l8wSOgiNUeBjJqWRYKkVY2?= =?Windows-1252?Q?9WFjmMEyJFFnQxQvh5mSxkqe0x1EwUwaOZH4PxQqcQ85DOX37icakb4l?= =?Windows-1252?Q?e6MFD/THYHiwVs8siYCNtGkdp4bdKdR2oYtwJn7Dpz7c64hCrT/2kSlf?= =?Windows-1252?Q?5Fbr97MZcH0fNtjiI7fw4r7dqh5WmpdCnQL7i0A/739z6CXuxxIglI1R?= =?Windows-1252?Q?Up5M62wvq9xBAtyE0/PGXyxhFOanP8UQhSz0r44DM8nRuGIlRkvNz/Uj?= =?Windows-1252?Q?mxi22Kx8wN9Lcd6Gm9Gu7XDfkIwA0x0t9hVai/G27mkMf1mZgVMrmA?= =?Windows-1252?Q?=3D=3D?= Content-Type: multipart/alternative; boundary="_000_LV3PR12MB90956B210D8135B74A486302CB622LV3PR12MB9095namp_" MIME-Version: 1.0 X-OriginatorOrg: Nvidia.com X-MS-Exchange-CrossTenant-AuthAs: Internal X-MS-Exchange-CrossTenant-AuthSource: LV3PR12MB9095.namprd12.prod.outlook.com X-MS-Exchange-CrossTenant-Network-Message-Id: de56dc21-dcdb-4921-925f-08dcd7b12016 X-MS-Exchange-CrossTenant-originalarrivaltime: 18 Sep 2024 07:11:32.7000 (UTC) X-MS-Exchange-CrossTenant-fromentityheader: Hosted X-MS-Exchange-CrossTenant-id: 43083d15-7273-40c1-b7db-39efd9ccc17a X-MS-Exchange-CrossTenant-mailboxtype: HOSTED X-MS-Exchange-CrossTenant-userprincipalname: wnNCGli1O5827GpZiId0HtVD2N+I0WJKNUNqfUdppKfkGYHpEGkN5NuTup42JZ+FVszxjm0xWNii3f7NbNDtHQ== X-MS-Exchange-Transport-CrossTenantHeadersStamped: DM4PR12MB6424 Sender: owner-sc22wg5@open-std.org Precedence: bulk --_000_LV3PR12MB90956B210D8135B74A486302CB622LV3PR12MB9095namp_ Content-Type: text/plain; charset="Windows-1252" Content-Transfer-Encoding: quoted-printable 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 =93INOUT, unless VALUE, in which case it=92s IN-but-also-assi= gnable=94. 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_LV3PR12MB90956B210D8135B74A486302CB622LV3PR12MB9095namp_ Content-Type: text/html; charset="Windows-1252" Content-Transfer-Encoding: quoted-printable

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 implicit intent corresponding 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.  It seems the default INTEN= T is =93INOUT, unless VALUE, in which case it=92s IN-but-also-assignable=94= .

 

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<= /p>

end subroutine foo

 

Thanks

 

Jeff

--_000_LV3PR12MB90956B210D8135B74A486302CB622LV3PR12MB9095namp_--