Dear F95 experts,
I have the following problems with the FORALL statement:
FORALL allows, optionally, a scalar logical expression as
the last argument, similar to, e.g., SUM. But with SUM
this optional argument has the name MASK; not so with FORALL.
Why? This seems to be inconsistent to me.
Furthermore, and much more important, when calling SUM from
inside a subroutine that has an optional argument MASK, I can
simply write
S = SUM(ARRAY, DIM, MASK)
without checking for the presence of MASK, as I can do with
any nested, user-written routines using optional arguments.
But not so in the case of FORALL! Here I get a run-time error
(at least with the two compilers I have available) when I use
FORALL with the logical expression, and this logical expression
is not present. This is quite annoying and not understandable
to me.
Any comments?
Roland
+----------------------------------------------------------------------+
| Roland Schilling Home-Office: +49(89)32929-670 |
| Max-Planck-Institut für Gravitationsphysik Phone: +49(89)32905-265 |
| -- Albert-Einsten-Institut -- Fax: +49(89)32905-200 |
| D-85748 Garching E-mail: [log in to unmask] |
| Germany http://www.geo600.uni-hannover.de |
+----------------------------------------------------------------------+
|