Opérateurs logiques

Fortran permet de combiner des expressions logiques à l'aide des opérateurs classiques et, ou, non, équivalent, non équivalent. Ils seront notés et classés par ordre de priorités décroissant suivant :

.NOT.		négation logique
.AND.		et logique
.OR.		ou logique
.EQV.		équivalence logique
.NEQV.		non équivalence logique

Voici quelques précision :

expl1 .EQV. expl2 $\left \{ \begin{tabular}{ll} vrai & si expl1 et expl2 sont vrais ou faux \\ faux & sinon \end{tabular} \right .$

expl1 .NEQV. expl2 $\left \{ \begin{tabular}{ll} vrai & si l'un faux et l'autre vrai \\ faux & sinon \end{tabular} \right .$

expl1 .OR. expl2 $\left \{ \begin{tabular}{ll} vrai & si l'un faux et l'autre vrai ?\\ faux & sinon ? \end{tabular} \right .$

Exemple.

$a<b$   .and.$c<d \left \{ \begin{array}{ll} \mbox{vrai }& \mbox{si } a<b \mbox{ et } c<d \\ \mbox{faux }& \mbox{sinon} \end{array} \right .$

$\ominus$ L'expression .not.$a<b$.and.$c<d$ est évaluée comme $($.not.$a<b)$.and.$(c<d)$ et le résultat est différent de l'évalution suivante .not.$(a<b$.and.$c<d)$