init_itv_149 Subroutine

public subroutine init_itv_149()

Uses

  • (149) fbmaxcs : F-value for max peak CS field (con. 79, itvar 149)

    Arguments

    None

    Contents

    Source Code


    Source Code

      subroutine init_itv_149
        !! <LI> (149) fbmaxcs : F-value for max peak CS field (con. 79, itvar 149)
        use numerics, only: lablxc, boundl, boundu
        implicit none
        lablxc(149) = 'fbmaxcs       '
        boundl(149) = 0.001D0
        boundu(149) = 1.000D0
      end subroutine init_itv_149