[patch, fortran, docs. committed] Some cleanup to intrinsic.texi

[Brooks Moses <brooks dot moses at codesourcery dot com>]

This is the first of a batch of documentation patches that I wrote while 
off on holiday vacation in the last couple of weeks; I'm working through 
putting them into committable form and submitting them.  This one's 
pretty much just "Syntax"-section fixes and other minor stuff, with one 
sentence edit at the end.

--------------------------------------------------------------
2007-01-03  Brooks Moses  <brooks.moses@codesourcery.com>

	* intrinsic.texi: Various minor cleanups.

--------------------------------------------------------------

Tested with "make pdf" and "make texi"; committed to trunk under blanket 
approval from Steve Kargl.

- Brooks
Index: intrinsic.texi
===================================================================
--- intrinsic.texi	(revision 119980)
+++ intrinsic.texi	(working copy)
@@ -275,7 +275,7 @@
 given (e.g., @code{REAL(KIND=4)} or @code{REAL(KIND=8)}).  Finally, for
 brevity the optional @code{KIND=} syntax will be omitted.
 
-Many of the intrinsics procedures take one or more optional arguments.
+Many of the intrinsic procedures take one or more optional arguments.
 This document follows the convention used in the Fortran 95 standard,
 and denotes such arguments by square brackets.
 
@@ -291,7 +291,6 @@
 the applicable option(s) is noted.
 
 
-
 @node ABORT
 @section @code{ABORT} --- Abort the program  
 @findex @code{ABORT} intrinsic
@@ -329,7 +328,6 @@
 @end table
 
 
-
 @node ABS
 @section @code{ABS} --- Absolute value  
 @findex @code{ABS} intrinsic
@@ -731,8 +729,7 @@
 Elemental function
 
 @item @emph{Syntax}:
-@code{X = AINT(X)} 
-@code{X = AINT(X, KIND)}
+@code{X = AINT(X [, KIND])} 
 
 @item @emph{Arguments}:
 @multitable @columnfractions .15 .80
@@ -791,8 +788,7 @@
 Subroutine
 
 @item @emph{Syntax}:
-@code{CALL ALARM(SECONDS, HANDLER)} 
-@code{CALL ALARM(SECONDS, HANDLER, STATUS)}
+@code{CALL ALARM(SECONDS, HANDLER [, STATUS])}
 
 @item @emph{Arguments}:
 @multitable @columnfractions .15 .80
@@ -838,8 +834,7 @@
 transformational function
 
 @item @emph{Syntax}:
-@code{L = ALL(MASK)} 
-@code{L = ALL(MASK, DIM)}
+@code{L = ALL(MASK [, DIM])}
 
 @item @emph{Arguments}:
 @multitable @columnfractions .15 .80
@@ -3354,7 +3349,7 @@
 @end multitable
 
 @item @emph{Return value}:
-The current date and time as a string.
+The current date as a string.
 
 @item @emph{Example}:
 @smallexample
@@ -3437,7 +3432,7 @@
 Non-elemental subroutine
 
 @item @emph{Syntax}:
-@code{CALL fget(C[,STATUS])}
+@code{CALL FGET(C[,STATUS])}
 
 @item @emph{Arguments}:
 @multitable @columnfractions .15 .80
@@ -3492,7 +3487,7 @@
 Non-elemental subroutine
 
 @item @emph{Syntax}:
-@code{CALL fgetc(UNIT,C[,STATUS])}
+@code{CALL FGETC(UNIT,C[,STATUS])}
 
 @item @emph{Arguments}:
 @multitable @columnfractions .15 .80
@@ -3665,7 +3660,7 @@
 Non-elemental subroutine
 
 @item @emph{Syntax}:
-@code{CALL fput(C[,STATUS])}
+@code{CALL FPUT(C[,STATUS])}
 
 @item @emph{Arguments}:
 @multitable @columnfractions .15 .80
@@ -3715,7 +3710,7 @@
 Non-elemental subroutine
 
 @item @emph{Syntax}:
-@code{CALL fputc(UNIT,C[,STATUS])}
+@code{CALL FPUTC(UNIT,C[,STATUS])}
 
 @item @emph{Arguments}:
 @multitable @columnfractions .15 .80
@@ -4119,7 +4114,7 @@
 Non-elemental subroutine.
 
 @item @emph{Syntax}:
-@code{CALL getcwd(CWD[,STATUS])}
+@code{CALL GETCWD(CWD[,STATUS])}
 
 @item @emph{Arguments}:
 @multitable @columnfractions .15 .80
@@ -5418,7 +5413,7 @@
 @item @emph{Specific names}:
 
 @item @emph{See also}:
-@ref{INDEX}
+@ref{INDEX}, @ref{LEN_TRIM}
 @end table
 
 
@@ -5448,8 +5443,9 @@
 @end multitable
 
 @item @emph{Return value}:
-The return value is of type @code{INTEGER(n)}, where @code{n} is the
-size (in bytes) of a memory address on the target machine.
+The return value is of type @code{INTEGER}, with a @code{KIND}
+corresponding to the size (in bytes) of a memory address on the target
+machine.
 
 @item @emph{Example}:
 @smallexample