L'instruction WHERE

L'instruction $WHERE$ va nous permettre d'appliquer un traitement sur les éléments vérifiant une certaine condition.

Exemple:

       WHERE (A >=0.)
           B = SQRT(A)
       ELSEWHERE
           B = 0.
       ENDWHERE

ceci est équivalent à :

       DO I = 1, 10
          DO J = 1, 20
             IF (A(I,J) >=0.) THEN
                B(I,J)= SQRT(A(I,J))
             ELSE
                B(I,J) = 0.
             ENDIF
          ENDDO
       ENDDO