流体力学から数値計算まで

広告


function関数

関数を宣言する命令文です。

       implicit double precision(a-h,o-z)
       i=1
       j=2
       k=add(i,j)
       write(*,*)k
       stop
       end

       function add(i,j)
       implicit double precision(a-h,o-z)
       add=i+j
       return
       end

出力結果

3


prev | top | next

カウンタ

(2011.3.15〜)