WPC8 G  F6SGQۥձP@oyT) >2`'(ZbD|*UK>}V)[K2,]}yѷ?=PHշ9oR! Yl¢ Nivmfrku sIpL@k=!;5u6mo&j7gT.R W|̥P>@,,*yטQQf\V߻5}P~# %U: 0*# z? 0   _ %  N^ w4 m 0e  1 72g 1u 72 0c@ 1 72*B\UFUT""Arial Regular($XXXXUSUS.,$X,X$      =dd=HP LaserJet 5M PCL,,,,0C:\COREL\WORDPE~1\TEMPLATE\CUSTOM~1\CUSTOM~1\ANSIJ3~2.WPTC:\Corel\WordPerfect Office 2000\Template\Custom WP Templates\Custom WP Templates\ANSI J3 Unresolved Issues.wpt  'USUS.,$X,X$   _@(# J3/01243  X NCITS/J3ANSIFortranStandardsCommittee>(#CraigT.Dedo , Issue325KeywordUsedasParameterNameVV?(#June6,2001 L (#Page  1  ڀof  1  (3$ !XXUSUS.,$X,X$      = ^dd=  ݁Level 1Level 2Level 3Level 4Level 5Level 1Level 2Level 3Level 4Level 5Level 1Level 2Level 3Level 4Level 5Level 1Level 2Level 3Level 4Level 5Level 1Level 2Level 3Level 4Level 5* *a.wpd3|xU )USUS.,$X,X$   _.B2C:\ANSI_J3\157\01-243.wpdBC:\ANSI_J3\157\01-243.wpd/  (3$ !XXUSUS.,$X,X$      = ^dd=   (5hCEKQW]cioAutoList11.1.1.1.1.1.1.1.1.3#37=CIQYag1.a.i.(1)(a)(i)1)a)i)(;3$2#  0  .3  0  (EhCEKQW]cioAutoList21.1.1.1.1.1.1.1.1.ANSI J3 New Document  ( ' $Craig T. Dedo$0Craig T. Dedop17130 W. Burleigh Place Brookfield, WI 53005-2759 00-3nn .    3 2<5 9Z+.Courier New Regular/ Z<Century Schoolbook Regular !XXUSUS.,$X,X$      =dd=  _@1 1  Issue325KeywordUsedasParameterName   To:0  0(#(#04(#(#J34(#4(# From:0  04(#(#CraigDedo` 4(#4(# Date:0  04(#(#June6,2001( 4(#4(# Subject:0 4 Issue325KeywordUsedasParameterName L4(#4(#   (5h83Issue    Theeditorwrites: H  AmItheonlyonewhothinksitpoorstyleforthisexampletouseaparameternamethatisthesame l  asthenameofastandardintrinsic?Arewetryingtoencouragesuchaconfusingthing? 4   Analysis  h    Almostallauthoritiesonprogrammingstyleconsideritverypoorpracticetousethenamesof 0  languagekeywordsorintrinsicproceduresasnamesofdataobjects.Weshouldchangethisexample. T   Edits    [414:8-11]0 4 0` 4(#4(#Replacetheexistingtextwith:P ` (#` (#   1 "0  0(#(#INTEGER,PARAMETER::_LONG_FLOAT_Ԁ=8t(#(# 0  0(#(#REAL(_LONG_FLOAT_)::X,Y,(#(# 0  0(#(#COMPLEX(_LONG_FLOAT_)::Z#",  1# (#(# [414:14-15]0 ` Change FLOATto _LONG_FLOAT_intwoplaces.d` (#` (# [414:18-22]0 ` DeleteIssue325.` (#` (#  References  ( 01-007r1,Fortran2000Draft L [EndofJ3/01-243]