ＡＢＳ
copyright

green dotＡＢＳ

書式ABS(A)
機能 Aの絶対値を計算する。
ただし、引数が複素数(x,y)のときは、 x2+y2を計算する。
引数 A：整数型，実数型，複素数型
戻り値 型は引数が整数型、実数型であるとき引数と同じであり、 複素数型であるとき実数型になる。
種別型パラメタは、引数と同じである。

green dotサンプルプログラム

3.45, -3.45の絶対値を求める。 
    REAL :: a,b
    a=3.45; b=-3.45
    WRITE(*,*) ABS(a), ABS(b)
実行例
3.45000… 3.45000…

line-end