subroutine init_itv_160 !! <LI> (160) f_avspace (f-value for equation 83) use numerics, only: lablxc, boundu, boundl lablxc(160) = 'f_avspace ' boundl(160) = 0.010D0 boundu(160) = 1.000D0 end subroutine init_itv_160