subroutine init_itv_96 !! <LI> (96) fvvhe (f-value for equation 55) use numerics, only: lablxc, boundl, boundu implicit none lablxc(96) = 'fvvhe ' boundl(96) = 0.001D0 boundu(96) = 1.000D0 end subroutine init_itv_96