subroutine init_itv_50
!! <LI> (50) fiooic (f-value for equation 33)
use numerics, only: lablxc, boundl, boundu
implicit none
lablxc(50) = 'fiooic '
boundl(50) = 0.001D0
boundu(50) = 1.000D0
end subroutine init_itv_50