WPC ']ZưN̫„$eE* `^<]JGSF w,rԽ$E}>q̈́Z׮V*E=ZwDbg@Pq0+A_1ܽ6>+0ɒ dSlR}" #!kl0iBuգ&Rr~mt yW2v{ࢹ\""Arial Regular($XXXXUSUS.,$X,X$      =dd=Apple LaserWriter II NT v47.00(,,,,0(0C:\COREL\WORDPE~1\TEMPLATE\CUSTOM~1\CUSTOM~1\ANSIJ3~1.WPTC:\Corel\WordPerfect Office 2000\Template\Custom WP Templates\Custom WP Templates\ANSI J3 New Document.wpt  K'USUS.,$X,X$   __>(# J3/01318r1  X NCITS/J3ANSIFortranStandardsCommittee>(#CraigT.Dedo 0 _JOR_ԀResponseto01-259@@<(#August21,2001 P @(#Page  1  ڀof  1  (3K$ !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~+ E D   Ds&ؕ3|x U K)USUS.,$X,X$   __.F6E:\ANSI_J3\158\01-318r1.wpdFE:\ANSI_J3\158\01-318r1.wpd/  (3K$ !XXUSUS.,$X,X$      =$dd=   (5hCEKQW]cioAutoList11.1.1.1.1.1.1.1.1.##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  K'USUS.,$X,X$   __@(# J3/01318  X NCITS/J3ANSIFortranStandardsCommittee>(#CraigT.Dedo 0 _JOR_ԀResponseto01-259@@<(#August20,2001 P @(#Page  1  ڀof  1  / Z<Century Schoolbook Regular !XXUSUS.,$X,X$      =$dd=  ___ K@  _JOR_ԀResponseto01-259  + To:0  0(#(#04(#(#J3#4(#4(# From:0  04(#(#CraigDedo4(#4(# Date:0  04(#(#August201,2001 4(#4(# Subject:0 4 _JOR_ԀResponseto01-259{ P4(#4(# b (5h8#b  _JOR_Ԁconsideredtherecommendationsin01-259. 3   325h  1  .3  0    [30:6]04(#(#Makethefollowingedits:3)݌ p 4(#4(# Ќ  [30:6-7]0 4 Replacetheparagraphwiththefollowing:c8 4(#4(#  Forderivedtypes,therearenointrinsicoperations.Operationsonderivedtypesmaybedefinedbytheprogram(4.5.9).[132:26-27]0 ` Replace theoperationwith  assignmen  i t. ` (#` (#  3   3l25h  2  .3  0    [31:5-6]0` (#(#No.3l݌K ` (#` (# Ќ   3   3S25h  3  .3  0    [31:2-6]0` (#(#No.Soonerorlaterwithpolymorphicobjects,youneedtoexecuteauserdefined   assignment.3S~݌ ` (#` (# Ќ   3   325h  4  .3  0    [36:6-8]0` (#(#No,butcorrecttwotypos.3݌3` (#` (# Ќ  [36:7]0  Change 1993to 2000.(#(# [36:8]0  Change ofto or.(#(#  3   3F 25h  5  .3  0    [46:6-7]0` (#(#No.3F q ݌S(` (#` (# Ќ   3   3- 25h  6  .3  0    4.5.1.904(#(#0` 4(#4(#Move[49:39-50:8]toimmediatelybefore[47:33].Renumber4.5.1.9as_4.5.1.6_.3- X ݌` (#` (# Ќ   3   3 25h  7  .3  0    [56:41]04(#(#0` 4(#4(#Renumber4.5.11as4.5.10.1.3 ݌sH` (#` (# Ќ   3   3 25h  8  .3  0    [57:23]04(#(#0` 4(#4(#Renumber4.5.12as4.5.10.2.3 ݌` (#` (# Ќ  References  h  01-007r2,Fortran2000Draft 01-259,Commentsonsection4 [EndofJ3/01-318 r1 ]