subroutine init_itv_7 !! <LI> ( 7) f_nd_beam_electron use numerics, only: lablxc, boundl, boundu implicit none lablxc(7) = 'f_nd_beam_electron ' boundl(7) = 1.00D-6 boundu(7) = 1.000D0 end subroutine init_itv_7