這是Fortran中Arithmetic IF Statement即算術(shù)if語句,它的含義就是：當(dāng)if中的值,分別是<,=,> 0時,按相應(yīng)順序goto到后面的語句.具體到你的例子,就是：

當(dāng)a < 0時, goto 120
當(dāng) a >=0時,goto 100

比如：

    read(*,*) a
    if (a) 120, 100, 100
120 print *, "< 0"    
    print *, "---"
    goto 200
100 print *, ">= 0"
200 continue

運行結(jié)果：

-1
 < 0
 ---

而

1
 >= 0