Fortran - Construire si imbriqué
Vous pouvez en utiliser un if ou else if déclaration dans un autre if ou else if déclaration (s).
Syntaxe
La syntaxe d'un imbriqué if la déclaration est la suivante -
if ( logical_expression 1) then
!Executes when the boolean expression 1 is true
…
if(logical_expression 2)then
! Executes when the boolean expression 2 is true
…
end if
end if
Exemple
program nestedIfProg
implicit none
! local variable declaration
integer :: a = 100, b= 200
! check the logical condition using if statement
if( a == 100 ) then
! if condition is true then check the following
if( b == 200 ) then
! if inner if condition is true
print*, "Value of a is 100 and b is 200"
end if
end if
print*, "exact value of a is ", a
print*, "exact value of b is ", b
end program nestedIfProg
Lorsque le code ci-dessus est compilé et exécuté, il produit le résultat suivant -
Value of a is 100 and b is 200
exact value of a is 100
exact value of b is 200