[log in to unmask] said:
> Oops, sorry for the mistake. The legal syntax is, if I'm right,
>
> IF (K .GT. 0) IF (X(K) .GT. 0.) THEN
An IF-THEN statement is not a legal consequence for a logical IF.
Here is why:
The consequence for a logical IF is an <action-stmt> (F90 std, page 97).
An <if-then-stmt> is part of an <if-construct> (F90 std, page 96) and is
not part of any other grammar term.
An <if-construct> is not a possible <action-stmt> (F90 std, page 9).
Instead, it is part of an <executable-construct> (F90 std, page 8), we have
<executable-construct> ::= <action-stmt> |
<case-construct> |
<do-construct> |
<if-construct> |
<where-construct>
Cheers,
--
...........................Malcolm Cohen, NAG Ltd., Oxford, U.K.
([log in to unmask])
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
|