subroutine init_itv_16 !! <LI> (16) dr_cs use numerics, only: lablxc, boundl, boundu implicit none lablxc(16) = 'dr_cs ' boundl(16) = 0.010D0 boundu(16) = 10.00D0 end subroutine init_itv_16