subroutine init_itv_73 !! <LI> (73) scrapli use numerics, only: lablxc, boundl, boundu implicit none lablxc(73) = 'scrapli ' boundl(73) = 0.001D0 boundu(73) = 10.00D0 end subroutine init_itv_73