init_itv_108 Subroutine

public subroutine init_itv_108()

Uses

  • (108) breeder_f: Volume of Li4SiO4 / (Volume of Be12Ti + Li4SiO4)

    Arguments

    None

    Contents

    Source Code


    Source Code

      subroutine init_itv_108
        !! <LI> (108) breeder_f: Volume of Li4SiO4 / (Volume of Be12Ti + Li4SiO4)
        use numerics, only: lablxc, boundl, boundu
        implicit none
        lablxc(108) = 'breeder_f     '
        boundl(108) = 0.060D0
        boundu(108) = 1.000D0
      end subroutine init_itv_108