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