init_itv_28 Subroutine

public subroutine init_itv_28()

Uses

  • (28) fradpwr (f-value for equation 17), total radiation fraction

    Arguments

    None

    Contents

    Source Code


    Source Code

      subroutine init_itv_28
        !! <LI> (28) fradpwr (f-value for equation 17), total radiation fraction
        use numerics, only: lablxc, boundl, boundu
        implicit none
        lablxc(28) = 'fradpwr       '
        boundl(28) = 0.001D0
        boundu(28) = 0.990D0
      end subroutine init_itv_28