subroutine init_itv_58 !! <LI> (58) thwcndut use numerics, only: lablxc, boundl, boundu implicit none lablxc(58) = 'thwcndut ' boundl(58) = 0.001D0 boundu(58) = 0.100D0 end subroutine init_itv_58