[J3] (SC22WG5.6291) RE: [ukfortran] WG5 letter ballot 1 on Fortran 2018 interpretations

[Reid, John (-,RAL,SC)]

Malcolm,

I have been working on C.6.8 in response from comments by Nathan Weeks. I was planning to submit a paper to J3 in the hope that it would work on it during the J3 meeting. The latest draft is attached. I will now rewrite this as a WG5 interp. vote. Comments from you or anyone else will be most welcome.

I will comment on your suggestions later today.

Cheers

John.

________________________________
From: J3 <j3-bounces at mailman.j3-fortran.org> on behalf of Malcolm Cohen via J3 <j3 at mailman.j3-fortran.org>
Sent: 05 October 2020 06:13
To: 'WG5 List' <sc22wg5 at open-std.org>
Cc: Malcolm Cohen <malcolm at nag-j.co.jp>
Subject: [J3] (SC22WG5.6291) RE: [ukfortran] WG5 letter ballot 1 on Fortran 2018 interpretations

This is not my vote... I am considering:

-N- --- F18/015  Example in C.6.8 is wrong

I have three problems with this interp; the first two are the same issues Anton raised. Before I commit my suggestions to a vote, I am floating this in hope of receiving some enlightening comments...

(1)
I don't see a strong reason to follow the existing formula precisely - 0.5% is not terribly close to 1% so the 1% comment is a bit misleading anyway. So how about:

! With 10+ images, keep at least 1% spare.
images_spare = MERGE(0,CEILING(NUM_IMAGES()/100.0),NUM_IMAGES()<10)

Obviously this keeps more spare images than the original (the same number up to 100, +1 when >100).

(2)
I agree that a variable with the same name as an intrinsic is not good style.
"team_num" would be okay.
But I do not agree that the intrinsic should be used at line 88 - that should be the variable.

(3)
I find the use of STAT= followed by ignoring the result to be very poor style indeed - unacceptably poor. I note that other places have e.g.
    IF (STATUS/=0 .AND. STATUS/=STAT_FAILED_IMAGE) EXIT outer
I think this should be the case for the END TEAM and its following SYNC ALL statement.
Or, if there is some good reason why not, that needs to be at least briefly explained in a comment after each of those statements.

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



This email and any attachments are intended solely for the use of the named recipients. If you are not the intended recipient you must not use, disclose, copy or distribute this email or any of its attachments and should notify the sender immediately and delete this email from your system. UK Research and Innovation (UKRI) has taken every reasonable precaution to minimise risk of this email or any attachments containing viruses or malware but the recipient should carry out its own virus and malware checks before opening the attachments. UKRI does not accept any liability for any losses or damages which the recipient may sustain due to presence of any viruses. Opinions, conclusions or other information in this message and attachments that are not related directly to UKRI business are solely those of the author and do not represent the views of UKRI.

-------------- next part --------------
An HTML attachment was scrubbed...
URL: <https://mailman.j3-fortran.org/pipermail/j3/attachments/20201006/2b54c7df/attachment-0001.htm>
-------------- next part --------------
An embedded and charset-unspecified text was scrubbed...
Name: 20-c68.txt
URL: <https://mailman.j3-fortran.org/pipermail/j3/attachments/20201006/2b54c7df/attachment-0001.txt>