When Default KIND Isn't Good Enough
                              Edits


       To:    J3
       From:  Craig Dedo
       Date:  December 14, 2000
          Subject:  When Default KIND Isn't Good Enough - Edits

Rationale
  This paper provides edits for implementing the use of any integer KIND that is defined on the processor for the results of
intrinsic procedures that return integer values and for the I/O specifiers that use integer values.

Edits
  Edits are with respect to the 00-007r3.

  Change scalar-default-int-variable to scalar-int-variable in the following places in chapter 9.
                                                            [175:7]        [179:6]        [180:16,21,24] [196:29,34]    [197:42]
                                             [199:23,37,42] [200:9-12,21]    [201:9]      [202:22,27,30,33,35,39]
               [203:2]        [205:22]

  Statement of intent to the Editor.  I think I got all of them.  However, in case I missed something, you should interpret this
paper as specifying, "Change scalar-default-int-variable to scalar-int-variable everywhere in chapter 9.".

  Following are the edits for the LEN function in chapter 13.
          [314:19]  Add "[, KIND]" immediately before ")".

          [314:22]  Change "Argument" to "Arguments".

          [314:23+] Add:
                 KIND (optional)  shall be a scalar integer initialization expression.

          [314:24]  Change the line to read:
Result Characteristics.  Integer.  If KIND is present, the kind type parameter is that specified by the value of KIND;
otherwise, the kind type parameter is that of default integer type.

  Please make the same changes for the following list of functions in chapter 13.

COUNT
LEN_TRIM
SCAN
UBOUND


INDEX
MAXLOC
SIZE
VERIFY


LBOUND
MINLOC
SHAPE




References
00-007r3, Fortran 2000 Draft
00-308, When Default KIND Isn't Good Enough
00-350, When Default KIND Isn't Good Enough - Technical Specification and Syntax

[End of J3 / 00-352]