subroutine init_itv_29 !! <LI> (29) bore use numerics, only: lablxc, boundl, boundu implicit none lablxc(29) = 'bore ' boundl(29) = 0.100D0 boundu(29) = 10.00D0 end subroutine init_itv_29