subroutine init_itv_21
!! <LI> (21) ft_burn (f-value for equation 13)
use numerics, only: lablxc, boundl, boundu
implicit none
lablxc(21) = 'ft_burn '
boundl(21) = 0.001D0
boundu(21) = 1.000D0
end subroutine init_itv_21