Fortran - 1次元配列各要素の逆数平均(Rosseland Mean)の計算！  (2018-11-20)

Fortran 95 で1次元配列の各要素の逆数平均(Rosseland Mean)を計算してみました。