next up previous
: 論理式 : Fortran 文法 : 入出力

条件分岐

if $(a)$ then $b$ else $c$ end if

[説明] もし $a$ が正しければ実行文 $b$ を行う。それ以外のときは $c$ を行う。

例:


        if (d .LT. 0.0) then
          write(*,*) "d negative"
        else
          write(*,*) sqrt(d),-sqrt(d)
        end if



Kiyohide Nomura 平成15年4月25日