summaryrefslogtreecommitdiff
path: root/gcc
diff options
context:
space:
mode:
authortoon <toon@138bc75d-0d04-0410-961f-82ee72b054a4>2001-07-10 09:41:04 +0000
committertoon <toon@138bc75d-0d04-0410-961f-82ee72b054a4>2001-07-10 09:41:04 +0000
commit47fc4abca338b7494326ef229851eca882ae6da4 (patch)
treef80f37f09b7104569ca0adca1014cfe44c952397 /gcc
parenta7d5a19b2d83f058e0654c1b61b3d08f8a26d077 (diff)
downloadgcc-47fc4abca338b7494326ef229851eca882ae6da4.tar.gz
2001-07-10 James Smaby <jsmaby@virgo.umeche.maine.edu>
* intdoc.in: Fix the definition of COMPLEX ABS. Remove `the' where inappropriate. * intdoc.texi: Rebuilt. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@43892 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc')
-rw-r--r--gcc/f/ChangeLog6
-rw-r--r--gcc/f/intdoc.in4
-rw-r--r--gcc/f/intdoc.texi4
3 files changed, 10 insertions, 4 deletions
diff --git a/gcc/f/ChangeLog b/gcc/f/ChangeLog
index 2c1726143fa..ef3f81bc6be 100644
--- a/gcc/f/ChangeLog
+++ b/gcc/f/ChangeLog
@@ -1,3 +1,9 @@
+2001-07-10 James Smaby <jsmaby@virgo.umeche.maine.edu>
+
+ * intdoc.in: Fix the definition of COMPLEX ABS.
+ Remove `the' where inappropriate.
+ * intdoc.texi: Rebuilt.
+
2001-07-04 Joseph S. Myers <jsm28@cam.ac.uk>
* g77.texi: Use gpl.texi and funding.texi. Remove Look and Feel
diff --git a/gcc/f/intdoc.in b/gcc/f/intdoc.in
index 565b771c4fa..f702fa10b72 100644
--- a/gcc/f/intdoc.in
+++ b/gcc/f/intdoc.in
@@ -55,11 +55,11 @@ If @var{@1@} is type @code{COMPLEX}, the absolute
value is computed as:
@example
-SQRT(REALPART(@var{@1@})**2, IMAGPART(@var{@1@})**2)
+SQRT(REALPART(@var{@1@})**2+IMAGPART(@var{@1@})**2)
@end example
@noindent
-Otherwise, it is computed by negating the @var{@1@} if
+Otherwise, it is computed by negating @var{@1@} if
it is negative, or returning @var{@1@}.
@xref{Sign Intrinsic}, for how to explicitly
diff --git a/gcc/f/intdoc.texi b/gcc/f/intdoc.texi
index a34f700570d..6165e442bb3 100644
--- a/gcc/f/intdoc.texi
+++ b/gcc/f/intdoc.texi
@@ -868,11 +868,11 @@ If @var{A} is type @code{COMPLEX}, the absolute
value is computed as:
@example
-SQRT(REALPART(@var{A})**2, IMAGPART(@var{A})**2)
+SQRT(REALPART(@var{A})**2+IMAGPART(@var{A})**2)
@end example
@noindent
-Otherwise, it is computed by negating the @var{A} if
+Otherwise, it is computed by negating @var{A} if
it is negative, or returning @var{A}.
@xref{Sign Intrinsic}, for how to explicitly