subroutine init_itv_48
!! <LI> (48) fstrcase (f-value for equation 31)
use numerics, only: lablxc, boundl, boundu
implicit none
lablxc(48) = 'fstrcase '
boundl(48) = 0.001D0
boundu(48) = 1.000D0
end subroutine init_itv_48