subroutine init_itv_74 !! <LI> (74) scraplo use numerics, only: lablxc, boundl, boundu implicit none lablxc(74) = 'scraplo ' boundl(74) = 0.001D0 boundu(74) = 10.00D0 end subroutine init_itv_74