Fortran - Opérateurs logiques

Le tableau suivant présente tous les opérateurs logiques pris en charge par Fortran. Supposons une variableAqui est vrai. et variableBdétient .false. , alors -

Opérateur	La description	Exemple
.et.	Opérateur logique ET appelé. Si les deux opérandes sont différents de zéro, la condition devient vraie.	(A. Et. B) est faux.
.ou.	Opérateur OU logique appelé. Si l'un des deux opérandes est différent de zéro, la condition devient vraie.	(A. Ou. B) est vrai.
.ne pas.	Opérateur PAS logique appelé. Utilisez pour inverser l'état logique de son opérande. Si une condition est vraie, l'opérateur logique NOT rendra faux.	! (A. Et. B) est vrai.
.eqv.	Appelé opérateur EQUIVALENT logique. Utilisé pour vérifier l'équivalence de deux valeurs logiques.	(A .eqv. B) est faux.
.neqv.	Opérateur logique NON-ÉQUIVALENT appelé. Utilisé pour vérifier la non-équivalence de deux valeurs logiques.	(A .neqv. B) est vrai.

Exemple

Essayez l'exemple suivant pour comprendre tous les opérateurs logiques disponibles dans Fortran -

program logicalOp
! this program checks logical operators
implicit none

   ! variable declaration
   logical :: a, b
   
   ! assigning values
   a = .true.
   b = .false.
   
   if (a .and. b) then
      print *, "Line 1 - Condition is true"
   else
      print *, "Line 1 - Condition is false"
   end if
   
   if (a .or. b) then
      print *, "Line 2 - Condition is true"
   else
      print *, "Line 2 - Condition is false"
   end if
   
   ! changing values
   a = .false.
   b = .true.
   
   if (.not.(a .and. b)) then
      print *, "Line 3 - Condition is true"
   else
      print *, "Line 3 - Condition is false"
   end if
   
   if (b .neqv. a) then
      print *, "Line 4 - Condition is true"
   else
      print *, "Line 4 - Condition is false"
   end if
   
   if (b .eqv. a) then
      print *, "Line 5 - Condition is true"
   else
      print *, "Line 5 - Condition is false"
   end if
   
end program logicalOp

Lorsque vous compilez et exécutez le programme ci-dessus, il produit le résultat suivant -

Line 1 - Condition is false
Line 2 - Condition is true
Line 3 - Condition is true
Line 4 - Condition is true
Line 5 - Condition is false