----------------------------------------------------------------------------------
@MSGID: 5@dont-email.me> 986f8b2c
@REPLY:
<9b39c5f8-bcb9-4ef2-8b1b-cc0a6ec4e5een@googlegroups.com> 2532f22b
@REPLYADDR Lynn McGuire <lynnmcguire5@gmail.com>
@REPLYTO 2:5075/128 Lynn McGuire
@CHRS: CP866 2
@RFC: 1 0
@RFC-Message-ID: 5@dont-email.me>
@RFC-References: 1@dont-email.me>
<5fbb8dcc-d5b9-45a4-9d4f-23caeebc0778n@googlegroups.com> 1@dont-email.me>
<9b605c0b-c8a1-40eb-a73f-428377f906a5n@googlegroups.com> <ee5025c7-3121-4e6d-87a9-f54452f1c145n@googlegroups.com>
<258c15c6-7463-4d80-8326-0016c5a4ff1an@googlegroups.com> 1@dont-email.me>
<401e5a1f-91f2-4075-a910-ee8455b0fd93n@googlegroups.com> <1d7b21e4-fdd6-4977-bd4e-d923977629bfn@googlegroups.com>
<9b39c5f8-bcb9-4ef2-8b1b-cc0a6ec4e5een@googlegroups.com>
@TZUTC: -0500
@PID: Mozilla/5.0 (Windows NT 10.0; Win64; x64;
rv:102.0) Gecko/20100101 Thunderbird/102.15.0
@TID: FIDOGATE-5.12-ge4e8b94
On 8/30/2023 10:29 PM, gah4 wrote:
> On Wednesday, August 30, 2023 at 7:45:01 PM UTC-7, robin vowels wrote:
>
> (snip)
>
>> Multidimensional arrays in PL/I came from FORTRAN and ALGOL,
>> but whole array operations and cross-sections of arrays were a
>> new concept that came with IBM`s first PL/I compiler in c, 1966.
>
>> The latter features were adopted 25 years later into Fortran 90.
>
> Which reminds me of one PL/I feature that Fortran still doesn`t have:
>
> Structure expressions.
>
> You can do operations on structures, either by structure shape,
> so member by member, or by member name.
>
> Neither has made it to Fortran.
I am confused, what are structure expressions ?
Just about every Fortran compiler supports the old Dec Structures from
the 1970s that never made it into the official language definition. I
am removing them from our code right now in fact as a part of my 4th
Intel Fortran port.
Lynn
--- Mozilla/5.0 (Windows NT 10.0; Win64; x64; rv:102.0) Gecko/20100101
Thunderbird/102.15.0
* Origin: A noiseless patient Spider (2:5075/128)
SEEN-BY: 5001/100 5005/49 5015/255 5019/40 5020/715
848 1042 4441 12000
SEEN-BY: 5030/49 1081 5058/104 5075/128
@PATH: 5075/128 5020/1042 4441