init_itv_46 Subroutine

public subroutine init_itv_46()

Uses

  • (46) fpinj (f-value for equation 30)

    Arguments

    None

    Contents

    Source Code


    Source Code

      subroutine init_itv_46
        !! <LI> (46) fpinj (f-value for equation 30)
        use numerics, only: lablxc, boundl, boundu
        implicit none
        lablxc(46) = 'fpinj         '
        boundl(46) = 0.001D0
        boundu(46) = 1.000D0
      end subroutine init_itv_46