subroutine init_itv_62 !! <LI> (62) fdtmp (f-value for equation 38) use numerics, only: lablxc, boundl, boundu implicit none lablxc(62) = 'fdtmp ' boundl(62) = 0.001D0 boundu(62) = 1.000D0 end subroutine init_itv_62