init_itv_159 Subroutine

public subroutine init_itv_159()

Uses

  • (159) ftoroidalgap : F-value for toroidalgap > tftort constraint (con. 82)

    Arguments

    None

    Contents

    Source Code


    Source Code

      subroutine init_itv_159
        !! <LI> (159) ftoroidalgap : F-value for toroidalgap >  tftort constraint (con. 82)
        use numerics, only: lablxc, boundl, boundu
        lablxc(159) = 'ftoroidalgap  '
        boundl(159) = 1.0D-4
        boundu(159) = 1.0D0
      end subroutine init_itv_159