WPC  $msqh ^V'].W83CSGShbKs3Pza(gIPhGP0΁*pjn\f =]S/}?A} Ya])w|\" 5rTaqWpգ׫f";SIԮ Y9)+A^R4Y:yWoI?Q¾Č}CM cUcgTLDm6Fv!㺷oNtm}t$սzac@طC~$Ç_^_}j7aY'rDZ+J2j.O}*èTXiz=X&|-g9nd 7-DGs(# J3/03103r2  X INCITS/J3ANSIFortranStandardsCommittee>(#CraigT.Dedo , Replace_IOSTAT_END_Ԁand_IOSTAT_EOR_ԀwithFunctions<<>(#April1,2003 L @(#Page  1  ڀof  1  (3$ F!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+. Z{.WS\Applicati3|xU )USUS.,$X,X$   _.J:C:\ANSI_J3\2003\03-103r2b.wpdJC:\ANSI_J3\2003\03-103r2b.wpd/  (3$ F!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/ Z<Century Schoolbook Regular F!XXUSUS.,$X,X$      =&dd=  _@ Replace_IOSTAT_END_Ԁand_IOSTAT_EOR_ԀwithFunctions   To:0  0(#(#04(#(#J34(#4(# From:0  04(#(#CraigDedo` 4(#4(# Subject:0 4 Replace_IOSTAT_END_Ԁand_IOSTAT_EOR_ԀwithFunctions( 4(#4(# Date:0  04(#(#April1,2003 L4(#4(#   ThispaperaddressesUScomment2.9.   Editsreferto02-007r3. l  [216:14]0 4 Change aprocessordependentto theprocessordependent. 4(#4(# [294:7+]0 4 Addthefollowingentriestothetableinsection13.5.17:0 4(#4(# 0  _IS_IOSTAT_END_Ԁ(I)0 (#(#TestforendoffileconditionT  (# (# 0  _IS_IOSTAT_EOR_Ԁ(I)0 (#(#Testforendofrecordcondition  (# (# [319:27+]0 4 Addthefollowing:P 4(#4(#  13.7.54a0 4 _IS_IOSTAT_END_Ԁ(I) t4(#4(#  Description. Determinewhethertheargumentvalueindicatesanendoffilecondition. <  Class. Elementalfunction p  Argument. Ishallbeoftypeinteger. \  ResultCharacteristics. Defaultlogical.   ResultValue. TheresulthasthevaluetrueifandonlyifIisavaluethatcouldbeassignedtothe  | scalarintvariableinan_IOSTAT_=specifiertoindicateanendoffilecondition(9.10.2). D  13.7.54b0 4 _IS_IOSTAT_EOR_Ԁ(I) x4(#4(#  Description. Determinewhethertheargumentvalueindicatesanendofrecordcondition. @  Class. Elementalfunction  ,!  Argument. Ishallbeoftypeinteger. `"#  ResultCharacteristics. Defaultlogical. #L%  ResultValue. TheresulthasthevaluetrueifandonlyifIisavaluethatcouldbeassignedtothe %' scalarintvariableinan_IOSTAT_=specifiertoindicateanendofrecordcondition(9.10.3). H&( [451:32]0 4 Change thevalue...moduleto avaluethatwouldcausetheresultvalueofthe '4!* _IS_IOSTAT_EOR_Ԁintrinsicfunction(13.7.54b)tobetrue.](!+4(#4(#  References  0*#- 02-007r3,Fortran2000Draft *T$. [EndofJ3/03-103r2]