subroutine init_itv_17 !! <LI> (17) tdwell use numerics, only: lablxc, boundl, boundu implicit none lablxc(17) = 'tdwell ' boundl(17) = 0.100D0 boundu(17) = 1.000D8 end subroutine init_itv_17