ࡱ>   Root Entry`DEST@PerfectOffice_MAIN& !3PerfectOffice_OBJECTS,`Ӗ`Ӗ -$Craig T. Dedo$0Craig T. Dedo$J3 / 99-192r1.Title" Fortran 2000f17130 W. Burleigh Place Brookfield, WI 53005&/(414) 783-5869   ( )0 ' L-Fortran 2000 Requirement Approved\ NCITS J3 ANSI Fortran Standards Committee*American English  /12E34H56H78:'3|x:HP LaserJet 5P/5MP PostScript0U' e37=CIQYag1.a.i.(1)(a)(i)1)a)"Arial Regular 0 ^'   -X  3  ݛ ,-TT@(# J3/99-215##  X NCITSJ3ANSIFortranStandardsCommitteebb>(#CraigT.Dedo g AsterisksasI/OUnits<(#August23,1999  0 0 0 (#Page  1  ڀof  1  # e37=CIQYag1.a.i.(1)(a)(i)1)a) D IZ<Century Schoolbook RegularD IZ<Century Schoolbook Regular B   ,X.@ 0C:\X3J3\150\99-215r1.wpd@C:\X3J3\150\99-215r1.wpd/  C B   ,X.@ 0C:\X3J3\150\99-215r1.wpd@C:\X3J3\150\99-215r1.wpd/  C(3jf$ r!   -X    3=Rdd=  ****'dxd d(3jf$ r!   -X    3=Rdd=  2+(3)UC <<CLevel 1Level 2Level 3Level 4Level 5($$   1  55' dxdP Pd1, 2, 3,Level 1Level 2Level 3Level 4Level 5B#:.21, 2, 3,NumbersF  .0 Fa, WPCa# !31IhۀQUAx+h ډyLlM:R0diVH > ۍ z,Y H7PX=>h'["yXFc 65PGl|r8,(YH5XñT"َN._2ڂYY؟&? A ]@ ' W(=tGXCOM&%=001Isn |P%CcE!`1Kf<*l75uan,f51K"~`C`4sTr3 0eqX. 0  0ebSw@4 #!9 m; 1mRRU:: 1m3UTUTP 0 D3 B 0 ASk 0D1 D/u B  0s!! 0"""""""""""" CG# c:\COREL\OFFICE7\TEMPLATE\X3J3DO~1.WPT(r$  fff -X    3=^dd=(2^$ r!   -X    3=Rdd=  d:\office\wpwin\template\x3j3-rpt.wpt<6X9`(CourierXx6X@KX@<6X9`(Courierd6X@K@+`4New Century Schoolbooke P'CPA, B,Level 1Level 2Level 3Level 4Level 5 4 ^'  wOwOwO -X  3  ݛ ,-TT>(#wO J3/99-215r1#wO#  X NCITSJ3ANSIFortranStandardsCommitteebb>(#CraigT.Dedo g AsterisksasI/OUnits<(#August23,1999  0 0 0 (#Page  1  ڀof  1  4#(2Quick A.  .0 c:\Corel\Office7\Template\X3J3 Document.wpt B   ,X.@ 0C:\X3J3\150\99-215r1.wpd@C:\X3J3\150\99-215r1.wpd/  ԎC  Ԝ(3jf$ r!   -X    3=Rdd=  H4#:.2Quick 1.F  .0 FAsterisks as I/O Unitsb, c,Level 1Level 2Level 3Level 4Level 5V#:2a, b, c,Lowercase LettersH  .0 Hd r!  wOwOwO -X    3= fdd=  C  e'#CX8: ::!:88 8/ ֣///X  r^4` <hDp Lx !(#T$%&-r  %  NUMBER:0 4 0` 4(#4(#000068=` (#` (# TITLE:0  04(#(#0` 4(#4(#AsterisksasI/Ounits` (#` (# KEYWORDS:0 ` Asterisk,I/O,unitX` (#` (# DEFECTTYPE:0 ` ErratumA` (#` (# STATUS:0 4 0` 4(#4(#Submitted` (#` (# Question:1.0  DoestheFortran95standardrequiretheexternalunitcorrespondingtotheI/Ounitidentifiedbyanasterisk  ` forinputoroutputtobethesameastheexternalunitidentifiedbysomefixednonnegativeintegervalue? (#(# 2.0  CantheI/Ounitidentifiedbyanasteriskforinputoroutputcorrespondtomorethanoneexternalunit? d (#(# 3.0  IftheexternalunitidentifiedbyanintegervaluethatcorrespondstotheI/Ounitidentifiedbyanasteriskfor   inputoroutputisclosed,doesthatcausetheI/Ounitidentifiedbyanasterisktobecomedisconnected? (#(# Answer:1.0  No.U (#(# 2.0  No.p (#(# 3.0  Yes.(#(# Discussion:  Thesubmitterstates:AtleastoneFortran95implementationuses-1asthevalueoftheI/Ounitidentifiedbyanasterisk.AcarefullyconstructedINQUIREstatementcanexposethisvaluetotheuser.ManyusersexpectI/Ototheunitsidentifiedbyasteriskstocontinuetoworkevenafterthecorrespondingunitsidentifiedbyintegervalueshavebeenclosed.1.0  Thereisnorequirementinthestandardthattheasteriskcorrespondtoanexternalfileunit.(#(# 2.0  Fortheunitsidentifiedbytheasterisk,thetextofsection9.3.2doesnotallowtwoormoreunitstobe i,! connectedsimultaneouslytothesameexternaldeviceorfile[139:8-9].Aneditissuppliedtoclarifythissituation. (#(# 3.0  Therem2ay23ight3notbeanexternalfileunitthatcorrespondstotheio-unitspecifiedbyanasterisk,asclarifiedby % theeditbelow.Ifthereis,itispermissibletoexecuteaCLOSEstatementonthemasonanyotherunit. (#(# REFERENCES:ISO/IEC1539-1:1997(E),Sections9.3and9.4.4.2EDITS:ForFortran95:  Addthefollowingtexttotheendofthelastparagraphbeforesection9.3.1[138:34+]:0  8(#(#"Anasteriskusedinaninputstatementmayidentifythesameio-unitas5a54some4particular y$<- external-file-unit.Anasteriskusedinanoutputstatementmayidentifythesameio-unitas7another %%. 76some %%. other %%. 6particularexternal-file-unit."%/!! TherearenoeditsrequiredforFortran2000.SUBMITTEDBY:RobertCorbettHISTORY:99-1920  04(#(#m1500 4(#4(#Submitted)#5 (# (# 99-2150  04(#(#m1500 4(#4(#Proposedresponse.*H$6 (# (# [EndofJ3/992151r11]Root Entry`DESTpPerfectOffice_MAIN&2PerfectOffice_OBJECTS,`Ӗ`Ӗ !"#$%&'()*+,-./012345678WPC! 2GԺ Ժ ) TeRHIfV]9Fż }.m TD0l5r6]s{"/.V>bRUX'Lz#hf\XTgLA$}`]+TǍo( ƶt+Ν ];>"fٶ#6(V- Xr*"~{9/SAn'/Ryo*KV T % 0 0L a ni l e2 K3 0e~X; 0  0e bnw@4$#!3T mV 1umU:^  1ucUTkkiN 0 D3' BZ 0wwwwww AS 0D D/ B2 0sk 01!1!1!1!1!1!1!1!1!1!1!1! C! c:\COREL\OFFICE7\TEMPLATE\X3J3DO~1.WPT(r$  fff -X    3=^dd=(2$ r!  %r%r%r -X    3=dd=  d:\office\wpwin\template\x3j3-rpt.wpt<6X9`(CourierXx6X@KX@<6X9`(Courierd6X@K@+`4New Century Schoolbooke P'CPA, B,Level 1Level 2Level 3Level 4Level 5 A '  %r%r%r -X  3  _ ,-hh>(#%r J3/99-215r1#%r#  X NCITSJ3ANSIFortranStandardsCommitteeTT>(#CraigT.Dedo V AsterisksasI/OUnits<(#August23,1999  ( ( @(#Page  1  ڀof  1  4#(2Quick A.  .0 c:\Corel\Office7\Template\X3J3 Document.wpt _B   ,X.@ 0C:\X3J3\150\99-215r1.wpd@C:\X3J3\150\99-215r1.wpd/  ԎC  (3$ r!  %r%r%r -X    3=dd=  H4#:.2Quick 1.F  .0 FAsterisks as I/O Units -$Craig T. Dedo$0Craig T. Dedo$J3 / 99-192r1.Title" Fortran 2000f17130 W. Burleigh Place Brookfield, WI 53005&/(414) 783-5869   ( )0 ' L-Fortran 2000 Requirement Approved\ NCITS J3 ANSI Fortran Standards Committee*American English  12E34H56H78:;EDs&3|x;HP OfficeJet Pro 1170C Series0(,,,,0(0U'#137=CIQYag1.a.i.(1)(a)(i)1)a)Level 1Level 2Level 3Level 4Level 5"Arial Regularfy$'##37=CIQYag1.a.i.(1)(a)(i)1)a) D IZ<Century Schoolbook Regular B   ,X.@ 0C:\X3J3\150\99-215r1.wpd@C:\X3J3\150\99-215r1.wpd/  C B   ,X.@ 0C:\X3J3\150\99-215r1.wpd@C:\X3J3\150\99-215r1.wpd/  C(3$ r!  %r%r%r -X    3=dd=  ****'dxd d(3$ r!  %r%r%r -X    3=dd=  2+(3)UC <<CLevel 1Level 2Level 3Level 4Level 5($$   1  55' dxdP Pd1, 2, 3,Level 1Level 2Level 3Level 4Level 5B#:.21, 2, 3,NumbersF  .0 Fa, b, c,Level 1Level 2Level 3Level 4Level 5V#:2a, b, c,Lowercase LettersH  .0 Hd r!  %r%r%r -X    3=dd=  _C  #1'#CX8: ::!:88 8 X  r^4` <hDp Lx !(#T$%&-r  %  NUMBER:0 4 0` 4(#4(#000068` (#` (# TITLE:0  04(#(#0` 4(#4(#AsterisksasI/Ounits` (#` (# KEYWORDS:0 ` Asterisk,I/O,unitjN` (#` (# DEFECTTYPE:0 ` Erratum` (#` (# STATUS:0 4 0` 4(#4(#Submitted` (#` (# Question:1.0  DoestheFortran95standardrequiretheexternalunitcorrespondingtotheI/Ounitidentifiedbyanasterisk T 8 forinputoroutputtobethesameastheexternalunitidentifiedbysomefixednonnegativeintegervalue? (#(# 2.0  CantheI/Ounitidentifiedbyanasteriskforinputoroutputcorrespondtomorethanoneexternalunit?I - (#(# 3.0  IftheexternalunitidentifiedbyanintegervaluethatcorrespondstotheI/Ounitidentifiedbyanasterisk {  forinputoroutputisclosed,doesthatcausetheI/Ounitidentifiedbyanasterisktobecomedisconnected? (#(# Answer:1.0  No. (#(# 2.0  No.( (#(# 3.0  Yes.vZ(#(# Discussion:  The_submitter_Ԁstates:AtleastoneFortran95implementationuses-1asthevalueoftheI/Ounitidentifiedbyanasterisk.AcarefullyconstructedINQUIRE_statement_Ԁcanexposethisvaluetotheuser.ManyusersexpectI/Ototheunitsidentifiedbyasteriskstocontinuetoworkevenafterthecorrespondingunitsidentifiedbyintegervalueshavebeenclosed.1.0  Thereisnorequirementinthestandardthattheasteriskcorrespondtoanexternalfileunit.U9(#(# 2.0  Fortheunitsidentifiedbytheasterisk;;,thetextofsection9.3.2doesnotallowtwoormoreunitstobe ! connectedsimultaneouslytothesameexternaldeviceorfile[139:8-9]._Anedit_Ԁissuppliedtoclarifythissituation. (#(# 3.0  Therem2ay23ight3notbeanexternalfileunitthatcorrespondstotheio-unitspecifiedbyanasterisk,asclarified B&% bytheeditbelow.Ifthereis,itispermissibletoexecuteaCLOSEstatementonthemasonanyotherunit. (#(# REFERENCES:ISO/IEC1539-1:1997(E),Sections9.3and9.4.4.2EDITS:ForFortran95:  Addthefollowingtexttotheendofthelastparagraphbeforesection9.3.1[138:34+]:0  8(#(#"Anasteriskusedinaninputstatementmayidentifythesameio-unitas5a54some4particular }#a- external-file-unit.Anasteriskusedinanoutputstatementmayidentifythesameio-unitas7another '$ . 76some %%. other %%. 6particularexternal-file-unit."$/!! Thereareno_edits_ԀrequiredforFortran2000.SUBMITTEDBY:Robert_Corbett_HISTORY:99-1920  04(#(#m1500 4(#4(#Submitted("5 (# (# 99-2150  04(#(#m1500 4(#4(#Proposedresponse.e)I#6 (# (# [EndofJ3/992151r11]